Срочно 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
Модест
Вождь племени мульти поручил своему министру разработать двоичный код ...
2019-02-10 04:01:28
Doakkasag
Запишите числа в развернутой форме: 345(10), 11001(2), 327(8), DEA,FB(16), ...
2019-02-10 03:58:41
Malalore
Перевести согласно варианта по журналу двоичные числа в десятичные ...
2019-02-10 03:58:27