Предмет: Другие предметы,
автор: Vladiala
Разработайте алгоритм и программу определения суммы всех натуральных чисел от 10 до n. Pascal
Ответы
Автор ответа:
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:
поставь лайк пж
Интересные вопросы
Предмет: Окружающий мир,
автор: Кристина188934126
Предмет: Английский язык,
автор: Аноним
Предмет: Окружающий мир,
автор: sashapeskov4761
Предмет: Немецкий язык,
автор: Аноним
Предмет: Обществознание,
автор: eremina2003eryomina