Ввести натуральное число и определить сумму натуральных чисел - Pascal ABC
Формулировка задачи:
вводит натуральное число и определяет сумму натуральных чисел
Решение задачи: «Ввести натуральное число и определить сумму натуральных чисел»
textual
Листинг программы
write('n=');readln(n);
s := (1+n)*n div 2;
WriteLn(s);