問題描述:
(測試如下程序,得到"Error while linking",無法通過,原因?如何修改程序?)
program NOIP2004;
const
m=300;
var
b,c,d:integer;
e:real;
a:array[1..12]of integer;
p,q:integer;
r:integer;
begin
assign(input,'save.in');
reset(input);
for r:=1 to 12 do readln(a[r]);
r:=1;
while (a[r]>0) do
begin
b:=300-a[r];
c:=(b div 100)*100+c;
d:=b-((b div 100)*100);
r:=r+1;
end;
if b<0 then writeln(r)
else begin e:=(c*(120/100));
writeln(c);
end;
end.
解析:
壹般情況下 退出去重進就可以了
error while linking有這樣的可能
1 程序打開(reset or rewrite)的文件太多
2 妳的程序在debug時進行了^F2等操作也可能導致
以上是我遇到的情況