RosettaCodeData/Task/User-input-Text/Oberon/user-input-text.oberon
2023-07-01 13:44:08 -04:00

11 lines
221 B
Text

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.