profile
Опубликовано 6 лет назад по предмету Информатика от agafonovanadeg

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

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

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

ВВОД ВЫВОД
5 1
10 2

Загрузите исходный код программы

Укажи язык программирования

  1. Ответ
    Ответ дан simbion0
    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.

    Pascal ABC
    1. Ответ
      Ответ дан olechka0476
      При вводе данного ответа пишет "частичное решение", подскажите, что не правильно я делаю, где ошибка? Язык ввода выставляю PascalABC.NET
    2. Ответ
      Ответ дан olechka0476
      Всё спасибо, решение нашла:var n:integer;
      begin readln(n);
      if n mod 10 = 0 then write(2) else write(1);
      end.
Самые новые вопросы