关于free pascal 高手来!~
发布网友
共6个回答
热心网友
直接关联input和output，例：
begin
assign(input,<文件名>);
assign(output,<文件名>);
reset(input);
rewrite(output);
<执行语句1>
<执行语句2>
…………
close(input);
close(output);
end.
（注意：<文件名>为字符串形式，如果不填绝对路径则默认在fp.exe所在目录下，如'c:\1.txt'表示关联C盘的1.txt文件，'1.txt’表示进入fp.exe所在目录的1.txt）
注：也可以用文件变量关联，但太过麻烦，上述方法已经在竞赛和日常中普遍使用，故不作赘述。
Fatal:Unable to open file C:\FPC\2.2.2\bin\i386-win32\fp.cfg
Fatal:Compilation aborted
上述语句表示fp.cfg文件错误，可能是你在网上下载的FP程序损坏，编译时出现问题，可以重新安装FP。
调试和运行出现了Compile failed意味着编译失败，可能是程序有问题或者FP有问题，可根据实际情况解决
热心网友
begin
assign(input,'**.in'); assign(output,'**.out');
reset(input); rewrite(output);
read(*);
........
........
........
write(**);
close(); close();{千万别忘记关掉文件}
END.
热心网友
其他的都一样了 我也没啥说的了 再补充一点 别忘了 如果有 exit; 的话 在exit 之前 加上 close(input);close(output);
热心网友
国家考试时用的
program xx;
var
begin
assign(input,'文件名.in');
assign(output,'文件名.out');
reset(input);
rewrite(output);
程序体；
write(xx);
close(input);
close(output);
end.
没问题
热心网友
嗯。。这个问题是因为你的fp.exe的工作文件夹下面没有此文件所以不能读入。
你可以：
1.在Windows下修改，将fp.exe的属性中的工作文件夹（起始位置栏）修改到你的读入文件所在的目录。
2.在Windows下修改，将fp.exe的属性中的的起始位置栏清空，放入你的文件所在的目录，再打开fp.exe，这时会要求建立初始配置文件，随便选是“Copy existing”还是“Create New”都可以。
3.在FP下File栏里选择 “Change dir”，修改目录。
建议使用第二种方式，较为方便，且易操作。
Compile Failed 指的是代码语句有问题，未能通过编译。
这时按下回车，光标会移至出问题处，并在上部用一红色横条告知具体出错原因。这时你要调整程序，直到编译通过才行
热心网友
可以在“program xx”后面加“（input，output）；”
或
program XX；
var 。。。
assign（input，“外部文件”）；
assign（output，“外部文件”）；
reset（input）；
rewrite（output）；
程序
close（input）；
close（output）；
end.
