На вход программе подаются два целых числа m и n, по модулю не превосходящие 10 в 6 степени. Если m делится на n или n делится на m, то требуется вывести 1, в противном случае - любое другое число.
Паскаль? Бейсик? Си?
паскаль
Var n,m:longint; Begin Read(n,m); Write((n mod m)*(m mod n)+1) End.
да
вы написали программу , при которой выдается не рандомное число
Чем программа не соответствует условию?
А где в условии сказано, что нужно выдать рандомное?
в противном случае - любое другое число
Любое, но не единицу. Так и есть - в чём проблема?
Если делится - единицу, в противном случае - всё, что угодно, кроме единицы.
вы уверены ,что это правильное решение?
Любое, и случайное - разные вещи\\ Да, уверен.
Хорошо. Спасибо