Ятот
21.12.2021 12:55

Найдите сумму чисел, кратных 5 от 1 до n(паскаль)

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
Gulya6922
05.10.2020 15:02
Var
N,S:integer;
Begin
S:=0;
ReadLn(N);
For N:= 1 to N do
   if N mod 5 = 0 then S:=S+N;
WriteLn('S = ',S);
End.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота