Найти значение выражения 1*1+2*2+…+n*n

Задача

Дана последовательность следующего вида: 1*1+2*2+...+n*n, где n - целое число, вводимое пользователем. Подсчитать сумму произведений и вывести на экран.

Решение

Данный пример последовательности - это сумма квадратов натуральных чисел. Для нахождения суммы выражения организуем цикл, в котором каждый раз к сумме будем добавлять очередной квадрат числа.

Пример

Uses Crt;
Var
	n,s,i : Integer;

Begin
	ClrScr;
	Write('n = ');
	Readln(n);
	s:=0;
	For i:=1 to n do
		s:=s+i*i;
	Writeln('s = ',s);
	Readln
End.

Описание примера

Натуральные числа (естественные числа) — числа, возникающие естественным образом при счёте (как в смысле перечисления, так и в смысле исчисления).