Нужно написать программу которая определяет произведение всех чисел кратных 6 и заканчивающиеся на 4

12235110spl 12235110spl    3   21.08.2019 23:00    0

Ответы
DarthTyranus DarthTyranus  05.10.2020 10:33
Var i,n:integer;beginwriteln('Введите кол-во чисел!');readln(n);for i:=1 to n dobeginif (i mod 6=0) and (i mod 10=4) thenwriteln(i);end;end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика