ИФК: свое решение задачи, заданной Сергеем Колотовым прислал нам Антон Сидоренко (Logic games) из п.Мурмаши, Мурманской области:
КОРР: Хочу предложить вам процедуру-календарь. Сделать ее предложил Сергей Колотов. Правда, он предложил не только это, но календарь - единственная понравившаяся мне задача.
Вот мой вариант: DE - год, C - месяц;
|
LD |
A, C |
|
ADD |
A,248 |
|
SBC |
A,248 |
|
OR |
30 |
|
DEC |
C |
|
DEC |
C |
|
RET |
NZ |
|
LD |
A, E |
|
AND |
252 |
|
CP |
E |
|
LD |
A,29 |
|
SBC |
A, C |
|
RET |
Длина процедуры 18 байт.