测试结果2: 通过本测试点|有效耗时47:ms
测试结果3: 通过本测试点|有效耗时47:ms
测试结果4: 通过本测试点|有效耗时63:ms
测试结果5: 测试结果错误.错误结果为:66 276
101 270
88 270
19 270
93 267
正确结果应为:66 276
88 270
19 270
101 270
93 267
测试结果6: 通过本测试点|有效耗时156:ms
测试结果7: 测试结果错误.错误结果为:130 292
45 292
10 292
171 276
143 276
正确结果应为:10 292
45 292
130 292
171 276
143 276
测试结果8: 测试结果错误.错误结果为:93 280
13 280
26 275
136 273
140 271
正确结果应为:13 280
93 280
26 275
136 273
140 271
测试结果9: 通过本测试点|有效耗时156:ms
测试结果10: 通过本测试点|有效耗时47:ms
提交代码： var n,i,j,k:integer；
a,b,c,d,s:array[1..1000]of integer；
begin
readln(n)；
for i:=1 to n do
begin
readln(a[i],b[i],c[i])；
s[i]:=a[i]+b[i]+c[i]；
d[i]:=i；
end；
for i:=1 to n-1 do
for j:=i+1 to n do
begin
if s[i]<s[j] then begin k:=s[i]；s[i]:=s[j]；s[j]:=k；k:=d[i]；d[i]:=d[j]；d[j]:=k；end；
if s[i]=s[j] then if a[i]<a[j] then begin k:=s[i]；s[i]:=s[j]；s[j]:=k；k:=d[i]；d[i]:=d[j]；d[j]:=k；end；
if (s[i]=s[j])and(a[i]=a[j]) then if d[i]>d[j] then begin k:=s[i]；s[i]:=s[j]；s[j]:=k；k:=d[i]；d[i]:=d[j]；d[j]:=k；end；
end；
for i:=1 to 5 do
writeln(d[i],’ ’,s[i])；
end.