Initial data commit
This commit is contained in:
parent
72d218235f
commit
f23f22d71c
199087 changed files with 3378941 additions and 0 deletions
14
Task/User-input-Text/Modula-3/user-input-text.mod3
Normal file
14
Task/User-input-Text/Modula-3/user-input-text.mod3
Normal file
|
|
@ -0,0 +1,14 @@
|
|||
MODULE Input EXPORTS Main;
|
||||
|
||||
IMPORT IO, Fmt;
|
||||
|
||||
VAR string: TEXT;
|
||||
number: INTEGER;
|
||||
|
||||
BEGIN
|
||||
IO.Put("Enter a string: ");
|
||||
string := IO.GetLine();
|
||||
IO.Put("Enter a number: ");
|
||||
number := IO.GetInt();
|
||||
IO.Put("You entered: " & string & " and " & Fmt.Int(number) & "\n");
|
||||
END Input.
|
||||
Loading…
Add table
Add a link
Reference in a new issue