Срочно 50 баллов напишите программу которая подсчитает сумму натуральных чисел от 1 до n
104
ОТВЕТЫ
Var i,s,n: Integer;
begin
readln(n);
for i := 1 to n do begin
s := s + i;
end;
writeln(s);
end.
begin
readln(n);
for i := 1 to n do begin
s := s + i;
end;
writeln(s);
end.
19
Отв. дан
Для написания вопросов и ответов необходимо зарегистрироваться на сайте
Другие вопросы в разделе - Информатика
Gavinragrinn
Какого типа данных в СУБД Access не существует? текстового ...
2019-02-10 04:04:43
Sosozid
Какими жестами пользуются судьи во время футбольного матча ...
2019-02-10 04:01:51
Модест
Вождь племени мульти поручил своему министру разработать двоичный код ...
2019-02-10 04:01:28
Ariris
Впишите в клеточки словам ответы. ...
2019-02-10 04:00:38