3. Числа Майя Ограничение времени 1 секунда
Ограничение памяти 64Mb
Ввод стандартный ввод или input.txt
Вывод стандартный вывод или output.txt
Майя – цивилизация Центральной Америки, известная благодаря своей письменности, искусству, архитектуре, математической и астрономической системам. Расцвет их цивилизации приходится на первое тысячелетие нашей эры. Хотя тягловые животные и колесо им были неизвестны, Майя достигли больших успехов в сельском хозяйстве, архитектуре и гончарном производстве. Но более всего удивляют их достижения в астрономии и математике. Например, Майя определили, что солнечный год равен 365.242 дней (современные измерения – 365.242198), лунный цикл – 29.5302 дней (современные измерения – 29.53059). Такие точные астрономические измерения не возможны без развитой системы счета.
В этой задаче мы познакомимся с системой счисления Майя. Жрецы майя и астрономы использовали систему счисления с основанием 20. Их система оперировала понятиями цифры и нуль, что весьма необычно для того времени. Оба эти понятия были совершенно неизвестны населению средневековой Европы. Первые двадцать цифр двадцатеричной системы представляются точками и тире в соответствии со следующей таблицей:
Нуль изображался в виде стилизованной раковины от устрицы. Числа, состоящие из нескольких цифр (т.е. числа больше 19) записывались вертикально снизу вверх (от младших разрядов к старшим). Например, число 79 запишется как
Очень четко прослеживается влияние календарной системы Майя, так как начальным числом третьего порядка является не 400 (20x20), как это ожидается, а 360, т.е. во втором разряде используются только 18 цифр. Все остальные разряды используют все 20 цифр.
Таким образом, число 13495 (1x7200+17x360+8x20+15) запишется следующим образом
Напишите программу для перевода чисел из системы счисления Майя в десятичную.
Формат ввода
Во входном файле записано одно число в системе счисления Майя. Первая строка содержит число N (1 ≤ N ≤ 14) – количество разрядов в записи числа. В каждой из последующих N строк с точек (.) и дефисов (-) записаны цифры. Для обозначения нуля используется заглавная буква S.
Формат вывода
В выходной файл выведите число в десятичной системе счисления.
Пример 1
Ввод Вывод
1
..
2
Пример 2
Ввод Вывод
2
...
S
60
Пример 3
Ввод Вывод
4
.
..-—
...-
---
Оператор mod возвращает остаток от деления. Четное число – такое, остаток от деления которого на 2 равен нулю.
Функция int возвращает целую часть дробного числа. С её можно реализовать mod (
– примерно то же самое, что и 
) или сравнить результат умножения на 2 целой части результата деления исходного числа на 2 с исходным числом.
Код:
begin
var a := ReadInteger();
writeln(a mod 2 = 0);
writeln(a - 2 * int(a / 2) = 0);
writeln(a = 2 * int(a / 2));
end.
Пример ввода:
5
Пример вывода:
False
False
False
Пример ввода:
42
Пример вывода:
True
True
True