RosettaCodeData/Task/Binary-digits/Prolog/binary-digits.pro
Ingy döt Net 6f050a029e update
2013-06-05 21:47:54 +00:00

2 lines
79 B
Prolog

binary(X) :- format('~2r~n', [X]).
main :- maplist(binary, [5,50,9000]), halt.