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

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

Question

Информатика

Глафира

30 августа, 02:19

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

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

+3

Ответы (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

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