program energii;
var e,c:array[0..1002] of longint;
    w,g,i,j,m,s:longint;
    f,g2:text;

begin
assign(f,'energii.in');reset(f);
assign(g2,'energii.out');rewrite(g2);
read(f,g,w);
e[0]:=0;c[0]:=0;e[g+1]:=0;c[g+1]:=0;
for i:=1 to g do
  begin
    read(f,e[i],c[i]);
    c[i]:=c[i-1]+c[i];
    e[i]:=e[i-1]+e[i];
  end;
m:=10011002;
for i:=g downto 1 do
  for j:=0 to g do
    if (e[i]-e[j]>=w) then begin writeln(g2,c[i]-c[j]);close(g2);halt; end;
end.