Вывести на экран все числа из промежутка от 1 до n, которые делятся на 2, 3 и 5...

МистерХэ228 @МистерХэ228

August 2022 1 9 Report

Вывести на экран все числа из промежутка от 1 до n, которые делятся на 2, 3 и 5.

Answers & Comments

alamar Var n,i:integer;
begin
readln(n);
for i:=1 to n do
if (i mod 2=0) or (i mod 3=0) or (i mod 5=0) then write(i,' ');
end.

2 votes Thanks 3

Helpful Links

Политика конфиденциальности

Правила и условия

Контакты

Helpful Social

Copyright © 2025 SCHOLAR.TIPS - All rights reserved.