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

нужно написать программу

Question

Информатика

Марга

17 января, 16:39

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

нужно написать программу

+5

Ответы (1)

Знаете ответ на вопрос?

Филиппина · Answer 1

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.

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

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

нужно написать программу