Напечатать таблицу значений функции y=x^2 от -10 до 10 с шагом 1

//PascalABC.NET
//Версия 3.3.5, сборка 1650
begin
writeln(' x   y');
for var i:=-10 to 10 do writeln(i:2,' ',i*i:3);
end.