(паскаль)2.заполнить с клавиатуры массив из 10 элементов. если минимальный элемент находится в первой половине массива увеличить каждый четный элемент массива в два раза, в противном случае массив оставить без изменения. вывести новый массив на экран в виде строки.
139
494
Ответы на вопрос:
Program chik3; var a: array[1..1000]of integer; i,min,l: integer; begin for i: =1 to 10 do begin read(a[i]); end; min: =a[1]; l: =1; for i: =2 to 10 do begin if(a[i]< min)then begin min: =a[i]; l: =i; end; end; for i: =1 to 5 do begin if(a[i]=min)then l: =-50; end; if(l=-50)then begin for i: =1 to 10 do begin if(a[i] mod 2=0)then a[i]: =a[i]*2; end; end; for i: =1 to 10 do begin write(a[i],' '); end; end.
Есть такая формула n=2^i, где n кол во символов в алфавите, а i кол во информации занимаемое одним символом. тогда если в алфавите 16 символов то 16=2^4 и следовательно каждый символ кодируется 4 битами. дальше находим объём сообщения, я просто посчитал на калькуляторе: 3: 16=0,1875( кбайт) в одном кбайте 1024 байт тогда 0,1875*1024=192(байт) в одном байте 8 бит тогда 192*8=1536(бит). и последнее определить сколько символов по 4 бита поместится в сообщение размером 1536 бит; 1536: 4=384 символа
Популярно: Информатика
-
Ksenua6921.06.2020 08:50
-
Vladtop1123428.04.2023 14:22
-
khodha03.12.2021 00:02
-
Smetanka8215.11.2021 23:17
-
superpuper9020.04.2023 19:12
-
katakoval08.05.2022 07:21
-
goddessshi23.09.2020 03:03
-
aalina76015.03.2022 04:30
-
wikwik30.06.2021 13:45
-
annet553011.03.2020 05:27