UC知道Pascal选择题
来源：百度知道 编辑：UC知道 时间：2024/06/15 07:14:32
var a:integer;
begin
assign (input,'abc.in');reset (input);
assign (output,'abc.out');rewrite (output);
.......
.......
if a>5 then __________________
.......
.......
close (input);close (output);
end.
请问:横线上应该填什么?
(A) halt;
(B) begin close (input);close (output);halt;end;
并说明理由
begin
assign (input,'abc.in');reset (input);
assign (output,'abc.out');rewrite (output);
.......
.......
if a>5 then __________________
.......
.......
close (input);close (output);
end.
请问:横线上应该填什么?
(A) halt;
(B) begin close (input);close (output);halt;end;
并说明理由
选B
因为 A在执行Halt 之后,程序没有执行close语句对打开的文件
实行关闭就退出.可能会造成程序结束后,abc.out文件中没有数据.
应该选B,理由是到这个条件的时候就先吧输入输出流关闭,然后退出程序