讨论 - 谁发个AC程序参考参考?

xxwzy 2011-09-23 02:02:00

点我顶贴收藏删除

#1 xxwzy@2009-02-18 06:26:00

回复删除

162125 xxwzy 280 Unaccepted 29分 FreePascal Xeost[5] 查看

162124 xxwzy 280 Unaccepted 0分 FreePascal Xeost[5] 查看

162123 xxwzy 280 Unaccepted 0分 FreePascal Xeost[5] 查看

162122 xxwzy 280 Unaccepted 0分 FreePascal Xeost[5] 查看

162121 xxwzy 280 Unaccepted 43分 FreePascal Xeost[5] 查看

162120 xxwzy 280 No Compiled 0分 FreePascal Xeost[5] 查看

162119 xxwzy 280 Unaccepted 14分 FreePascal Xeost[5] 查看

162118 xxwzy 280 Unaccepted 29分 FreePascal Xeost[5] 查看

162117 xxwzy 280 Unaccepted 0分 FreePascal Xeost[5] 查看

162116 xxwzy 280 Unaccepted 0分 FreePascal Xeost[5] 查看

162115 xxwzy 280 No Compiled 0分 FreePascal Xeost[5] 查看

162114 xxwzy 280 No Compiled 0分 FreePascal Xeost[5] 查看

162113 xxwzy 280 No Compiled 0分 FreePascal Xeost[5] 查看

155414 xxwzy 280 Unaccepted 29分 FreePascal Xeost[5] 查看

155413 xxwzy 280 Unaccepted 43分 FreePascal Xeost[5] 查看

155411 xxwzy 280 Unaccepted 43分 FreePascal Xeost[5] 查看

155410 xxwzy 280 No Compiled 0分 FreePascal Xeost[5] 查看

152346 xxwzy 280 Unaccepted 43分 FreePascal Xeost[5] 查看

152343 xxwzy 280 Unaccepted 43分 FreePascal Xeost[5] 查看

152342 xxwzy 280 No Compiled 0分 FreePascal Xeost[5] 查看

152297 xxwzy 280 Unaccepted 43分 FreePascal Xeost[5] 查看

152296 xxwzy 280 Unaccepted 14分 FreePascal Xeost[5] 查看

152294 xxwzy 280 Unaccepted 14分 FreePascal Xeost[5] 查看

152293 xxwzy 280 Unaccepted 14分 FreePascal Xeost[5] 查看

152292 xxwzy 280 Unaccepted 29分 FreePascal Xeost[5] 查看

152290 xxwzy 280 Unaccepted 14分 FreePascal Xeost[5] 查看

152289 xxwzy 280 Unaccepted 14分 FreePascal Xeost[5] 查看

152288 xxwzy 280 Unaccepted 14分 FreePascal Xeost[5] 查看

152282 xxwzy 280 Unaccepted 29分 FreePascal Xeost[5] 查看

152281 xxwzy 280 Unaccepted 14分 FreePascal Xeost[5] 查看

152280 xxwzy 280 No Compiled 0分 FreePascal Xeost[5] 查看

152279 xxwzy 280 No Compiled 0分 FreePascal Xeost[5] 查看

152278 xxwzy 280 No Compiled 0分 FreePascal Xeost[5] 查看

152277 xxwzy 280 Unaccepted 29分 FreePascal Xeost[5] 查看

152276 xxwzy 280 Unaccepted 14分 FreePascal Xeost[5] 查看

152275 xxwzy 280 Unaccepted 14分 FreePascal Xeost[5] 查看

152274 xxwzy 280 Unaccepted 14分 FreePascal Xeost[5] 查看

152273 xxwzy 280 Unaccepted 14分 FreePascal Xeost[5] 查看

152272 xxwzy 280 No Compiled 0分 FreePascal Xeost[5] 查看

152271 xxwzy 280 No Compiled 0分 FreePascal Xeost[5] 查看

help！！！！！！！！！！！！！！！！

#2 xxwzy@2009-02-21 23:12:00

回复删除

没人啊……

#3 xxwzy@2009-02-23 21:07:00

回复删除

第41次终于AC了

162825 xxwzy 280 Accepted 100分 FreePascal Xeost[5] [详] 查看

免费送积分

#4 OI帝国@2009-02-24 21:00:00

回复删除

强大的土ZY

#5 yangdong@2010-05-06 04:50:00

回复删除

有点乱，就是用贪心

program sanzhipaixu;

var i,b,c,n,d,e,x:integer;

sum:array[1..3] of integer;

a:array[1..1000] of integer;

begin

read(n) ;

for i:=1 to n do begin read(a[i]); inc(sum[a[i]]); end;

for i:=1 to sum[1] do begin

if a[i]=2 then inc(b);

if a[i]=3 then inc(c);

end;

for i:=sum[1]+1 to n-sum[3] do begin

if a[i]=1 then inc(d);

if a[i]=3 then inc(e);

end;

if b>d then writeln(b+C+e)

else

writeln(b+c+abs(b-d)+e);

end.

#6 lijiaming12340@2011-09-23 02:02:00

回复删除

送我呀！