пожалуйста. напишите программу, вычисляющую сумму квадратов от 1 до N.
на ABC паскале

// PascalABC.NET 3.1, сборка 1230 от 27.04.2016begin  var n:=ReadInteger('n=');  Writeln('Сумма квадратов от 1 до ',n,' равна ',    1.To(n).Select(x->x*x).Sum)end.Тестовое решениеn= 152Сумма квадратов от 1 до 152 равна 1182180