Pascal 問題

program bbke;

uses crt;
var r : char;

begin

clrscr;

writeln('xxxxxxxxxxxxx');
writeln('xxxxxxxxxxxxx');
writeln('xxxxxxxxxxxxx');
writeln('xxxxxxxxxxxxx');

r := readkey;
clrscr;

writeln('yyyyyyyyyyyyy');
writeln('yyyyyyyyyyyyy');
writeln('yyyyyyyyyyyyy');

end.



會顯以下結果:

在第一頁顯示
xxxxxxxxxxxxx
xxxxxxxxxxxxx
xxxxxxxxxxxxx
xxxxxxxxxxxxx
在第二頁顯示
yyyyyyyyyyyyy
yyyyyyyyyyyyy
yyyyyyyyyyyyy

只要係var前打 uses crt;
再係begin下面打 clrscr;
咁樣每次run個program就會清除之前d記錄(just睇到你是次的結果)
示範:
同前面個個朋友一樣

program xxx;
uses crt;
begin
clrscr;
write.................(後面省略)

Pascal同ClrScr是what來架?