题目:佳佳的魔法照片
状态: Unaccepted
测评机： Xeost[5]
得分： 60分
提交日期： 2013-7-18 21:11:00
有效耗时： 984毫秒
测试结果1: 通过本测试点|有效耗时172ms
测试结果2: 通过本测试点|有效耗时156ms
测试结果3: 通过本测试点|有效耗时156ms
测试结果4: 通过本测试点|有效耗时172ms
测试结果5: 通过本测试点|有效耗时156ms
测试结果6: 通过本测试点|有效耗时172ms
测试结果7: 选手程序运行超过时限
测试结果8:
测试结果9:
测试结果10: 选手程序运行超过时限
program jjdmfzp;
var
n,k,i,j,t,max,maxn,rc:longint;
w,s,b:array[0..500001] of longint;
e:array[0..11] of longint;
f:array[0..500001] of boolean;
begin
fillchar(f,sizeof(f),true);
readln(n,k);
if k=0 then exit;
for i:=1 to 10 do
read(e[i]);
readln;
for i:=1 to n do begin
read(w[i]);
b[i]:=i;
end;
for i:=n downto 2 do
for j:=1 to i-1 do
if w[j]<w[j+1] then begin
t:=w[j]; w[j]:=w[j+1]; w[j+1]:=t;
t:=b[j]; b[j]:=b[j+1]; b[j+1]:=t end;
for i:=1 to n do
s[i]:=w[i]+e[(i-1) mod 10+1];
for i:=1 to k do begin
max:=0;
for j:=1 to n do
if f[j] then
if s[j]>max then begin
max:=s[j];
maxn:=b[j];
rc:=j;
end
else
if (s[j]=max) and (b[j]<maxn) then
begin maxn:=b[j]; rc:=j; end;
write(maxn,' ');
f[rc]:=false;
end;
end.
补充
测试结果8: 输出过少|用户输出数据少于标准输出的50%[标准输出4445位|选手输出22位]
测试结果9: 输出过少|用户输出数据少于标准输出的50%[标准输出5108位|选手输出22位]
补充
测试结果8: 输出过少|用户输出数据少于标准输出的50%[标准输出4445位|选手输出22位]
测试结果9: 输出过少|用户输出数据少于标准输出的50%[标准输出5108位|选手输出22位]