Оперативная память компьютера: 16 кбайт, сколько страниц текста можно было бы разместить в памяти этого компьютера, если на странице размещается 40 строк по 60 символов в каждой строке, каждый символзанимает 8 битов?

Не знаю я специально суда зашёл чтоб узнать ответ нахрен мне свой ответ писать

Var       amoebas, t: integer; begin       amoebas : = 1;       t : = 0;             repeat               t : = t + 3;               amoebas : = amoebas * 2;                       writeln(amoebas, ' амеб через ', t, ' часа');           until t > = 24; end.

I, j: integer; a: array [1..100, 1..100] of integer; begin readln(a[1][1], a[1][2]); for i : = 3 to 30 do   a[1][i] : = a[1][i - 1] + a[1][i -2]; for i : = 2 to 30 do   for j : = 1 to 30 do begin   if (j > 2) then     a[i][j] : = a[i][j - 1] + a[i][j - 2] else if (j = 2) then   a[i][j] : = a[i][1] + a[i - 1][30] else a[i][j] : = a[i - 1][30] + a[i - 1][29]; end; for i : = 1 to  30 do begin for j : = 1 to 30 do   write(a[i][j],' ') writeln; end; end. вот,   сорри если что пишу без компилятора