我的Pascal为什么没有输出？2004年的普及组第一题

2024-12-21 20:05:01

推荐回答（5个）

回答1：

首先你最开始的时候，并没有输入fillchar（a,sizeof(a),0);所以你自己看自己后面调用的a[2],a[3]..有值么？
还有其实你可以将后面一长串改为 if (a[i]>max)and(a[i]>8) then begin max:=a[i];d:=i;end;这样可以节省非常多的时间。

回答2：

检查输入输出文件是否存在、错名

回答3：

程序没问题，应该是文件位置不对吧

回答4：

应该是文件的问题。你的文件要放在它的默认地址下，或者更改它的默认地址。要更改可以这样 File ---- Change dir... ,然后输入文件的地址就行了

回答5：

加readln就可以了，如果还不行，就加两个---