#include<bits/stdc++.h> using namespace std; const int N=200; int f[N][N],n,m,k,s,a[N],b[N],ans[N],a_size; int main(){ while(1){ memset (f,127,sizeof f); cin>>n>>m>>k>>s; for(int i=1;i<=k;i++)cin>>a[i]>>b[i]; f[0][0]=0; for(int i=k;i>=1;i--){ for(int j=1;j<=s;j++){ for(int o=a[i];o<=n;o++){ f[j][o]=min(f[j-1][o-a[i]]+b[i],f[j][o]); } } } for(int i=1;i<=s;i++)f[i][n]=min(f[i][n],f[i-1][n]); ans[++a_size]=max(m-f[s][n],-1); } for(int i=1;i<=a_size;i++)cout<<ans[i]<<endl; }