Информатика, опубликовано 2018-08-22 18:30:29 by Гость

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

Ответ оставил Гость

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.

Не нашли ответа?

Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.