ll d[3000];
ll@n,@i;
rep(n){
	ll@s,@a;
	rrep(j,i+1){
		d[j+s]>?=d[j]+a;
	}
}
wt(d[i]);