Китайский календарь

Название года по восточному календарю

Размер программы: 72 шага

Программа вычисляет цвет указанного года, соответствующее ему животное и порядковый номер в шестидесятигодичном цикле по восточному (китайскому) календарю.

000: − 4 = STO 1 // [ -4. ]

005: ÷ 60 = INT // [ 0. ]

010: × 60 − RCL 1 // [ -4. ]

016: X<>Y = STO 1 // [ -4. ]

020: ÷ 12 = INT // [ 0. ]

025: × 12 − RCL 1 // [ -4. ]

031: X<>Y = + 1 = // [ -3. ]

036: ÷ 2 10x = STO 0 // [ -0.03 ] M

042: RCL 1 ÷ 10 = // [ -0.4 ] M

048: FRAC × 10 ÷ // [ -4. ] M

053: 2 + 1 = INT // [ -1. ] M

058: M+ RCL 1 + 1 = // [ -3. ] M

064: 10x × RCL 0 = // [ -0.00103 ] M

069: SCI HLT // [ -1.03-03] M HLT

071: (GOTO)+/–0 // >>>> 000

Год бирюзовой (1) овцы (08), 32-й в цикле

Памятка

• Вход в режим набора программы: MODE # (где # — цифра 6, 7, 8 или 9)
• Очистка памяти текущей программы: INV CE/C (в режиме набора)
• Выход из режима программирования: MODE 1Запуск программы: RUN # (где # — цифра 6, 7, 8 или 9)

Работа с программой

1. Первый запуск программы:
  1. - Ввести год (пример: 2015);
    - RUN # (номер программы);
    - Считать значение (пример: 1.08 32 — значит год сине-зеленой {1} овцы {08}, тридцать второй год цикла см. таблицу).
2. Второй и последующие запуски программы:
  1. - Ввести год;
    - RUN;
    - Считать значение.

Программа сломала калькурятор?

После первого запуска программы все следующие результаты калькулятор будет выводить в экспоненциальном режиме (умноженными на 10 в степени n).
Не пугайтесь — это нормально, так было задумано для удобного показа всей необходимой информации на одном экране.
Это было сделано командой [SCI] (Scintific Exponential Mode). Для возврата в обычный режим по умолчанию — команда [FLO] (Floating Mode).

Сверьте результат

Здесь однозначное число до десятичной точки указывает цвет года (колонки 1—5), двузначное число после точки — соответствующее ему животное (строки 01—12), значение степени рядом с годом — порядковый номер года в шестидесятигодичном цикле.

Список литературы

А. Сорокин
1. Вечный календарь // Радио № 12. 1987 г. с. 28.
2. Китайский календарь / Википедия — свободная энциклопедия. URL: http://ru.wikipedia.org/wiki/Китайский_календарь (17.10.2010).