RosettaCodeData/Task/User-input-Text/Forth/user-input-text-3.fth

: INPUT# ( -- n true | d 1 | false )
   16 INPUT$ SNUMBER? ;