Grey Snail , 1206 байтов для числового ввода / вывода, 149 байтов для одинарного ввода / вывода
Ради забавы. Состав первой программы:
- 451 байт, преобразование числа в точки
- 121 байт, основная функция (отдельная версия написана ниже)
- 634 байта, преобразование точек в число
Возьмите числовой ввод и вывод. Вход A
, B
, C
соответственно. По сравнению с другим (близким) O(1)
ответом, код имеет сложность O(n)
. Но для большого количества это может съесть Вашу память сначала.
Повесьте, если решение не найдено.
INPUT p
POP Z r .!
f
POP Z o .
q
POP Z p [p]
GOTO [Z]
0
POP Z n .
GOTO w
1
POP Z n ..
GOTO w
2
POP Z n ...
GOTO w
3
POP Z n ....
GOTO w
4
POP Z n .....
GOTO w
5
POP Z n ......
GOTO w
6
POP Z n .......
GOTO w
7
POP Z n ........
GOTO w
8
POP Z n .........
GOTO w
9
POP Z n ..........
GOTO w
w
POP Z o .[o][o][o][o][o][o][o][o][o][o][n]
GOTO [r] [p]
GOTO q
!
POP Z A .[o]
INPUT p
POP Z r .@
GOTO f
@
POP Z B .[o]
INPUT p
POP Z r .#
GOTO f
#
POP Z C .[o]
POP H N .[B]
U
POP Z A [A]
POP Z B [B]
GOTO D [A]
GOTO $ [B]
GOTO U
$
POP Z A .[A][C]
POP Z H ..[H]
POP Z B .[N]
GOTO U
D
POP Z r .
POP Z M .
POP Z N ...........
POP Z z .[N]
POP Z V .[H]
+
GOTO l[V] [H]
POP Z H [H]
POP Z z [z]
GOTO ( [z]
GOTO +
(
GOTO ) [H]
POP Z z .[N]
POP Z M ..[M]
POP Z V .[H]
GOTO +
)
POP Z r .0[r]
POP Z M ..[M]
POP Z H .[M]
POP Z M .
POP Z V .[H]
POP Z z .[N]
GOTO +
l
POP Z r .0[r]
GOTO -
l.
POP Z r .1[r]
GOTO -
l..
POP Z r .2[r]
GOTO -
l...
POP Z r .3[r]
GOTO -
l....
POP Z r .4[r]
GOTO -
l.....
POP Z r .5[r]
GOTO -
l......
POP Z r .6[r]
GOTO -
l.......
POP Z r .7[r]
GOTO -
l........
POP Z r .8[r]
GOTO -
l.........
POP Z r .9[r]
GOTO -
-
GOTO / [M]
POP Z H .[M]
POP Z M .
POP Z V .[H]
POP Z z .[N]
GOTO +
/
OUTPUT [r]
f
(возможно) рекурсивная функция для преобразования целых чисел в точки Аргумент сохраняется в [p]
и выводится в [o]
.
U
является функцией тестирования S1>=S2
, сохраняющей параметр B, A
при сохранении A-B
в A
.
Код, начиная с D
заглушки, превращает точки в числа.
Основополагающий принцип такой же, как и в моем ответе C (срывая ложные данные для невозможных решений).
Автономная версия, 149 156 157 167 170 230 байты, поддерживают только унарный ввод / вывод
Ввод должен быть точками, например, ..........
для 10
.
INPUT A
INPUT B
INPUT C
POP N H .
GOTO U
$
POP N A .[A][C]
POP Z H ..[H]
U
POP Z A [A]
POP Z N ..[N]
GOTO D [A]
GOTO $ .[B] [N]
GOTO U
D
OUTPUT .[H]
U
рассчитывает A=A-B
и переходит к D
когда A<=0
. В противном случае $
назначается A+C
для A
и вызова U
.
Повесьте, если решение не найдено.
Трюки: злоупотребляйте способностью "компилятора" интерпретировать пустую строку. Вы можете срывать условия в GOTO
заявлении, чтобы сделать безусловные прыжки, и тот же трюк работает для POP
.
Замечание: я могу сыграть в гольф больше на 3 байта, но при этом мой и WheatWizard ответ будут иметь точно такую же логику. В результате, вероятно, самое короткое решение GraySnail, и я пытаюсь доказать это.