текст использован 256 символьный алфавит содержит 105 страниц на каждой странице 55 строк в каждой строке 40 символов

N = 256

i = 8

k = 105 * 55 * 40 = 231000 символов

I = k * i

I = 231000 * 8 = 1848000 бит = 231000 байт

ответ: 231000 байт - информационный объём текста

for a : = 1 to 20 do

begin

    writeln(a,"^2 = ", a*a);

end

или

a: = 1;

repeat

    writeln(a,"^2 = ", a*a);

    a : = a + 1;

until a > 20;

var a: array [1..9] of real;

s,p: real;

begin

  p: =1;

  s: =0;

  for i: = 1 to 9 do

  begin

      read(a[i]);

      s: = s+a[i];

      p: =p*a[i];

  end;

  writeln("summa=",s);

  writeln("srednee arefmeticheskoe=",s/n);

  writeln("proizvedenie=",p);

end.