Возвести в четвертую степень числа от -10 до -1 . и в пятую степень числа от 1 до 10. напишите, , программу в паскале

//PascalABC.NET (версия 3.1, сборка 1198 от 11.03.2016)
begin
// 4 степень от -10 до -1
for var i:=-10 to -1 do print(sqr(sqr(i)));
println;
// 5 степень от 1 до 10
for var i:=1 to 10 do print(sqr(sqr(i))*i);
end.