Вводится натуральное число. найти сумму квадратов всех натуральных чисел от 1 до этого числа.

Question

Информатика: Вводится натуральное число. найти сумму квадратов всех натуральных чисел от 1 до этого числа.

юлия19844 · Answer

VAR   n, sum, i : LongInt;BEGIN   Read(n);   For i := 1 to n do      sum := sum + Sqr(i);   Write(sum);END....