HOME | Карта сайта
tank989898
ответ дан

Напишите программу на Паскале. Дано натуральное число N. Найти сумму квадратов всех натуральных чисел от 1 до N.

Ответ :

Incaze
Вот так вот получается.
Посмотреть изображение Incaze
JustPeople
VAR
   n, sum, i : LongInt;
BEGIN
   Read(n);

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

   Write(sum);
END.

Другие вопросы - Информатика

znanija.uk.to