8 lines
232 B
Text
8 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
|