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

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