标签:style blog http color 数据 os
为何我要做此等弱智题,只因我太久不码代码,心有所虚…
明天的任务是,做些难题,累了就理房间,实在不行就睡觉,不要做别的事情w 目测自己做不到呢OAO
program vijos_p1035; var namelist:array[1..10] of string; ans:array[1..10] of integer; n,i,j,ni,money:integer; s,ss:string; function loc(st:string):integer; var i:integer; begin i:=1; while namelist[i]<>st do inc(i); exit(i); end; begin {main} readln(n); for i:=1 to n do readln(namelist[i]); for j:=1 to n do begin readln(s); readln(money,ni); for i:=1 to ni do begin readln(ss); inc(ans[loc(ss)],money div ni); end; if ni<>0 then dec(ans[loc(s)],money div ni * ni); end; for i:=1 to n do writeln(namelist[i],‘ ‘,ans[i]); end.
测试数据 #0: Accepted, time = 0 ms, mem = 744 KiB, score = 10
测试数据 #1: Accepted, time = 0 ms, mem = 744 KiB, score = 10
测试数据 #2: Accepted, time = 15 ms, mem = 744 KiB, score = 10
测试数据 #3: Accepted, time = 15 ms, mem = 744 KiB, score = 10
测试数据 #4: Accepted, time = 0 ms, mem = 744 KiB, score = 10
测试数据 #5: Accepted, time = 0 ms, mem = 744 KiB, score = 10
测试数据 #6: Accepted, time = 0 ms, mem = 744 KiB, score = 10
测试数据 #7: Accepted, time = 0 ms, mem = 748 KiB, score = 10
测试数据 #8: Accepted, time = 0 ms, mem = 744 KiB, score = 10
测试数据 #9: Accepted, time = 0 ms, mem = 740 KiB, score = 10
Accepted, time = 30 ms, mem = 748 KiB, score = 100
[vijos P1035] 贪婪的送礼者,布布扣,bubuko.com
标签:style blog http color 数据 os
原文地址:http://www.cnblogs.com/Sky-Grey/p/3817562.html