Сообщение, записанное буквами из 16-ти символьного алфавита, содержит 50 символов.какой объём инфорпмации оно несёт?

2^i=n, n = 16

2^i=16

i=4 бит

50 * 4 = 200 бит

200: 8 = 25 байт

 

Программа

var

 A: array[1..8] of integer;

 B: array[1..8] of integer;

 i: integer;

begin

 Writeln('Заполните массив ');

 for i:=1 to 8 do

   begin

   Read(A[i]);

   if odd(A[i]) then //* смотри примечание после кода

     B[i]:=A[i]

   end;

   Writeln('Нечётные числа массива ');

   for i:=1 to 8 do

   begin

     if B[i]>0 then

       Write(B[i],' ');

   end;

end.

Прим.: *odd - функция, которая определяется чётность элемента. Если элемент нечётный, то функция возвращает значение true, в противном случае - false

Тестовый ввод программы показан в приложении к решению

Маркированные списки применяются при перечислении или выделении отдельных фрагментов текста. а нумерованные списки полезны в тех случаях, когда нужно определить порядок изложения. создать маркированный список можно двумя способами: 1. в начале абзаца ввести звездочку или знак "больше", а затем нажать tab или пробел. 2. автоматический маркированный список создается так: во вкладке "файл" выбрать "параметры". в разделе "правописание" выбрать "параметры автозамены". затем в разделе "автоформат" установить флажки напротив стилей. чтобы создать нумерованный список необходимо: написать "1." и поставить пробел или нажать tab.