Ввести с клавиатуры натуральное число A. Вывести на экран сумму всех чисел от 1 до A включительно

@net_haker1 · Регистрация: 02.10.2013

Студворк — интернет-сервис помощи студентам

Ввести с клавиатуры натуральное число A. Вывести на экран сумму всех чисел от 1 до A включительно. Пример:Ввод:5,вывод:15.
Пример2:Ввод:100,вывод:5050.

@serfer9733 · 09.12.2013, 11:06

Pascal

var
s,a,i:integer;
begin
readln(a);
s:=0;
for i:=1 to a do
s:=s+i;
writeln(s);
end.

@net_haker1 0 / 0 / 2 Регистрация: 02.10.2013 Сообщений: 155
		1
	Ввести с клавиатуры натуральное число A. Вывести на экран сумму всех чисел от 1 до A включительно 09.12.2013, 10:26. Показов 4193. Ответов 1 Метки нет (Все метки) Ввести с клавиатуры натуральное число A. Вывести на экран сумму всех чисел от 1 до A включительно. Пример:Ввод:5,вывод:15. Пример2:Ввод:100,вывод:5050. 0

Опции темы

Ввести с клавиатуры натуральное число A. Вывести на экран сумму всех чисел от 1 до A включительно

Решение