Question

составьте программу, вычисляющую сумму квадратов чисел от 1 до введённого вами целого числа n.
ПОМОГИТЕ ПОЖАЛУЙСТА ПОЖАЛУЙСТА ПОЖАЛУЙСТА ПОЖАЛУЙСТА ПОЖАЛУЙСТА

Answer 1

                                                PascalABC.NET

begin

var (N,Sum) := (ReadInteger,0);

for var i := 1 to N do

  Sum +=sqr(i) ;

  Print(Sum)

end.