主题:为什么出现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.
我是对着书写的,但为什么编译不通过啊???
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.
我是对着书写的,但为什么编译不通过啊???