求助：Turbo Pascal和Free Pascal在调试同一个程序时，为什么结果不一样？ [复制链接]

Turbo Pascal和Free Pascal在调试同一个程序时，为什么结果不一样？
program text1;
var x,y,z:integer; f1,f2:text;
begin
  assign(f1,'test.in');
  assign(f2,'test.out');
  reset(f1);
  rewrite(f2);
  readln(f1,x,y,z);
  writeln(f2,x*y*z);
  writeln(f2,2*(x*y+y*z+z*x));
  close(f1);
  close(f2)
end.

如文件test.in的内容为3 4 5，用Turbo Pascal可以调试出结果，文件test.out的内容为60 94。
但用Free Pascal却调试不出结果，而编译是成功的。

不可能~~~~~~

可能是test.in文件没有在正确的程序执行目录下

程序的源文件、输入文件test.in、输出文件test.out都是放在同一个目录下的，问题出在哪里呢？搞不懂

你有没有用主释?

很抱歉，最近迎接高考，没法为你详细测试。
我还是认为这是工作目录的问题。
因为在我的印象中，FP的程序调试目录的确不在程序目录下，所以经常会出现这个问题
我在学OI的时候，本地测试的时候都是通过绝对地址引用完成的
比如
assign(input,'d:\1.txt');

希望对你有帮助

使用Free Pascal读取文件时，用了文件的绝对地址还是不能成功的读取，提示Running ....，然后就没反应了。我想问题肯定还是出在目录访问上，不知道是哪里的问题？这个看似简单的问题困扰我好久了，不知道你们都是怎样解决的？

改了程序,用另一种方法运行,过了改回来,过了

终于知道原因了，是free pascal版本的问题。我原先用的是2.0.0，现在用1.0.10就能正常进行文件的读取。另外关于读取文件的路径问题，不一定就用绝对路径，用相对路径也可以，只要源程序和输入输出文件在主目录下就行了。