/*
    每个奶牛各自能够忍受的阳光强度有一个最小值和一个最大值
    防晒霜的作用是让阳光照在身上的阳光强度固定为某个值
    每瓶防晒霜给出固定的阳光量和防晒霜数量
    每头奶牛只能用一瓶防晒霜
    问最多能晒太阳的奶牛数量
*/
#include <cstdio>    
#include <queue>  
#include <algorithm>
const int N=3000;  
using namespace std;  
int n,m;  
typedef pair<int,int> P;  
priority_queue<int,vector<int>,greater<int> > q;  
P cow[N],bottle[N];  
int main(){  
    scanf("%d%d",&n,&m);  
    for(int i=0;i<n;i++)scanf("%d%d",&cow[i].first,&cow[i].second);  
    for(int i=0;i<m;i++)scanf("%d%d",&bottle[i].first,&bottle[i].second);  
    sort(cow,cow+n);sort(bottle,bottle+m);  
    int j=0,ans=0;  
    for(int i=0;i<m;i++){  
        while(j<n&&cow[j].first<=bottle[i].first)q.push(cow[j++].second);  
        while(!q.empty()&&bottle[i].second){  
            int x=q.top(); q.pop();  
            if(x<bottle[i].first)continue;  
            ans++; bottle[i].second--;  
        }  
    }printf("%d\n",ans);  
    return 0;  
}  

/*
    每个物品有两个属性值s和f，从m个物品中选取n个物品
    求f的和小于等于F的情况下s的中位数最大值。
    按照s排序，枚举每个s作为中位数的情况
    那么只要知道前面n/2最小值的和和后面n/2最小值的和就好
    这个可以利用优先队列预处理出来
*/
#include <cstdio>
#include <algorithm>
#include <queue> 
using namespace std;
priority_queue<int> q;
const int N=100010;
int n,m,F,pre[N],nxt[N],sum;
struct data{int s,f;}p[N];
bool cmp(data a,data b){return a.s>b.s;}
int main(){
    scanf("%d%d%d",&n,&m,&F);
    for(int i=1;i<=m;i++)scanf("%d%d",&p[i].s,&p[i].f);
    sort(p+1,p+m+1,cmp);
    int base=n/2;
    for(int i=1;i<=base;i++)q.push(p[i].f),sum+=p[i].f;
    for(int i=base+1;i<=m-base;i++){
        pre[i]=sum;
        if(q.top()>p[i].f){
            sum-=q.top();
            q.pop();
            sum+=p[i].f;
            q.push(p[i].f);
        }
    }while(!q.empty())q.pop();sum=0;
    for(int i=m;i>m-base;i--)q.push(p[i].f),sum+=p[i].f;
    for(int i=m-base;i>=base+1;i--){
        nxt[i]=sum;
        if(q.top()>p[i].f){
            sum-=q.top();
            q.pop();
            sum+=p[i].f;
            q.push(p[i].f);
        }
    }int ans=-1;
    for(int i=base+1;i<=m-base;i++){
        if(p[i].f+pre[i]+nxt[i]<=F){
            ans=p[i].s;
            break;
        }
    }printf("%d\n",ans);
    return 0;    
}

/*
    每台电脑可以连接到距离不超过d的正常电脑，连接具有传递性
    现在因为地震，所有的电脑被损坏了，现在进行维修电脑的行动
    O x表示维修好了编号为x的电脑，S x y表示查询x和y是否能连接
*/
#include <cstdio>
const int N=1010;
struct data{int x,y;}p[N];
int f[N],x,y,n,d,a[N];
char op[10];
int sf(int x){return f[x]==x?x:f[x]=sf(f[x]);}
int sqr(int x){return x*x;}
bool link(int a,int b){return sqr(p[a].x-p[b].x)+sqr(p[a].y-p[b].y)<=d*d;}
int main(){
    scanf("%d%d",&n,&d);
    for(int i=1;i<=n;i++)f[i]=i,a[i]=0,scanf("%d%d",&p[i].x,&p[i].y);
    while(~scanf(" %s",op)){
        if(op[0]==‘O‘){
            scanf("%d",&x);
            for(int i=1;i<=n;i++)if(a[i]&&link(x,i)){
                if(sf(x)==sf(i))continue;
                f[sf(x)]=sf(i);
            }a[x]=1;
        }else{
            scanf("%d%d",&x,&y);
            if(sf(x)==sf(y))puts("SUCCESS");
            else puts("FAIL");
        }
    }return 0;
}

/*
    有两个物种，每个生物都属于两种物种之一，
    现在有两个操作，表示两个生物属于不同物种或者查询两个物种的关系
*/
#include <cstdio>
const int N=100010<<1;
int T,f[N],n,m,x,y;
char op[2];
void init(int n){for(int i=0;i<=n;i++)f[i]=i;}
int sf(int x){return f[x]==x?x:f[x]=sf(f[x]);}
bool Same(int x,int y){return sf(x)==sf(y);}
bool Union(int x,int y){f[sf(x)]=sf(y);}
int main(){
    scanf("%d",&T);
    while(T--){
        scanf("%d%d",&n,&m);
        init(2*n);
        for(int i=1;i<=m;i++){
            scanf(" %s%d%d",&op,&x,&y);
            x--;y--;
            if(op[0]==‘D‘){Union(x,y+n);Union(x+n,y);}
            else{
                if(Same(x,y)||Same(x+n,y+n))puts("In the same gang.");
                else if(Same(x,y+n)||Same(x+n,y))puts("In different gangs.");
                else puts("Not sure yet.");
            }
        }
    }return 0;
}

/*
    给出一棵树，一开始根节点是上色的，
    现在有两个操作：给某个节点上色，或者查询一个节点最近的上色的祖先节点
*/
#include <cstdio>
const int N=100010;
int f[N],n,m,x;
char op[2];
int sf(int x){return f[x]==x?x:sf(f[x]);}
int main(){
    while(scanf("%d%d",&n,&m),n+m){
        for(int i=2;i<=n;i++)scanf("%d",&f[i]);
        long long ans=0; f[1]=1;
        while(m--){
            scanf(" %s%d",op,&x);
            if(op[0]==‘M‘)f[x]=x;
            else ans+=sf(x);
        }printf("%lld\n",ans);
    }return 0;
}