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

9 lines
159 B
ObjectPascal

program UserInput(input, output);
var i : Integer;
s : String;
begin
write('Enter an integer: ');
readln(i);
write('Enter a string: ');
readln(s)
end.