Произвольное число х вводится с клавиатуры.определить:является ли это число четным,кратно ли 3,крaтно ли 5 нужно написать программу

Question

Произвольное число х вводится с клавиатуры.определить:является ли это число четным,кратно ли 3,крaтно ли 5 нужно написать программу

Гость

Ответ(ы) на вопрос:

Accepted Answer

var x:integer; begin write('введите число х='); readln(x); if x mod 2 = 0 then writeln('Число четное'); if x mod 3 = 0 then writeln('Число кратно 3'); if x mod 5 = 0 then writeln('Число кратно 5'); end.