10 *
PRINT
PRINT "enter data ":
INPUT DATA
IF DATA='' THEN STOP
PRINT "enter conversion code ":
INPUT CONV
PRINT "FORMAT: ":DATA CONV
PRINT "ICONV : ":ICONV(DATA,CONV)
PRINT "OCONV : ":OCONV(DATA,CONV)
GO 10