B
bobzane
Unregistered / Unconfirmed
GUEST, unregistred user!
我用的是pascal 7.0,在DOS下,想要生成一个文件,程序很简单,如下:
program wyupatch(input,output);
var
filver:text;
begin
Assign(filver,'c:/abc.txt');
Rewrite(filver);
Writeln('123');
Write('456');
close(filver);
end.
结果这个文件是生成了,但是也在屏幕上显示出了:
123
456
我不想在屏幕上看到这个结果应该怎么做?
Writeln('123');
Write('456');
写成:
Writeln(filver,'123');
Write(filver,'456');
其结果相同。
program wyupatch(input,output);
var
filver:text;
begin
Assign(filver,'c:/abc.txt');
Rewrite(filver);
Writeln('123');
Write('456');
close(filver);
end.
结果这个文件是生成了,但是也在屏幕上显示出了:
123
456
我不想在屏幕上看到这个结果应该怎么做?
Writeln('123');
Write('456');
写成:
Writeln(filver,'123');
Write(filver,'456');
其结果相同。