Кратно ли заданное число 5 или 6; если нет, вывести остаток от деления ** 4

Question

Кратно ли заданное число 5 или 6; если нет, вывести остаток от деления на 4

Comments

Какой язык программирования?

Answer 1

===Pascal ABC.Net===

program brainly;

var

 number :integer;

begin

 Write('Введите число: ');

 ReadLn(number);

 if (number mod 5 <> 0) and (number mod 6 <> 0) then Write('Результат: ', number mod 4);

end.