回 帖 发 新 帖 刷新版面

主题:[活动]谁能解答PASCAL问题(回者有分)

[size=3]1.有没有清屏语句?
2.为什么运行结果必须再运行一下才能看到?
3.介绍一下PASCAL里的的语句.
回多少给多少分![/size]

回复列表 (共5个回复)

沙发

有两种过程:
ClrEol:清除当前行光标所在位置以后所有字符
ClrScr:清除当前窗口或屏幕,光标返回到左上角
(具体见pascal中级本(蓝色书面)第282页表4中(crt单元中部分常用过程与函数)的第2、3两行)

可以不用再次运行,按下Alt+F5即可看见运行窗口,建议lz用Free Pscal,它与Windows XP容易产生冲突,运行,输出之后不会立刻跳出,而是Windows给出的错误指令,按下“确定”后才回跳出输出窗口

这个语句吗......详见pascal中级本(蓝色书面)的附录7(278页--283页):Pascal标准库单元中的过程与函数

板凳

在program后、const/label前加上:
uses crt;
然后在程序随意位置前加上clrscr;即可。

3 楼

2、那当然。因为你没运行程序程序结果不可能知道(除非是定值)
3、(咋讲呢。。。/?)
赋值语句(正则表达式)
if。。then。。(else。。) 语句
for语句                         }循环语句
while/repeat。。。until语句     }
数组
过程/函数
链表
记录类型
还有一些单元里的语句。。。。(太多了,在此忽略)
比如:
a:array [1..1000] of longint;
readln(n);
procedure main;
function check:boolean;
while i<n do
begin
  if i<n-1 then writeln(i)
           else writeln(n);
end;
repeat readln(n);until eof;
new(p);
p^.next:=q;
p.data:=n;

with p do
  data:=n;

for i:=1 to n do
  write(i);

a:=a+b;
等等,很多拉。。。。

4 楼

多谢!

5 楼

没事,以后有问题发到我邮箱

我来回复

您尚未登录,请登录后再回复。点此登录或注册