Нужно написать программу в паскале.

На вход поступает некое целое число икс (х). Х принадлежит промежутку (-30000; 30000)

Если Х четное и делится на 5 то выводится соответствующая надпись. Если нет - надпись не выводится

Question

Информатика

Исак

20 июля, 08:22

Нужно написать программу в паскале.

На вход поступает некое целое число икс (х). Х принадлежит промежутку (-30000; 30000)

Если Х четное и делится на 5 то выводится соответствующая надпись. Если нет - надпись не выводится

+2

Ответы (1)

Знаешь ответ?

Беата · Answer 1

Var

number : integer;

begin

number : = Random (-30000, 30000);

if ((number mod 2 = 0) and (number mod 5 = 0)) then

writeln ('X удовлетворяет условию')

else

writeln ('X не удовлетворяет условию');

end.