Двое играют в следующую игру. Дано число 0. Разрешается прибавить к текущему числу любое...

Question

Двое играют в следующую игру. Дано число 0. Разрешается прибавить к текущему числу любое натуральное число от 1 до 9. Выигрывает тот, кто получит число N . Кто выигрывает при правильной игре?
ВХОДНЫЕ ДАННЫЕ

Вводится одно натуральное число N ( 1 ≤N≤ 10000).
ВЫХОДНЫЕ ДАННЫЕ

Выведите 1, если выигрывает первый игрок (тот, кто ходит первым), или 2, если выигрывает второй игрок.
ПРИМЕРЫ
ВВОД ВЫВОД

5
1

10
2
ПОМОГИТЕ РЕШИТЬ!

Answer 1

Pascal ABC
__________

Var
a,b,n:integer;
Begin
Readln(n);
While (a<>n) or (b<>n) do begin
Read(a);
if a=n then write('1') else begin
Read(b);
if b=n then write('2');
end;
end;
end.