Hello, guys, and thank you in advance!
I am trying to make the program stop running for six seconds. I don't know, however, how to use the system clock. The code I came up with is something like this:
WRITE ('TYPE ANYTHING TO BEGIN: ');
IF LINE<>'0' THEN
X := RandSeed
S := X + 6000;
UNTIL RandSeed >= S
WRITELN ('END OF TIME!');
It works, somehow, but it's not accurate, atleast not as acurate as a real timer. If somebody can help me, please, do so. Thank you, once more!