12 lines
208 B
Plaintext
12 lines
208 B
Plaintext
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
|