Регистрация
Войти
Стать экспертом Правила
Информатика

Напишите программу, которая запрашивает число N, а затем считает сумму чисел от 1 до N включительно, т.е. 1+2+3...+N

ОТВЕТЫ

program abc

var

i,res:integer;

begin

res:=0

for i:=1 to 100 do  

 res:=res+i;

end. //не уверен что сработает, но должно

134
Контакты
Реклама на сайте
Спрошу
О проекте
Новым пользователям
Новым экспертам