Data commit
This commit is contained in:
parent
7387c8f97b
commit
cb5bb5e222
199093 changed files with 3378972 additions and 0 deletions
11
Task/User-input-Text/Oberon-2/user-input-text.oberon
Normal file
11
Task/User-input-Text/Oberon-2/user-input-text.oberon
Normal file
|
|
@ -0,0 +1,11 @@
|
|||
MODULE InputText;
|
||||
IMPORT
|
||||
In,
|
||||
Out;
|
||||
VAR
|
||||
i: INTEGER;
|
||||
str: ARRAY 512 OF CHAR;
|
||||
BEGIN
|
||||
Out.String("Enter a integer: ");Out.Flush();In.Int(i);
|
||||
Out.String("Enter a string: ");Out.Flush();In.String(str);
|
||||
END InputText.
|
||||
Loading…
Add table
Add a link
Reference in a new issue