Составить Метод поиска 4-х значного числа ,которое при дроблении на 133

Составить Метод поиска 4-х значного числа ,которое при дроблении на 133 даёт в остатке 125, а при дроблении на 134 даёт в остатке 111.

Задать свой вопрос
1 ответ

program senya;

var

a1, a2, a3, a4: integer;

begin

for a1 := 1 to 9 do

for a2 := 0 to 9 do

for a3 := 0 to 9 do

for a4 := 0 to 9 do

if (a1 * 1000 + a2 * 100 + a3 * 10 + a4) mod 133 = 125 then

writeln (a1,a2,a3,a4);

if (a1 * 1000 + a2 * 100 + a3 * 10 + a4) mod 134 = 111 then

writeln (a1,a2,a3,a4);

end.

, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт