Anonymous user
User input/Text: Difference between revisions
no edit summary
(added perl6) |
No edit summary |
||
Line 697:
pull i
end</lang>
=={{header|Retro}}==
<lang Retro>: example ( "- )
remapping off
"Enter a string: " puts 10 accept tib tempString
[ "Enter 75000: " puts getToken toNumber 75000 = cr ] until
"Your string was: '%s'\n" puts
remapping on ;</lang>
=={{header|Ruby}}==
| |||