Ответы
Ответ дал:
1
1.Program zadacha1;
2. var
3. s,n : integer;
4.writeln('Введите N');
5. writeln('Введите N');
6.read(n);
7.s:=0;
8.while (n<>0) do
9.begin
10.inc(s,n);
11.dec(n);
12.end;
13.writeln('Сумма = ',s);
14.end.
dddloooooooxddd:
поставь лайк пж
и 5 звёзд
чек ещё одну хелп пж
Похожие вопросы
1 год назад
2 года назад
2 года назад
7 лет назад