采药

来源:互联网 发布:java权限管理框架源码 编辑:程序博客网 时间:2024/05/15 03:49

2005年分区联赛普级组之三 采药

Time Limit:1000MS  Memory Limit:65536KTotal Submit:365 Accepted:191

Description

  辰辰是个天资聪颖的孩子,他的梦想是成为世界上最伟大的医师。为此,他想拜附近最有威望的医师为师。医师为了判断他的资质,给他出了一个难题。医师把他带到一个到处都是草药的山洞里对他说:“孩子,这个山洞里有一些不同的草药,采每一株都需要一些时间,每一株也有它自身的价值。我会给你一段时间,在这段时间里,你可以采到一些草药。如果你是一个聪明的孩子,你应该可以让采到的草药的总价值最大。”   如果你是辰辰,你能完成这个任务吗?

Input

  输入的第一行有两个整数T(1 <= T <= 1000)和M(1 <= M <= 100),用一个空格隔开,T代表总共能够用来采药的时间,M代表山洞里的草药的数目。接下来的M行每行包括两个在1到100之间(包括1和100)的整数,分别表示采摘某株草药的时间和这株草药的价值。

Output

  输出包括一行,这一行只包含一个整数,表示在规定的时间内,可以采到的草药的最大总价值。

Sample Input

70 371 10069 11 2

Sample Output

3

Hint

对于30%的数据,M <= 10;
对于全部的数据,M <= 100。

Source

elba

 
 
type re=record t,v:longint;end;var i,j,k,l,n,t,m:longint; a:array[0..10000]of re; f:array[0..1000]of longint; function wr(q,w:longint):longint; begin  if q>w then exit(q);  exit(w); end; procedure go; begin  fillchar(f,sizeof(f),0);  for i:=1 to m do   for j:=t downto a[i].t do    f[j]:=wr(f[j],f[j-a[i].t]+a[i].v); end;begin read(t,m); for i:=1 to m do  read(a[i].t,a[i].v); go; write(f[t]);end.
0 0
原创粉丝点击