Сообщение занимает 6 страниц по 50 строк, в
каждой строке записано по 80 символов. Информационный объем
всего сообщения равен 30000байтам. Сколько двоичных разрядов
было использовано для кодирования одного символа?

125 -   5/7

  х     - 2/7

х = (125 * 2/7) : 5/7 = 50 человек

компьютер входит в состав бытовой техники.

компьютер является надсистемой для компьтерных программ.

если что-то будет не так - напиши, испралю. у меня простог нет возможности проверить, выполняется  

program string_7; var s: string; k,l,i: integer; begin write('введите строку: '); readln(s); k: =0; l: =0; for i: =1 to length(s) dobegin if s[i]='н' then k: =k+1; if s[i]='м' then l: =l+1end; writeln('н=',k); writeln('м=',l); if k> l then writeln ('больше букв н'); if k< l thenwriteln ('больше букв м'); if (k = 0) and (l = 0) thenwriteln ('таких букв нет'); end.

так будет элсе выкидывало бы что букв н больше, если бы ни м ни н не встретилось))

program xxx;

  var n, c, d, e, s : integer;

begin

    write('введите число');

    readln(n);

    c: = n div 100;

    d: =(n div 10) mod 10;

    e: = n mod 10;

    s: = c + d + e;

    writeln('сумма чисел =', s);

    readln

end.