Anonymous user
User Input: Difference between revisions
added standard ml
(added standard ml) |
|||
Line 343:
(display "String = ") (display str)
(display "Integer = ") (display num)</lang>
=={{header|Standard ML}}==
<lang sml>print "Enter a string: ";
let val str = valOf (TextIO.inputLine TextIO.stdIn) in
print "Enter an integer: ";
let val num = valOf (TextIO.scanStream (Int.scan StringCvt.DEC) TextIO.stdIn) in
print (str ^ Int.toString num ^ "\n")
end
end</lang>
=={{header|Tcl}}==
|