RosettaCodeData/Task/Binary-digits/RapidQ/binary-digits.rapidq

'Convert Integer to binary string
Print "bin 5 = ", bin$(5)
Print "bin 50 = ",bin$(50)
Print "bin 9000 = ",bin$(9000)
sleep 10