Сумма квадратов ряда чисел

AvariItigail

циклы 22 апреля 2016

По данному натуральному n вычислите сумму 1^2+2^2+…+n^2.

Входные данные
Вводится единственное число n.

Выходные данные
Необходимо вывести вычисленную сумму.

Исходный код на языке Pascal

var
  n, i, s: integer;

begin
  read(n);
  s := 0;
  for i :=  1 to n do
    s := s + i * i;
  writeln(s);
end.