Задание Паскаль .Вывести квадраты всех чисел от a до b. ( Значения а и b вводятся с клавиатуры; b>=a).Для выполнения организовать цикл с предусловием.
var
a, b: integer;
begin
readln(a, b);
while a
write(sqr(a), ' ');
a += 1;
end;
end.