User input/Text: Difference between revisions

Added FreeBASIC
(Added FreeBASIC)
Line 539:
print*, "Enter the integer 75000"
read*, i</lang>
 
=={{header|FreeBASIC}}==
<lang freebasic>' FB 1.05.0 Win64
 
Dim s As String
Dim i AS Integer
Input "Please enter a string : "; s
Do
Input "Please enter 75000 : "; i
Loop Until i = 75000
Print
Print s, i
Sleep</lang>
Sample input/output
{{out}}
<pre>
Please enter a string : ? Rosetta
Please enter 75000 : ? 70000
Please enter 75000 : ? 75000
 
Rosetta 75000
</pre>
 
=={{header|Go}}==
Go has C-like Scan and Scanf functions for quick and dirty input:
9,490

edits