摘要：
题意给出N年的一个周期，要求计算1900年1月1日至1900+N-1年12月31日中十三号落在周一到周日的次数分析先算出当前月份的天数，再看有没有到13号，有的话就加次数。varx,m,y,d,i,n,j:longint;a:array[1..7]of longint... 阅读全文
摘要：
题意通过小组名和彗星名来决定这个小组是否能被那颗彗星后面的UFO带走。小组名和彗星名都以下列方式转换成一个数字：最终的数字就是名字中所有字母的积，其中“A”是1，“Z”是26。例如，“USACO”小组就是21*19*1*3*15=17955。如果小组的数字 mod 4... 阅读全文
摘要：
题意找出句子中所有用英文表示的数字(≤20)，将这些数字平方后%100，如00,05,11,19,86,99。把这些两位数按数位排成一行，组成一个新数，如果开头为0，就去0。找出所有排列方法中最小的一个数，即为密码。分析先计算出每一个数字的平方，不过在放进数组里时，只... 阅读全文
摘要：
题意要求n个物品中，任取若干个装入箱内，使箱子的剩余空间为最小。分析这题跟装载问题差不多，只不过这题是输出剩余空间。先排序，再从大到小搜。varn,c,i,tao,t,tj:longint;b,s:array[0..5000]of longint;procedure ... 阅读全文
摘要：
题意在不超过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... 阅读全文
摘要：
题意给出一段序列，选出其中连续且非空的一段使得这段和最大。分析一个一个加，只要判断总和会不会小于0就行，小于0就接着往下重新计算和，因为如果所有数据里有正数的话，单个正数肯定更大，而如果都是负数的话，单个负数也比负数和大。varn,i,t,m:longint;a:ar... 阅读全文
摘要：
题意从最高点到底部任意处结束的路径，使路径经过数字的和最大。每一步可以走到左下方的点也可以到达右下方的点。分析从最低层开始走。varn,i,j:longint;f,a:array[0..2000,0..2000]of longint;function work(x,y... 阅读全文
摘要：
题意从最高点到底部任意处结束的路径，使路径经过数字的和最大。每一步可以走到左下方的点也可以到达右下方的点。分析从最低层开始走。varn,i,j:longint;f,a:array[0..2000,0..2000]of longint;function work(x,y... 阅读全文
摘要：
题意有N级的台阶，你一开始在底部，每次可以向上迈最多K级台阶（最少1级），问到达第N级台阶有多少种不同方式。分析递推公式a[i]:=a[i]+a[i-j];varn,k,i,j:longint;a:array[-1000..100000]of longint;begi... 阅读全文
摘要：
题意求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; ... 阅读全文
摘要：
题意对于给定的一个长度为N的正整数数列A[i]，现要将其分成连续的若干段，并且每段和不超过M（可以等于M），问最少能将其分成多少段使得满足要求。分析一个一个加上s，如果s>m，那么s就变成当前的数字，并且tj+1varn,m,tj,i,s,w:longint;begi... 阅读全文
摘要：
题意给出Marry乳业每天对牛奶的需求量，还有每位奶农提供的牛奶单价和产量。计算采购足够数量的牛奶所需的最小花费。分析排序，最小价值优先取，太多了就退出循环，输出（之前的价值+还有多少需求*退出时的单价）。varn,m,i,j,tj:longint;a,b:array... 阅读全文
摘要：
题意给出Marry乳业每天对牛奶的需求量，还有每位奶农提供的牛奶单价和产量。计算采购足够数量的牛奶所需的最小花费。分析排序，最小价值优先取，太多了就退出循环，输出（之前的价值+还有多少需求*退出时的单价）。varn,m,i,j,tj:longint;a,b:array... 阅读全文