vj1104 采药

vj1104 采药 - / /dp /...

Info iconThis preview shows page 1. Sign up to view the full content.

View Full Document Right Arrow Icon
//±ÉÈ˵ķ½·¨ //dp //01±³°ü / const maxn=100; maxt=1000; var n,t:integer; a,w:array[0. .maxn] of integer; f:array[0. .maxt] of integer; procedure init; var i:integer; begin readln(t,n); for i:=1 to n do readln(a[i],w[i]); end; procedure main;
Background image of page 1
This is the end of the preview. Sign up to access the rest of the document.
Ask a homework question - tutors are online