Лучшие помощники
- Megamozg 2190 б
- Matalya1 1800 б
- DevAdmin 1695 б
- arkasha_bortnikov 860 б
- Dwayne_Johnson 845 б
10 декабря 2022 21:48
514
Составьте алгоритм вычисления суммы всех натуральных чисел, не превышающих заданного натурального числа N. Напишите программу на Паскале.
1
ответ
var sum,n,i:integer;
begin
readln(n);
sum:=0;
for i:=1 to n do
sum:=sum+i;
writeln(sum);
readln;
end.
begin
readln(n);
sum:=0;
for i:=1 to n do
sum:=sum+i;
writeln(sum);
readln;
end.
0
·
Хороший ответ
12 декабря 2022 21:48
Остались вопросы?
Еще вопросы по категории Информатика
Доступ к файлу table.xls, находящемуся на сервере home.ru, осущесвляется по протоколу ftp. В таблице фрагменты адреса файла закодированы буквами от А...
Что я не правильно написал в коде? names = [] while True: name = input() if name == "и другие": &nbs...
Для кодирования некоторой последовательности, состоящей из букв А, Б, В, Г, решили использовать неравномерный двоичный код, удовлетворяющий условию Фа...
Классификации компьютеров: по назначению, уровню специализации, типоразмерам, совместимости....
Производится двухканальная (стерео) звукозапись с частотой дискретизации 32 кГц и 32-битным разрешением. Результаты записи записываются в файл, сжатие...
Все предметы 
