mila2086
09.02.2023 08:49

Вводится одно целое число не превосходящие 104 подсчитать сумму чисел до 1 и до 104

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
dedmoros1234567
23.06.2020 03:27
Var
a,i,n:integer
begin
Readln(a);
for i:=a to 1 do
n:=n+I;
writeln(n);
end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота