В старояпонском календаре был принят 12-летний цикл. Годы внутри цикла носили названия животных: крысы, коровы, тигра, зайца, дракона, змеи, лошади, овцы, обезьяны, курицы, собаки и свиньи. Написать программу, которая вводит номер некоторого года и печатает его название по старояпонскому календарю. (Справка: 1996 г. — год Крысы — начало очередного цикла.) — Pascal(Паскаль)

Program Japan;

Var
  year: integer;

begin
  write('Ваш год рождения : ');
  readln(year);
  case year mod 12 of
    0:
      write('Год обезьяны');
    1:
      write('Год петуха');
    2:
      write('Год собаки');
    3:
      write('Год кабана');
    4:
      write('Год крысы');
    5:
      write('Год быка');
    6:
      write('Год тигра');
    7:
      write('Год кролика');
    8:
      write('Год дракона');
    9:
      write('Год змеи');
    10:
      write('Год лошади');
    11:
      write('Год овцы');
  end;

end.