Procedure ClrScr ;
ClrScr clears the current window (using the current colors), and sets the cursor in the top left corner of the current window.
None.
Program Example8;
uses Crt;
{ Program to demonstrate the ClrScr function. }
begin
Writeln('Press any key to clear the screen');
ReadKey;
ClrScr;
Writeln('Have fun with the cleared screen');
end.