Составьте таблицу в екселе. В старояпонском календаре был принят шестидесятилетний цикл,...

Question

Составьте таблицу в екселе. В старояпонском календаре был принят шестидесятилетний цикл, состоящий из пяти двенадцилетних подциклов. Подциклы обозначались названиями цветов: зеленый, красный, желтый, белый и черный. Внутри каждого подцикла года носили название животных: крысы, коровы, тигра, зайца, дракона, змеи, лошади, овцы, обязьяны, курицы, собаки и свиньи. Например, 1924 год - год начала очередного цикла- назывался годом зеленой крысы. Создайте таблицу, в которой по заданому году(большем 1924) определяется: животное и цвет. Используйте функции ОТБР И ОСТАТ

Answer 1

Вывод цвета - точно также, как вывод животного, только не по модулю 12, а по модулю 5.

const c:array[0..4]of string={'зеленый', 'красный', 'желтый','белый','черный'};
z:array[0..11]of string={'крысы','коровы','тигра','зайца','дракона','змеи','лошади',
'овцы','обезьяны','курицы','собаки','свиньи'};
var n:integer;
begin readln(n); n:=n-1984; writeln(c[n mod 5],' ',z[n mod 12]); readln end.

Вот! Будь проще.. .
А если хочешь, чтобы календарь работал почти всю эру, то вместо 1984 напиши 4.

Comments

У тебя все правильно канешь, но это в паскале, а я в экселе просила