Program z;
var str:string;
begin
str:='В печке выпечен батон, а в петлицу вдет бутон';
while pos('е',str)>0 do
delete(str,pos('е',str),1);
writeln(str);
end.
Вводим в строку следующее:
> [print];[slovo].
Один символ кодируетсяя 1 байтом
на одной странице 30*70=2100 символов
84000:(2100*8)=5
Ответ: 19 клеток,
клетка финиша а1 не учитывается