ll@N,@P,@K,@(T,B)[N],D[K+1]{P};REP(i,N)rrep(k,K){if(D[k]>1e18)D[k+1]=D[k];else D[k+1]>?=D[k]+(T[i]<2?B[i]:D[k]);}wt(D[K]>1e18?-1:D[K]);