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

antanika2000 antanika2000    1   27.06.2019 04:50    1

Ответы
Стивен12 Стивен12  21.07.2020 19:00
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.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика