随笔分类 -  2017寒假作业

摘要:题意n个同学站成一个圆圈,其中的一个同学手里拿着一个球,当老师吹哨子时开始传球,每个同学可以把球传给自己左右的两个同学中的一个(左右任意),当老师在此吹哨子时,传球停止,此时,拿着球没有传出去的那个同学就是败者。分析一个球只能从左边和右边传来所以 f[i,j]:=f[... 阅读全文
posted @ 2017-02-05 18:49 银叶草 阅读(102) 评论(0) 推荐(0)
摘要:题意打印图案分析仔细看输出,理解题意,思路清晰就能做出这题。vari,j,k,a:longint;s:ansistring;p:array[0..9,1..5]of longint=((1,1,0,1,1),(0,2,0,2,0),(1,2,1,3,1),(1,2,1... 阅读全文
posted @ 2017-02-05 18:37 银叶草 阅读(139) 评论(0) 推荐(0)
摘要:题意对于一系列比赛信息的输入(WL形式),输出正确的结果。分析如果理解了题目,那么就能做出这题。vari,n,x,y:longint;w:char;a:array[0..100000]of char;begin n:=0; repeat r... 阅读全文
posted @ 2017-02-05 18:21 银叶草 阅读(137) 评论(0) 推荐(0)
摘要:题意请考虑一个由1到N(N=3, 4, 5 ... 9)的数字组成的递增数列:1 2 3 ... N。 现在请在数列中插入“+”表示加,或者“-”表示减,“ ”表示空白(例如1-2 3就等于1-23),来将每一对数字组合在一起(请不要在第一个数字前插入符号)。 计算该... 阅读全文
posted @ 2017-02-05 17:28 银叶草 阅读(275) 评论(0) 推荐(0)
摘要:题意从右边开始切下肋骨,每次还剩下的肋骨上的数字都组成一个质数,举例来说: 7 3 3 1 全部肋骨上的数字 7331是质数;三根肋骨 733是质数;二根肋骨 73 是质数;当然,最后一根肋骨 7 也是质数。 7331 被叫做长度 4 的特殊质数。写一个程序对给定的肋... 阅读全文
posted @ 2017-02-05 16:46 银叶草 阅读(410) 评论(0) 推荐(0)
摘要:题意找出范围[a,b](5 0 do begin inc(s); t:=t div 10; end; work:=s;end;function ss(s:string):longint;varsz,i:longint;be... 阅读全文
posted @ 2017-02-05 16:31 银叶草 阅读(264) 评论(0) 推荐(0)
摘要:题意给出N年的一个周期,要求计算1900年1月1日至1900+N-1年12月31日中十三号落在周一到周日的次数分析先算出当前月份的天数,再看有没有到13号,有的话就加次数。varx,m,y,d,i,n,j:longint;a:array[1..7]of longint... 阅读全文
posted @ 2017-02-04 21:49 银叶草 阅读(161) 评论(0) 推荐(0)
摘要:题意通过小组名和彗星名来决定这个小组是否能被那颗彗星后面的UFO带走。小组名和彗星名都以下列方式转换成一个数字:最终的数字就是名字中所有字母的积,其中“A”是1,“Z”是26。例如,“USACO”小组就是21*19*1*3*15=17955。如果小组的数字 mod 4... 阅读全文
posted @ 2017-02-04 19:57 银叶草 阅读(112) 评论(0) 推荐(0)
摘要:题意找出句子中所有用英文表示的数字(≤20),将这些数字平方后%100,如00,05,11,19,86,99。把这些两位数按数位排成一行,组成一个新数,如果开头为0,就去0。找出所有排列方法中最小的一个数,即为密码。分析先计算出每一个数字的平方,不过在放进数组里时,只... 阅读全文
posted @ 2017-02-04 19:26 银叶草 阅读(177) 评论(0) 推荐(0)
摘要:题意要求n个物品中,任取若干个装入箱内,使箱子的剩余空间为最小。分析这题跟装载问题差不多,只不过这题是输出剩余空间。先排序,再从大到小搜。varn,c,i,tao,t,tj:longint;b,s:array[0..5000]of longint;procedure ... 阅读全文
posted @ 2017-02-04 18:01 银叶草 阅读(169) 评论(0) 推荐(0)
摘要:题意在不超过N元(可以等于N元)的前提下,使每件物品的价格与重要度的乘积的总和最大。varn,m,i,j,v,p:longint;f:array[1..30001]of longint;begin readln(n,m); for i:=1 to m do... 阅读全文
posted @ 2017-02-04 17:25 银叶草 阅读(91) 评论(0) 推荐(0)
摘要:题意给出一段序列,选出其中连续且非空的一段使得这段和最大。分析一个一个加,只要判断总和会不会小于0就行,小于0就接着往下重新计算和,因为如果所有数据里有正数的话,单个正数肯定更大,而如果都是负数的话,单个负数也比负数和大。varn,i,t,m:longint;a:ar... 阅读全文
posted @ 2017-02-04 16:53 银叶草 阅读(110) 评论(0) 推荐(0)
摘要:题意从最高点到底部任意处结束的路径,使路径经过数字的和最大。每一步可以走到左下方的点也可以到达右下方的点。分析从最低层开始走。varn,i,j:longint;f,a:array[0..2000,0..2000]of longint;function work(x,y... 阅读全文
posted @ 2017-02-04 16:34 银叶草 阅读(187) 评论(0) 推荐(0)
摘要:题意从最高点到底部任意处结束的路径,使路径经过数字的和最大。每一步可以走到左下方的点也可以到达右下方的点。分析从最低层开始走。varn,i,j:longint;f,a:array[0..2000,0..2000]of longint;function work(x,y... 阅读全文
posted @ 2017-02-04 16:33 银叶草 阅读(315) 评论(0) 推荐(0)
摘要:题意有N级的台阶,你一开始在底部,每次可以向上迈最多K级台阶(最少1级),问到达第N级台阶有多少种不同方式。分析递推公式a[i]:=a[i]+a[i-j];varn,k,i,j:longint;a:array[-1000..100000]of longint;begi... 阅读全文
posted @ 2017-02-04 16:15 银叶草 阅读(155) 评论(0) 推荐(0)
摘要:题意求b^p mod k的值。分析这题要用到一个原理,百度上搜’快速幂‘可以找到。varb,p,k,l,t,w,i:longint;a:array[1..32]of longint;begin read(b,p,k); l:=0; t:=p; ... 阅读全文
posted @ 2017-02-04 13:43 银叶草 阅读(150) 评论(0) 推荐(0)
摘要:题意对于给定的一个长度为N的正整数数列A[i],现要将其分成连续的若干段,并且每段和不超过M(可以等于M),问最少能将其分成多少段使得满足要求。分析一个一个加上s,如果s>m,那么s就变成当前的数字,并且tj+1varn,m,tj,i,s,w:longint;begi... 阅读全文
posted @ 2017-02-04 13:05 银叶草 阅读(127) 评论(0) 推荐(0)
摘要:题意给出Marry乳业每天对牛奶的需求量,还有每位奶农提供的牛奶单价和产量。计算采购足够数量的牛奶所需的最小花费。分析排序,最小价值优先取,太多了就退出循环,输出(之前的价值+还有多少需求*退出时的单价)。varn,m,i,j,tj:longint;a,b:array... 阅读全文
posted @ 2017-02-04 12:54 银叶草 阅读(290) 评论(0) 推荐(0)
摘要:题意给出Marry乳业每天对牛奶的需求量,还有每位奶农提供的牛奶单价和产量。计算采购足够数量的牛奶所需的最小花费。分析排序,最小价值优先取,太多了就退出循环,输出(之前的价值+还有多少需求*退出时的单价)。varn,m,i,j,tj:longint;a,b:array... 阅读全文
posted @ 2017-02-04 12:53 银叶草 阅读(147) 评论(0) 推荐(0)
摘要:题意现在我们已知一组单词,且给定一个开头的字母,要求出以这个字母开头的最长的“龙”(每个单词都最多在“龙”中出现两次),在两个单词相连时,其重合部分合为一部分,例如 beast和astonish,如果接成一条龙则变为beastonish,另外相邻的两部分不能存在包含关... 阅读全文
posted @ 2017-02-03 22:52 银叶草 阅读(185) 评论(0) 推荐(0)

Live2D