回 帖 发 新 帖 刷新版面

主题:[原创]怎样让PASCAL死循环并且退不出来?

怎样让PASCAL死循环并且退不出来?

回复列表 (共28个回复)

21 楼

while true do 
  ……
end;

22 楼

好无聊又好有趣的帖阿。。。。。。
while 1+1=2 do
begin
  i:=1000;
end;
呵呵

23 楼

yun

24 楼


按ctrl+break就退出了.

25 楼

么办法啊!ctrl+break很强啊!实在不行自己编个补丁,把ctrl+break禁了

26 楼

ctrl+pause break

27 楼

uses crt;
begin
  while true do
   begin
     ...
   end;
end.
这样就退不出来了.

28 楼


第一种:
repeat
  //代码
until false;

第二种
while true do //代码
;

第三种
var i:integer;
for i:=1 to 3 do
begin
  i:=1;
  //代码
end;

第四种
label 1;
begin
  1:
  //代码
  goto 1;
...
end;

我来回复

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