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

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


нужно написать программу
Добавить
  • 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.
    Добавить
  • Ваш ответ