采药(medic.pas/c/cpp)
2011-10-02 16:56
453 查看
采药
(medic.pas/c/cpp)
来源:NOIP2005(普及组) 第三题
【问题描述】
辰辰是个天资聪颖的孩子,他的梦想是成为世界上最伟大的医师。为此,他想拜附近最有威望的医师为师。医师为了判断他的资质,给他出了一个难题。医师把他带到一个到处都是草药的山洞里对他说:“孩子,这个山洞里有一些不同的草药,采每一株都需要一些时间,每一株也有它自身的价值。我会给你一段时间,在这段时间里,你可以采到一些草药。如果你是一个聪明的孩子,你应该可以让采到的草药的总价值最大。”
如果你是辰辰,你能完成这个任务吗?
【输入文件】
输入文件medic.in的第一行有两个整数T(1 <= T <= 1000)和M(1 <= M <= 100),用一个空格隔开,T代表总共能够用来采药的时间,M代表山洞里的草药的数目。接下来的M行每行包括两个在1到100之间(包括1和100)的整数,分别表示采摘某株草药的时间和这株草药的价值。
【输出文件】
输出文件medic.out包括一行,这一行只包含一个整数,表示在规定的时间内,可以采到的草药的最大总价值。
【输入样例】
70 3
71 100
69 1
1 2
【输出样例】
3
【数据规模】
对于30%的数据,M <= 10;
对于全部的数据,M <= 100。
======================
==========================================
(medic.pas/c/cpp)
来源:NOIP2005(普及组) 第三题
【问题描述】
辰辰是个天资聪颖的孩子,他的梦想是成为世界上最伟大的医师。为此,他想拜附近最有威望的医师为师。医师为了判断他的资质,给他出了一个难题。医师把他带到一个到处都是草药的山洞里对他说:“孩子,这个山洞里有一些不同的草药,采每一株都需要一些时间,每一株也有它自身的价值。我会给你一段时间,在这段时间里,你可以采到一些草药。如果你是一个聪明的孩子,你应该可以让采到的草药的总价值最大。”
如果你是辰辰,你能完成这个任务吗?
【输入文件】
输入文件medic.in的第一行有两个整数T(1 <= T <= 1000)和M(1 <= M <= 100),用一个空格隔开,T代表总共能够用来采药的时间,M代表山洞里的草药的数目。接下来的M行每行包括两个在1到100之间(包括1和100)的整数,分别表示采摘某株草药的时间和这株草药的价值。
【输出文件】
输出文件medic.out包括一行,这一行只包含一个整数,表示在规定的时间内,可以采到的草药的最大总价值。
【输入样例】
70 3
71 100
69 1
1 2
【输出样例】
3
【数据规模】
对于30%的数据,M <= 10;
对于全部的数据,M <= 100。
======================
==========================================
{ ID:jie19952 PROG: LANG:PASCAL } type re=record t,v:longint; end; var t,m:longint; a:array[1..100]of re; f:array[0..1000]of longint; procedure init; begin assign(input,'medic.in'); assign(output,'medic.out'); reset(input); rewrite(output); end; procedure terminate; begin close(input); close(output); halt; end; function max(a,b:longint):longint; begin if a>b then exit(a); exit(b); end; procedure main; var i,j:longint; begin readln(t,m); for i:=1 to m do readln(a[i].t,a[i].v); fillchar(f,sizeof(f),0); for i:=1 to m do for j:=t downto a[i].t do begin f[j]:=max(f[j],f[j-a[i].t]+a[i].v); end; writeln(f[t]); end; begin init; main; terminate; end.
相关文章推荐
- 配置魔药(medic.pas/c/cpp)
- 【2014.10.18普及组】道路阻塞(rblock.pas/cpp/c) //2018.1.27
- 2012_p4 文化之旅 (culture.cpp/c/pas)
- 多多看DVD(加强版)(watchdvd.pas/c/cpp)
- 【区间DP】不老的传说(spring.cpp/pas)
- 试题三:古代人的难题( puzzle.pas/c/cpp) 斐波那契数列
- 【记忆化】【120819测试】【记忆化搜索专题】能量项链(energy.pas/c/cpp)
- 【枚舉】【數學題】澆水 (water.c/cpp/pas)
- 【贪心】营养膳食 diet.pas/c/cpp
- 【动态规划】【排列组合】Wiseking (Wiseking.pas/c/cpp)
- 【贪心+堆优化】奶牛晒衣服 dry.pas/c/cpp
- 【最大子区间和】旅游路线(travel.pas/c/cpp)
- 【链表操作】奶牛的比赛 contest.pas/c/cpp
- 【普及组模拟赛】手机(mobile.pas/cpp) //2018.1.26
- 【usaco2013 mar】懒惰的奶牛[b](lazy_bronze.pas/cpp/c) //2018.1.28
- MZ test17# NOIP模拟题 # T4 第4题 路线统计(route.cpp/pas)[key:矩阵]
- 火星人(martian.pas/c/cpp)
- 石子合并(stone.pas/c/cpp)
- 【带权中位数】安装服务器(server.pas/c/cpp)
- Problem 4 上白泽慧音(classroom.cpp/c/pas)