• 
  • 12 April 2013
  Английский язык
  • Автор: Aisilenok

  

  по введённому номеру года выдать какой это год по восточному календарю.плиз ответьте развёрнуто и понятно.нужно написать в программе паскаль

• 
  • 12 April 2013
  • Ответ оставил: GhostOfYou

  Начало отсчета лет - 1984 год. Надо написать программу (pascalABC). Вводите год, нужный вам, отнимаете от него 1984 и находите остаток от деления на 12. Последовательность животных в 12-летнем цикле - крыса, корова, тигр, заяц, дракон, змея, лошадь, овца, обезьяна, курица, собака, свинья. То есть если при делении на 12 остаток равен 0, значит введенный год - год крысы, если 1 - год коровы и т.д.

  Программа: 

  var a,b,c:longint;
  begin
  write('Введите год: ');
  readln(a);
  c:=a-1984;
  b:=c mod 12;
  case b of
  0:writeln(a,' - год крысы');
  1:writeln(a,' - год коровы');
  2:writeln(a,' - год тигра');
  3:writeln(a,' - год зайца');
  4:writeln(a,' - год дракона');
  5:writeln(a,' - год змеи');
  6:writeln(a,' - год лошади');
  7:writeln(a,' - год овцы');
  8:writeln(a,' - год обезьяны');
  9:writeln(a,' - год курицы');
  10:writeln(a,' - год собаки');
  11:writeln(a,' - год свиньи');
  end;
  end.

  0
• 
  • НЕ НАШЛИ ОТВЕТ?

  Если вас не устраивает ответ или его нет, то попробуйте воспользоваться поиском на сайте и найти похожие ответы по предмету школьной программы: английский язык.
  На сегодняшний день (03.04.2026) наш сайт содержит 244795 вопросов, по теме: английский язык. Возможно среди них вы найдете подходящий ответ на свой вопрос.

  Найти другие ответы
• Нажимая на кнопку "Ответить на вопрос", я даю согласие на обработку персональных данных

  Ответить на вопрос

Последние опубликованные вопросы