Составить программу определения суммы квадратов натуральных чисел от 1 до 25

//PascalABC.NET
//Версия 3.3, сборка 1627
begin
write(range(1,25).Select(x->x*x).Sum);
end.