Заданы два положительных числа х и у .Определите верно ли что одно из них делиться на другое без остатка или нет .Выведите на экран соответствующее сообщение.Помогите пожалуйста
Var x,y:integer;beginread(x,y);if x mod y = 0 then writeln(Без остатка)else writeln(С остатком);end.
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
