RosettaCodeData/Task/Binary_digits/Forth/binary_digits.fth

5 lines
33 B
Forth

9000 50 5
2 base !
. . .
decimal