帮我看看为啥不过，谢了。
program pingguo;
var
a,b:array[0..2001] of integer;
i,j,m,n,k,ans:integer;
begin
assign(input,'applea.in');
assign(output,'applea.out');
reset(input);
rewrite(output);
readln(n,m);
for i:=1 to n do
readln(a[i]);
for i:=1 to m do
readln(b[i]);
for i:=1 to n do
begin
k:=0;
for j:=1 to m do
if (a[i]>b[j])and ( b[j]<>0) then
if b[k]<b[j] then
k:=j;
if K<>0 then
b[k]:=0;
end;
ans:=0;
for i:=1 to m do
if b[i]<>0 then
inc(ans);
writeln(ans);
close(input);
close(output);
end.

map好慢……

不过一道水题说明后面的题不简单，所以先把这个添加上吧@cstdio

以后数据能不能别这么坑了。。。

忘开long long这种问题……简直智硬

写的这么挫还rank1？..坐等被打脸

因为入度会有重边，所以要求出度。

名字还能为空...第三组数据

这个题纯模拟吗？

请同学自重，不要在cogs上放太多的水题……我们要提高题目的质量，否则COGS无法吸引更多神牛来刷题。而且题目最好再正规些，浮躁不是不可以，浮躁还有多样性、全面性以及公开性就请你们自己反省一下了。（话说DNF都满级85了，王的遗迹都改版多少次削弱成狗了，求教如何刷不过去）

是你做的测试数据太变态了，@常可神牛

实在是佩服你们学校的机房啊。。。一个字就搞得乌烟瘴气的，我们的机房可是以[size=50]“撸语言”（LYY）[/size]为主的。。。

话说这题的标称用的就是int64，不知神一样的张神牛是怎么做到的 @张铭哲

..求解一个区间多层覆盖怎么记录...

张铭哲真的很有意思！！

无力吐槽原版题目，搞的机房乌烟瘴气的-_-#

广搜练手题，一遍AC（神犇们可以用更加高神的dij、floyd或者AC自动机）

这很正常，因为我不是四班的

oh my god!!!