Для записи текста используется 8 символьный алфавит. какое количество информации в байтах содержит сообщение записанное на 4 страницах, если на каждой странице расположено 30 строк по 20символов ? 8 класс нужно

2^i = n 2^i = 8 => i=3 бит 20*30*4 = 2400 симв. 2400*3=7200 бит = 900 байт

//pascal abc.net v3.1 сборка 1172 //1 var   i,x,max,n,maxi: integer; begin max: =-32768; readln(x); i: =0;   while i< > x do   begin     i: =i+1;     readln(n);     if n> =max then       begin         max: =n;         maxi: =i;       end;   end; writeln(maxi); end. пример ввода: 3 1 2 2 пример вывода: 3 //2 var   i,x,min,n,mini: integer; begin min: =32767; readln(x); i: =0;   while i< > x do   begin     i: =i+1;     readln(n);     if n< min then       begin         min: =n;         mini: =i;       end;   end; writeln(mini); end. пример ввода: 3 1 1 2 пример вывода: 1

чтобы программу, будем выводить команды типа "сделай единица", где единица и девять - процедуры.

описание процедуры:

процедура < имя процедуры>

нач        

< тело процедуры>

кон

процедура единица

нач

поворот шаг шаг шаг шаг

поворот поворот

прыжок прыжок прыжок прыжок

поворот

кон

процедура девять

нач

шаг поворот шаг шаг шаг

шаг поворот шаг поворот шаг

шаг поворот шаг поворот поворот поворот

прыжок прыжок поворот

кон

тело программы: программа число 1919

      нач

          сделай единица

          прыжок

          сделай девять

          прыжок

          сделай единица

          прыжок

          сделай девять

    кон

подробнее - на -