10 lines
120 B
ObjectPascal
10 lines
120 B
ObjectPascal
|
|
begin
|
|
writeln('1');
|
|
sleep(1000);
|
|
writeln('2');
|
|
sleep(1000);
|
|
writeln('3');
|
|
sleep(1000);
|
|
writeln('4');
|
|
end. |