Лучшие помощники
- Megamozg 2205 б
- Matalya1 1800 б
- DevAdmin 1720 б
- arkasha_bortnikov 900 б
- Dwayne_Johnson 865 б
10 декабря 2022 21:48
590
Составьте алгоритм вычисления суммы всех натуральных чисел, не превышающих заданного натурального числа 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
Остались вопросы?
Еще вопросы по категории Информатика
Вася шифрует русские слова, записывая вместо каждой буквы её код.: А(01) В(011) Д(100) О(111) Р(010) У(001) Некоторые цепочки можно расшифровать...
ПОМОГИТЕ ОЧЕНЬ СРОЧНО НУЖНО СЕГОДНЯ!!!!!!! Продумайте и изобразите в виде графа структуру следующего сайта: " Информатика"( школьный предмет)...
Задача 5: Поезд Два друга-биолога Василий и Петр едут в Африку на поезде. Билеты они покупали в разное время и не смогли получить места в одном вагоне...
Что такое поле в информатике...
У исполнителя омега две команды, которым присвоены номера 1 прибавь б 2 умножь на 2 (б-неизвестное натуральное число) выполняя первую из них, омега...