В кодировке КОИ-8 каждый символ кодируется 8 битами. Определите информационный объём сообщения в этой кодировке, если длина текста 16 символов.

а) 160 битов
б) 16 бит
в) 128 байтов
г) 16 байт​

Пояснение:

i - информационный объём символа;

K - количество символов в тексте;

I - информационный объём текста.

Дано:

i = 8 бит

K = 16 симв.

Найти:

I - ?

I = K × i

I = 16 × 8 = 128 (бит)

128 бит = 16 байт.

ответ: г) 16 байт.

______________

Удачи Вам! :)

var s : string; symb : char; i : longint; begin  readln(s);   readln(symb);   if pos(symb,s)=0 then writeln('в этом слове нет этого символа')  else begin                i: =0;                 while pos(symb,s)< > 0 do begin                                                                    write(pos(symb,s)+i,' ');                                                                     i: =i+1;                                                                     delete(s,pos(symb,s),1);                                                                 end;             end;   writeln;   writeln(i); end.

я бы сделал

program p_1; var a,b: real; beginwriteln ('vvedite 1-oe'); read (a); writeln ('vvedite 2-oe'); read (b); if (a> b) thenbegin writeln ( ' 1-oe bolshe (',a,')' ); end; if (a< b) thenbegin writeln ( ' 1-oe menshee. bolshe vtoroe (',b,')' ); end; if a=b thenbegin writeln ('oni ravni'); end; end.