Заданы два положительных числа х и у .Определите верно ли что одно из них делиться на другое без остатка или нет .Выведите на экран соответствующее сообщение.Помогите пожалуйста

Question

Заданы два положительных числа х и у .Определите верно ли что одно из них делиться на другое без остатка или нет .Выведите на экран соответствующее сообщение.Помогите пожалуйста

Гость

Ответ(ы) на вопрос:

Accepted Answer

var x,y:integer;beginread(x,y);if x mod y = 0 then writeln('Без остатка')else writeln('С остатком');end.