Для записи текста использовался 64 символьный алфавит какое количество информации в байтах содержат - id616569520200814 от FenomeN1703 14.08.2020 22:28

Question

Информатика: Для записи текста использовался 64 символьный алфавит какое количество информации в байтах содержат 3 страниц текста если каждой странице расположено 40 строк по 60 символов строки

FenomeN1703 · Accepted Answer

Program Dafnochka;
uses crt;
var
r,sum: real;
k:integer;
begin
writeln('*** alphaues is thinking... ***');
writeln('***          OK             ***');
sum:=0;
k:=0;
r:=1;
writeln('Введите ненулевое число');
writeln('(или введите 0 для конца последовательности) ');
while r<>0 do
    begin
      write("Ввод:") ;
      readln (r);
      sum:=sum+r;
      k:=k+1;
    end;
writeln();
writeln('Всего введено ',k-1,' чисел');
writeln('Среднее значение равно ',sum/(k-1));
end.

Проверено - работает на Паскаль АВС

MOGZ ответил