12 lines
205 B
Text
12 lines
205 B
Text
# User input/text, in LIL
|
|
write "Enter a string: "
|
|
set text [readline]
|
|
|
|
set num 0
|
|
while {[canread] && $num != 75000} {
|
|
write "Enter the number 75000: "
|
|
set num [readline]
|
|
}
|
|
|
|
print $text
|
|
print $num
|