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

В ответе запишите найденное число без пробелов и знаков препинания.

Question

Информатика

Альбертина

16 марта, 00:39

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

В ответе запишите найденное число без пробелов и знаков препинания.

+4

Ответы (1)

Знаете ответ?

Эдик · Answer 1

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.