• Напишите программу которая вычисляет сумму квадратов первых n натуральных чисел. по циклу for...to...do

Ответы 1

  • var   n, i: integer; // объявляем переменные целочисленного типа.   sum : real;   // объявляем переменную вещественного типа.begin   writeln(\' Введите положительное число:\'); // вывод строки.  readln (n);    // считываем значение числа, введенное с клавиатуры.  for i:= 1 to n do  // начало цикла.    begin        sum:= sum + power(i, 2);  // считаем сумму квадратов на каждом шаге цикла.    end;  writeln(\' Сумма квадратов натуральных чисел от 1 до \',n ,\' равна: \', sum); // вывод строки.end.

  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years