Question

pascal基础assign语法问题

谁能给我详细的讲一下assign的用法.. 我是自学的,这个地方没有找到比较好的资料。 最好多举一些例子。 希望能认真回答。

Answer 1

assign使用于文件变量指向一个实际的文件。
如果你的程序有输入的话，则：
assign(文件变量，实际文件名）；
{程序中如有 read 则 read（文件变量，输入）； }
最后加
close(文件变量）；
或
assign（input，实际文件名）；
assign（output,实际文件名）；
最后加
close（input）；
close（output）；
没有输入
则
assign(文件变量，实际文件名）；
最后加
close(文件变量）；
或
assign（output,实际文件名）；
最后加
close（output）；

Answer 2

assign(f,filename)
用来指定一个文件变量实际上对应文件系统中的哪个文件名。

举例：
program example;
var file1,file2:text;
p:integer;
begin
assign(file1,'a.txt');
assign(file2,'b.txt');
readln(file1,p);{读文件中的值}
writeln(file2,p);{输出到文件}
readln(p);{读键盘上的值}
writeln(p);{输出到屏幕}
end.

Answer 3

assign(var f:text;filename:string);
前面带一个文件类型，一般用input（输入文件）或者output（输出文件），这两个是系统已经定义了的，默认指向键盘和屏幕。
如果要自己定义：
var
f:text;
要打开读入文件是reset(f);
打开输出文件是rewrite(f);（从头开始写）append(f);（接着写）
用read(f,{你要读的变量});如果是用的input就可以不用写f。write同理。

Answer 4

考试阶段，只需要以下几句就行啦
assign(input,'文件名.in');
reset(input);
assign(output,'文件名.out');
rewrite(output);
close(input);
close(output);

Answer 5

begin
assign(input,'文件名');
assign(output,'文件名');
reset(input);
reset(output);

……

close(input);
close(output);
end.
——带文件的格式