Составьте алгоритм вычисления суммы всех натуральных чисел, не превышающих заданного натурального числа N. Напишите программу на Паскале.
Составьте алгоритм вычисления суммы всех натуральных чисел, не превышающих заданного натурального числа N. Напишите программу на Паскале.
Гость
Ответ(ы) на вопрос:
Гостьvar sum,n,i:integer; begin readln(n); sum:=0; for i:=1 to n do sum:=sum+i; writeln(sum); readln; end.
Не нашли ответ?
Похожие вопросы