Question

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

Входные данные
Входная строка содержит единственное целое число N .

Выходные данные
Программа должна вывести сумму натуральных чисел от 1 до введённого числа N .

Примеры
входные данные
100
выходные данные
5050

Answer 1

Ответ:

Вот,программа на языке Pascal

program summa;

var n,a,c: integer;

begin

readln(n);

a:=0;

c:=1;

repeat

a:=a+c;

inc(c);

until c>n;

writeln(a);

end.

Объяснение: