текст занимает 3 страницы по 25 строк в каждой строке 20 символов мощность используемого алфавита 16 символа. Какое количество информации содержит текст?

vara: array[1..500] of integer; i,k,n: integer; begink: =0; write('n= '); readln(n); for i: =1 to n do readln(a[i]); for i: =1 to n do k: =k+a[i]*a[i+1]; writeln(k); end.

вот так понятней буде)) ну и более правильно, для

var a,b,c,d: integer; beginwriteln('введите 1 число'); read(a); writeln('введите 2 число'); read (b); writeln('введите 3 число'); read (c); d: =a+b+c; writeln('сумма чисел ',a,'+',b,'+',c,'=',d); end. 

количество кбайт умножаете на 1024 получаете количество символов 3,5*1024=3584

2000*2000=4000000 пикселей=4 мегапикселей