Людиии,допоможіть написати програму обчислення суми квадратів n перших натуральних чисел

Question

Людиии,допоможіть написати програму обчислення суми квадратів n перших натуральних чисел

Answer 1

Var i, n, s: integer;
begin
     readln(n);
     for i := 1 to n do s := s + n;
     writeln(s);
end.

Comments

дякууую)