回 帖 发 新 帖 刷新版面

主题:为什么出现102错误

program fileex02(fdat,output);
var fdat:text;
    x,y:integer;
begin
rewrite(fdat);
x:=10;y:=54;
writeln(fdat,x:6,y:6);
writeln(fdat,2*x:6,2*y:6);
end.
我是对着书写的,但为什么编译不通过啊???

回复列表 (共3个回复)

沙发

文件操作问题

板凳

'rewrite(fdat);'我想这个意思应该是read(fdat);write(fdat);书上为了简便所以这样写

3 楼

唉,都提醒到这份上都不明白
rewrite前面少了个assign

我来回复

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