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

Question

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

Comments

Паскаль.Циклические алгоритмы

Answer 1

VAR
   n, sum, i : LongInt;
BEGIN
   Read(n);

   For i := 1 to n do
      sum := sum + Sqr(i);

   Write(sum);
END.

Comments

Окей, а какие переменные вводить?

---

А, стоп, не ту задачу смотрю. Сча проверю в проге)

---

Сошлось. благодарю)

---

всегда пожалуйста ;)

---

С радостью сделала бы ваш ответ лучшим, но не знаю, куда тыкнуть)