7 lines
232 B
Text
7 lines
232 B
Text
make "input readlist ; in: string 75000
|
|
show map "number? :input ; [false true]
|
|
|
|
make "input readword ; in: 75000
|
|
show :input + 123 ; 75123
|
|
make "input readword ; in: string 75000
|
|
show :input ; string 75000
|