Предмет: Информатика,
автор: nataly012
Составить программу, которая находит минимальное натуральное число х, такое, что остаток от деления х на 10 равен 9, остаток от деления х на 9 равен 8, остаток от деления х на 8 равен 7, … остаток от деления х на 2 равен 1.
В ответе запишите найденное число без пробелов и знаков препинания.
Ответы
Автор ответа:
0
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.
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.
Автор ответа:
0
Не проверял это число, но должно быть все правильно
Автор ответа:
0
какое число написать в ответе?
Автор ответа:
0
2519
Автор ответа:
0
Спасибо!!!!
Похожие вопросы
Предмет: Литература,
автор: toshichan
Предмет: Физика,
автор: annburduzha
Предмет: География,
автор: 200619qwe
Предмет: Алгебра,
автор: Аноним