6 lines
92 B
ObjectPascal
6 lines
92 B
ObjectPascal
begin
|
|
var ms := ReadInteger;
|
|
Print('Sleeping...');
|
|
Sleep(ms);
|
|
Print('Awake!');
|
|
end.
|