Ёёё в инете есть это же я видела
Дождь лил как из ведра
Скоро дело наладилось и пошло как по маслу
Я знал городские переулки как свои пять пальцев
У себя димка был как рыба в воде
Гости свалились как снег на голову
он всегда врёт как сивый мерин
//PascalABC.NET версия 3.3.1590 от 03.12.2017
//Если программа не запускается, то обновите версию
var
A, B: integer;
begin
readln(A, B);
// Assert((A > 0) and (A < B), 'не верные параметры'); //проверка на дурака если надо
while A <= B do
begin
writeln('Квадрат числа ', A, ' = ', A * A);
A := A + 1;
end;
end.
Что надо сжечь сделать напиши в то я не поняла ))