Anonymous user
Balanced ternary: Difference between revisions
→{{header|МК-61/52}}
Line 3,366:
=={{header|МК-61/52}}==
{{trans|Glagol}}
<lang mk-61>
ИП0 /-/ x<0
ИП0 ^ ^ 3 / [x] П0 3 * - П1
ИП1 x=0
ИП1 1 - x=0
0 ПП
ИП1 x=0
ИП1 1 - x=0
ИП3 x#0
8 + ИП5 * ИП4 + П4 ИП5 1 0 * П5
''Note: the "-", "0", "+" denotes by digits, respectively, the "7", "8", "9"
=={{header|OCaml}}==
|