Напишите програму, которая вводит натуральные числа a и b, и выводит квадраты натуральных чисел в диапазоне [ a b ] . язык pascal

Var
i,a,b:Integer;
Begin
 Read(a,b);
 for i:=a to b do
  begin
   Write(i*i,' ');
  end;
end.
удачи тебе