摘要: 题意给出Marry乳业每天对牛奶的需求量,还有每位奶农提供的牛奶单价和产量。计算采购足够数量的牛奶所需的最小花费。分析排序,最小价值优先取,太多了就退出循环,输出(之前的价值+还有多少需求*退出时的单价)。varn,m,i,j,tj:longint;a,b:array... 阅读全文
posted @ 2017-02-04 12:54 银叶草 阅读(248) 评论(0) 推荐(0) 编辑
摘要: 题意给出Marry乳业每天对牛奶的需求量,还有每位奶农提供的牛奶单价和产量。计算采购足够数量的牛奶所需的最小花费。分析排序,最小价值优先取,太多了就退出循环,输出(之前的价值+还有多少需求*退出时的单价)。varn,m,i,j,tj:longint;a,b:array... 阅读全文
posted @ 2017-02-04 12:53 银叶草 阅读(134) 评论(0) 推荐(0) 编辑
摘要: 题意现在我们已知一组单词,且给定一个开头的字母,要求出以这个字母开头的最长的“龙”(每个单词都最多在“龙”中出现两次),在两个单词相连时,其重合部分合为一部分,例如 beast和astonish,如果接成一条龙则变为beastonish,另外相邻的两部分不能存在包含关... 阅读全文
posted @ 2017-02-03 22:52 银叶草 阅读(174) 评论(0) 推荐(0) 编辑
摘要: 题意找出奖学金最多的学生分析这题就是很简单的字符串处理,细心一点就好。先把每一个学生的奖学金算出来,再排序,如果有两位或两位以上的学生获得的奖金最多,输出他们之中在输入文件中出现最早的学生的姓名。varn,tj,i,gb,xb,lw,q,b,j:longint;m:a... 阅读全文
posted @ 2017-02-03 22:20 银叶草 阅读(110) 评论(0) 推荐(0) 编辑
摘要: 题意安排比赛,且不能同时进行两个比赛,使比赛场数最多。分析这题用贪心的方法来做,先排序结束时间,再依次考虑各个活动。varn,i,tj,t:longint;a,b:array[0..1000000]of longint;procedure kp(l,r:longint... 阅读全文
posted @ 2017-02-03 18:57 银叶草 阅读(78) 评论(0) 推荐(0) 编辑
摘要: const max=1000;vara,b:array[0..max]of longint;procedure init;vars1,s2,s:string;l1,l2,i:longint;begin readln(s1); readln(s2); ... 阅读全文
posted @ 2017-01-13 21:56 银叶草 阅读(174) 评论(0) 推荐(0) 编辑
摘要: 题意把总分排序分析先按总分从高到低排序,如果两个同学总分相同,再按语文成绩从高到低排序,如果两个同学总分和语文成绩都相同,那么规定学号小的同学 排在前面vara,t,p:array[0..300]of longint;n,i,x,y,j:longint;procedu... 阅读全文
posted @ 2017-01-13 21:35 银叶草 阅读(97) 评论(0) 推荐(0) 编辑
摘要: 题意排序分析数据规模太大,建议使用快排。varn,i:longint;a:array[0..100000]of longint;procedure kp(l,r:longint);vari,j,mid:longint;begin if l>=r then exi... 阅读全文
posted @ 2017-01-13 21:27 银叶草 阅读(356) 评论(0) 推荐(0) 编辑
摘要: 题意找出这n个人排队的一种顺序,使得n个人的平均等待时间最小。分析打水的时候花费时间越少的人越先打,那么所有人的等待时间之和就会最小,所以我们要先排序,再计算总时间vara,b:array[0..50000]of longint;n,i,j,w:longint;tj:... 阅读全文
posted @ 2017-01-13 21:15 银叶草 阅读(137) 评论(0) 推荐(0) 编辑
摘要: 分析要用高精度,数组一定要开得大。我做的时候,就是因为数组不够大而和我朋友调试了超久。const maxn=2600;vara,b:array[1..maxn]of longint;c:array[1..2*maxn]of longint;l1,l2:longint;... 阅读全文
posted @ 2017-01-13 20:21 银叶草 阅读(182) 评论(0) 推荐(0) 编辑
Live2D