Напишите программу, которая вводит натуральное число N и находит сумму всех натуральных чисел от 1 до N .
Входные данные
Входная строка содержит единственное целое число N .
Выходные данные
Программа должна вывести сумму натуральных чисел от 1 до введённого числа N .
Примеры
входные данные
100
выходные данные
5050
Вот,программа на языке 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.
Объяснение: