Автор - nataly012 10 лет назад

Составить программу, которая находит минимальное натуральное число х, такое, что остаток от деления х на 10 равен 9, остаток от деления х на 9 равен 8, остаток от деления х на 8 равен 7, … остаток от деления х на 2 равен 1.
В ответе запишите найденное число без пробелов и знаков препинания.

Ответ

Автор - TaTaPmember

var a,b:integer;
begina:=1;
while b=0 do
begin
if (a mod 10=9) and (a mod 9=8) and (a mod 8=7) and (a mod 7=6) and (a mod 6=5) and (a mod 5=4) and (a mod 4=3) and (a mod 3=2) and (a mod 2=1) and (a mod 1=0) then
begin
b:=a;
end;
a:=a+1;
end;
write(b);
end.

Предыдущий вопрос Следующий вопрос

Ответы и объяснения

Сервис носит ознакомительный характер, вся информация, а в частности вопросы и ответы, которые задают и отвечают пользователи.