【NOIP2016复赛模拟赛】朋友

问题描述
mxy 即将前往新世界。
在前往新世界的过程中,ta 遇见了两种人。一种是只和lowb 做朋友,即当且仅当自己
的能力值大于对方时他们会成为朋友,另一种是大神我们做朋友,即当且仅当自己的能力
值小于对方时他们会成为朋友。
现在告诉你两种人的能力值。请你计算一共有多少对友好关系。
输入
每组测试数据有三行。
第一行有两个整数m,n(1 <= m,n <= 20000),分别代表前者人数和后者人数。
第二行m 个数,第三行n 个数,代表各自的能力值。
输出
一行一个整数,表示有多少对友好关系。
样例输入
5 3
8 1 7 3 1
3 6 1
样例输出
7
算法讨论
先将两种人的能力值从大到小排序,然后逐个比较,符合做朋友的就加一对,因为做朋友是相互的,所以只用做一次,再加几个优化:当I类人第一个能力值大于II类人最后一个,则直接加n;当I类人第一个能力值小于II类人最后一个,则直接跳过当前I类人,往下继续找。初评没有过……自以为是的加了个所谓的优化,头在往后找时尾在往前找,当然这样是错的……

const
  maxn=20000;
type
  arr=array[1..maxn] of longint;
var
  a,b:array[1..maxn] of longint;
  i,j,q,p,n,m:longint;
  s:int64;

procedure qsort(var x:arr;l,r:longint);
var
  i,j,m,t:longint;
begin
  i:=l; j:=r;
  m:=x[(l+r) div 2];
  repeat
    while x[i]>m do
      inc(i);
    while x[j]<m do
      dec(j);
    if i<=j
      then begin
             t:=x[i];
             x[i]:=x[j];
             x[j]:=t;
             inc(i); dec(j)
           end;
  until i>j;
  if l<j
    then qsort(x,l,j);
  if i<r
    then qsort(x,i,r);
end;

begin
  assign(input,'friend.in'); reset(input);
  assign(output,'friend.out'); rewrite(output);
  read(n,m);
  for i:=1 to n do
    read(a[i]);
  for i:=1 to m do
    read(b[i]);
  qsort(a,1,n);
  qsort(b,1,m);
  for i:=1 to n do
    begin
      q:=1; p:=m;
      if b[q]<a[i]
        then begin
               inc(s,m);
               continue
             end;
      if b[p]>=a[i]
        then break;
      while a[i]<=b[q] do
        inc(q); 
      if a[i]>b[q]
        then begin
               s:=s+(m-q+1);
               continue
             end;
      if a[i]>b[p]
        then begin
               s:=s+(m-p+1);
               continue
             end;
    end;
  writeln(s);
  close(input); close(output)
end.

这里写图片描述
Pixiv ID:61676992

评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值