V=k*I, где V - объем текста; k - общее количество символов; I - количество бит, отводимое на один символ. Как правило, в подобных задачах k считается, как произведение кол-ва символов в строке на кол-во строк и на кол-во страниц. k=V/I=40*1024*8/8=40*1024. k/(40*64)=40*1024/(40*64)=1024/64=2^10/2^6=2^4=16. Ответ: 16 страниц.
Var mes, sum: real; begin mes:=0; sum:=1000; while sum<1100 do<span> begin </span>sum:=sum+(sum*0.05); mes:=mes+1; <span> end; </span>writeln (mes:2:0); readln; end. <span>Программа работает корректно. Выводит 2</span>