RosettaCodeData/Task/Binary-digits/Prolog/binary-digits.pro
2023-07-01 13:44:08 -04:00

2 lines
79 B
Prolog

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