Вывести на экран квадраты чисел от 1 до 10

PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018
Внимание! Если программа не работает, обновите версию!

begin
  SeqGen(10,i->i*i,1).Println
end.

Python:

a = 1
while a <=10:
print (a*a)
a = a + 1