编程pascal编程语言解决下面的题目,求大神啊

我是一名市区初一学生,在学习编程过程中经常遇到难题,哪位老师愿意指点我一下?以下是我在http://www.mydrs.org/program/list.asp?id=571大榕树网站看到的第十届全国青少年信息学奥林匹克联赛复赛试题 ,前两题我做出来了,后两题做不出来,我也看了他们在大榕树网站里的答案,看不懂,感觉不象是PASCAL语言写的,是因为我还没学到还是他们用的是别的语言???我现在学到数组,多维数组.很不好意思,我现在一段时间内可能还没有老师教,所以到这里请教了题目如下:一、津津的储蓄计划 (Save.pas/dpr/c/cpp). 【问题描述】 & & 津津的零花钱一直都是自己管理。每个月的月初妈妈给津津300元钱,津津会预算这个月的花销,并且总能做到实际花销和预算的相同。 & & 为了让津津学习如何储蓄,妈妈提出,津津可以随时把整百的钱存在她那里,到了年末她会加上20%还给津津。因此津津制定了一个储蓄计划:每个月的月初,在得到妈妈给的零花钱后,如果她预计到这个月的月末手中还会有多于100元或恰好100元,她就会把整百的钱存在妈妈那里,剩余的钱留在自己手中。 & & 例如11月初津津手中还有83元,妈妈给了津津300元。津津预计11月的花销是180元,那么她就会在妈妈那里存200元,自己留下183元。到了11月月末,津津手中会剩下3元钱。 & & 津津发现这个储蓄计划的主要风险是,存在妈妈那里的钱在年末之前不能取出。有可能在某个月的月初,津津手中的钱加上这个月妈妈给的钱,不够这个月的原定预算。如果出现这种情况,津津将不得不在这个月省吃俭用,压缩预算。 & & 现在请你根据2004年1月到12月每个月津津的预算,判断会不会出现这种情况。如果不会,计算到2004年年末,妈妈将津津平常存的钱加上20%还给津津之后,津津手中会有多少钱。 【输入文件】 & & 输入文件save.in包括12行数据,每行包含一个小于350的非负整数,分别表示1月到12月津津的预算。 【输出文件】 & & 输出文件save.out包括一行,这一行只包含一个整数。如果储蓄计划实施过程中出现某个月钱不够用的情况,输出-X,X表示出现这种情况的第一个月;否则输出到2004年年末津津手中会有多少钱。 【样例输入1】 29023028020030017034050 90 80 20060 【样例输出1】 -7 【样例输入2】 290 230 280 200 300 170 330 50 90 80 200 60 【样例输出2】 1580 二、合并果子 (fruit.pas/dpr/c/cpp) 【问题描述】 & & 在一个果园里,多多已经将所有的果子打了下来,而且按果子的不同种类分成了不同的堆。多多决定把所有的果子合成一堆。 & & 每一次合并,多多可以把两堆果子合并到一起,消耗的体力等于两堆果子的重量之和。可以看出,所有的果子经过n-1次合并之后,就只剩下一堆了。多多在合并果子时总共消耗的体力等于每次合并所耗体力之和。 & & 因为还要花大力气把这些果子搬回家,所以多多在合并果子时要尽可能地节省体力。假定每个果子重量都为1,并且已知果子的种类数和每种果子的数目,你的任务是设计出合并的次序方案,使多多耗费的体力最少,并输出这个最小的体力耗费值。 & & 例如有3种果子,数目依次为1,2,9。可以先将1、2堆合并,新堆数目为3,耗费体力为3。接着,将新堆与原先的第三堆合并,又得到新的堆,数目为12,耗费体力为12。所以多多总共耗费体力=3+12=15。可以证明15为最小的体力耗费值。 【输入文件】 & & 输入文件fruit.in包括两行,第一行是一个整数n(1&=n&=10000),表示果子的种类数。第二行包含n个整数,用空格分隔,第i个整数ai(1&=ai&=20000)是第i种果子的数目。 【输出文件】 & & 输出文件fruit.out包括一行,这一行只包含一个整数,也就是最小的体力耗费值。输入数据保证这个值小于231。 【样例输入】 3 1 2 9 【样例输出】 15 【数据规模】 对于30%的数据,保证有n&=1000: 对于50%的数据,保证有n&=5000; 对于全部的数据,保证有n&=10000。
分享给好友:
沙发:麦兜兜1995
三、合唱队形(chorus.pas/dpr/c/cpp)【问题描述】& & N位同学站成一排,音乐老师要请其中的(N-K)位同学出列,使得剩下的K位同学排成合唱队形。& & 合唱队形是指这样的一种队形:设K位同学从左到右依次编号为1,2…,K,他们的身高分别为T1,T2,…,TK,&&则他们的身高满足T1&...&Ti&Ti+1&…&TK(1&=i&=K)。& & 你的任务是,已知所有N位同学的身高,计算最少需要几位同学出列,可以使得剩下的同学排成合唱队形。【输入文件】& & 输入文件chorus.in的第一行是一个整数N(2&=N&=100),表示同学的总数。第一行有n个整数,用空格分隔,第i个整数Ti(130&=Ti&=230)是第i位同学的身高(厘米)。【输出文件】& & 输出文件chorus.out包括一行,这一行只包含一个整数,就是最少需要几位同学出列。【样例输入】8186 186 150 200 160 130 197 220【样例输出】4【数据规模】对于50%的数据,保证有n&=20;对于全部的数据,保证有n&=100。四、虫食算(alpha.pas/dpr/c/cpp)【问题描述】& & 所谓虫食算,就是原先的算式中有一部分被虫子啃掉了,需要我们根据剩下的数字来判定被啃掉的字母。来看一个简单的例子:& && & 43#& & +& & & && & & & 其中#号代表被虫子啃掉的数字。根据算式,我们很容易判断:第一行的两个数字分别是5和3,第二行的数字是5。& & 现在,我们对问题做两个限制:& & 首先,我们只考虑加法的虫食算。这里的加法是N进制加法,算式中三个数都有N位,允许有前导的0。& & 其次,虫子把所有的数都啃光了,我们只知道哪些数字是相同的,我们将相同的数字用相同的字母表示,不同的数字用不同的字母表示。如果这个算式是N进制的,我们就取英文字母表午的前N个大写字母来表示这个算式中的0到N-1这N个不同的数字:但是这N个字母并不一定顺序地代表0到N-1)。输入数据保证N个字母分别至少出现一次。& && && && &BADC& && &+& & CRDA& && && && &DCCC& & 上面的算式是一个4进制的算式。很显然,我们只要让ABCD分别代表0123,便可以让这个式子成立了。你的任务是,对于给定的N进制加法算式,求出N个不同的字母分别代表的数字,使得该加法算式成立。输入数据保证有且仅有一组解,【输入文件】& & 输入文件alpha.in包含4行。第一行有一个正整数N(N&=26),后面的3行每行有一个由大写字母组成的字符串,分别代表两个加数以及和。这3个字符串左右两端都没有空格,从高位到低位,并且恰好有N位。【输出文件】& & 输出文件alpha.out包含一行。在这一行中,应当包含唯一的那组解。解是这样表示的:输出N个数字,分别表示A,B,C……所代表的数字,相邻的两个数字用一个空格隔开,不能有多余的空格。【样例输入】5ABCEDBDACEEBBAA【样例输出】1 0 3 4 2【数据规模】对于30%的数据,保证有N&=10;对于50%的数据,保证有N&=15;对于全部的数据,保证有N&=26。
3楼:麦兜兜1995
以下是网站上发布的第三题的答案,我看不懂:合唱队形 解题报告&问题描述& N位同学站成一排,音乐老师要请其中的(N-K)位同学出列,使得剩下的K位同学排成合唱队形。& & 合唱队形是指这样的一种队形:设K位同学从左到右依次编号为1,2…,K,他们的身高分别为T1,T2,…,TK,&&则他们的身高满足T1&...&Ti&Ti+1&…&TK(1&=i&=K)。& & 你的任务是,已知所有N位同学的身高,计算最少需要几位同学出列,可以使得剩下的同学排成合唱队形。- 输入文件& & 输入文件chorus.in的第一行是一个整数N(2&=N&=100),表示同学的总数。第一行有n个整数,用空格分隔,第i个整数Ti(130&=Ti&=230)是第i位同学的身高(厘米)。- 输出文件& & 输出文件chorus.out包括一行,这一行只包含一个整数,就是最少需要几位同学出列。- 样例输入8186 186 150 200 160 130 197 220- 样例输出4- 数据规模对于50%的数据,保证有n&=20;对于全部的数据,保证有n&=100。&算法分析&动态规划。最基本的想法是:枚举中间最高的一个人,接着对它的左边求最长上升序列(注意序列中最高的同学不应高过基准),对右边求最长下降序列(同样的,序列中最高的同学不应高过基准)。时间复杂度为O(n^3),算法实现起来也很简单。接着对这个算法进行分析,我们不难发现,假如还是基于枚举一个同学的话,设Incsq表示了1 - i的最长上升序列,Decsq表示了i - n的最长下降序列,那么,Current = Incsq + Decsq - 1(两个数组中i被重复计算了)那么,我们只需要先求好最长上升和下降序列,然后枚举中间最高的同学就可以了。&算法优化&求最长上升序列的经典状态转移方程为:opt = max{opt[j]+1, 其中i&j&=n, 且list[j]&list}我们对状态转移方程稍微做一些修改:opt = max{opt[i+1], min{j, rec[j]&=list}}rec[j] = list很明显可以看出,在opt的寻找j的过程当中,查询序列是单调的,于是可以用二分法,就十分巧妙地在logn的时间内找到指定的j,而问题的总体复杂度为O(nlogn)。这样,这个问题的算法效率就得到了大幅度的提升,即便n是106,也可以轻松应对。&代码清单&#include &fstream&#include &cstring&ifstream fin(&chorus.in&);ofstream fout(&chorus.out&);const int maxn = 100;int n, a[maxn];int incsq[maxn], decsq[maxn];void init() {& & & & fin &&& & & & for (int i = 0; i & i ++)& & & & & & & & fin && a;}void LIncSeq(){& & & & int i, low, high, mid, ans = 0;& & & & int sol[maxn];& & & & for (i = 0; i & i ++) {& & & & & & & & low = 1; high =& & & & & & & & while (low &= high) {& & & & & & & & & & & & mid = (low + high) && 1;& & & & & & & & & & & & if (sol[mid] & a) low = mid + 1;& & & & & & & & & & & & else high = mid - 1;& & & & & & & & }& & & & & & & & if (low & ans) ans ++;& & & & & & & & sol[low] = a;& & & & & & & & incsq =& & & & }}void LDecSeq(){& & & & int i, low, high, mid, ans = 0;& & & & int sol[maxn];& & & & for (i = 0; i & i ++) {& & & & & & & & low = 1; high =& & & & & & & & while (low &= high) {& & & & & & & & & & & & mid = (low + high) && 1;& & & & & & & & & & & & if (sol[mid] & a) low = mid + 1;& & & & & & & & & & & & else high = mid - 1;& & & & & & & & }& & & & & & & & if (low & ans) ans ++;& & & & & & & & sol[low] = a;& & & & & & & & decsq =& & & & }}void work() {& & & & int i, max = 0;& & & & LIncSeq();& & & & LDecSeq();& & & & for (i = 0; i & i ++)& & & & & & & & if (incsq + decsq - 1 & max)& & & & & & & & & & & & max = incsq + decsq - 1;& & & & fout && n - max &&}int main() {& & & & init();& & & & work();& & & & return 0;}&小结&  问题虽然简单,仍然不能放过思考的余地。O(n^3)的算法是可以通过所有测试数据的,但是nlogn的算法里,不但体现了二分法的思想,而且也体现了多次动态规划的思想,这个思想在解决很多问题的时候,都有很大的作用。
4楼:麦兜兜1995
我想请问老师,以上网站上的答案是用哪种语言编的?能不能推荐几个别的计算机编程的网站?这个大榕树的太慢了,如果老师能把第三四题用PASCAL语言指点我一下,那就好了.我也可以和老师用QQ联系..
5楼:麦兜兜1995
期待中.............如果你愿意教我,我可以拜你为师,我们也可以互相讨论....我的QQ:83999006
6楼:thinkthink
呵呵,是C语言写的
7楼:麦兜兜1995
C语言?听说过,但我已经学了这么久PASCAL了,难道PASCAL没前途了吗?这个PASCAL不也是04年开始刚允许用的吗?我需不需要从头再学C语言了?我舍不得放下PASCAL...
8楼:麦兜兜1995
如果有老师会pascal语言,就加我QQ吧,我不会很烦你的...
9楼:青青岛社区网友pascal编程问题,求大神们解答一下!!_百度知道
pascal编程问题,求大神们解答一下!!
你和你的朋友到商店里去购物.#* **#,N.”表示可以通行,想要的物品应有尽有,X,并且给小亮一个巨大的惊喜,m&lt,而你的朋友就沿着最短路朝出口走去!心血来潮的你想送这些物品作为礼物给小亮,你们只能向下或向右走,但是真不知咋做,M)为出口有一天。你每个单位可以移动X个格,m&lt,n&lt。一开始你们站在入口处(即第1行;100100%,一个整数;1000.Sample Output
Copy 3HINT【数据范围】30%。现在你和你的朋友一同从入口进入,求高手指点指点,“,m&lt,M个字符以及行为换行符,意义如题目描述;“#”表示这里有1块石头;10,n&lt。Input第一行。你一开始就去买礼物(买礼物是瞬间完成,第1列的位置);“*”表示不能通行。这道题应该是回溯吧.#** *;1050%,四个整数,(1,M,每个数据都有一条或以上的线路通往出口。Output
一行;1000,Y。Sample Input
Copy 3 4 2 1 ,表示小明在小亮之前到达山洞出口,n&lt,你朋友每个单位可以移动Y个格,1)为入口;100,最多能捡到多少块石头,商店里也不免有一些不能通过的地方。接下来N行,(N,不耗时)。【问题描述】我们可以将商店想象成一个N×M的矩阵,但你想在朋友到达出口之前先到达出口,商店里琳琅满目
一行,一个整数,表示你在小亮之前到达商店出口,最多能拿多少个礼物? 所有打成石头的地方视为礼物这里打错了
提问者采纳
n)&end:next(p;to&nbsp,s+&#39:=1&&nbsp,m,s+&#39,q+1]&nbsp,n:string):readln(f),j,q]&R&#39,maxs),ch[i,'to&of
&#39:&#39.'j;for&nbsp:4;;
end,num+1;do&;if&begin&to& for&nbsp,y),m;procedure&s;
end:next(p+1、路径串}begin if&&);
);(p&lt,D' readln(f:=s;reset(f);ch[p+1;for&
case&);begin&end.'&#39,q;then
case&nbsp,q+1:m&nbsp,m)&nbsp,0;;{行;begin assign(f; for&R&#39,1; next(1;#'; f,q;j; close(f),q+1:next(p、礼物数type charray=array[1,j]):=0;
'D'(p=n)and(q=m)&nbsp,s+'var ch,of
'write(ch[i;begin
if&m&nbsp.in&#39:
n;to&nbsp,y,&#39,num+1,x.100;max.;of&& writeln(,
&#39,s+';);送礼:=1&char,x、列;&&nbsp,i;begin&'read(f;
if&i;;then&nbsp:;then&i;&n&nbsp:='next(p;&then& num&gt.100]&&end else&&nbsp:=writeln,1,q;);(q&lt:=1&do&&nbsp:=1&ch[p;&nbsp,j]),'do&n&);&nbsp.;maxs:next(p+1;#'&max&nbsp
提问者评价
其他类似问题
为您推荐:
pascal的相关知识
其他1条回答
这应该是数塔吧?
管他是啥,到底该怎么做啊?
等待您来回答
下载知道APP
随时随地咨询
出门在外也不愁pascal编程问题,求大神们解答一下!!回溯题目呀!!真心不会做。。-中国学网-中国IT综合门户网站
> pascal编程问题,求大神们解答一下!!回溯题目呀!!真心不会做。。
pascal编程问题,求大神们解答一下!!回溯题目呀!!真心不会做。。
转载 编辑:李强
为了帮助网友解决“pascal编程问题,求大神们解答一下!”相关的问题,中国学网通过互联网对“pascal编程问题,求大神们解答一下!”相关的解决方案进行了整理,用户详细问题包括:每个数据都有一条或以上的线路通往出口,1)为入口,四个整数。接下来N行,第1列的位置),n&lt.#* **#,m&lt,M个字符以及行为换行符,你朋友每个单位可以移动Y个格;100.Sample Output Copy 3HINT【数据范围】30%,(N。这道题应该是回溯吧,M。Sample Input Copy 3 4 2 1 ,N,求高手指点指点;10,m&lt,(1。【问题描述】我们可以将商店想象成一个N×M的矩阵;“#”表示这里有1个礼物。你每个单位可以移动X个格.”表示可以通行,你们只能向下或向右走。Output一行;“*”表示不能通行,n&lt,但你想在朋友到达出口之前先到达出口。你一开始就去买礼物(假设买礼物是瞬间完成,但是真不知咋做.#** *;1050%,意义如题目描述。一开始你们站在入口处(即第1行;100100%,不耗时);1000,表示你在你的朋友之前到达商店出口。现在你和你的朋友一同从入口进入,Y。Input第一行,想要的物品应有尽有,M)为出口;1000,“,n&lt,最多能拿到多少礼物,商店里也不免有一些不能通过的地方,商店里琳琅满目,并且给他一个巨大的惊喜,m&lt,一个整数有一天!心血来潮的你想送这些物品作为礼物给你的朋友,X,而你的朋友就沿着最短路朝出口走去,你和你的朋友到商店里去购物,具体解决方案如下:解决方案1:<解决方案2:由于只能向下或向右走,每个位置的下一步有0、1或2种选择。0或1种选择肯定不存在回溯,2种选择间是相互独立的,并无互相影响,所以不存在回溯。需要回溯的问题通常要引入状态数组,你这个问题显然是不需要状态数组的!解决方案3:但是大师你这个超时了呀,怎么提高效率?解决方案4:本方法是逐个遍历所有可能的路线,找出礼物最多的那条,所以,可能的路线或者死胡同愈多,费时愈长,超时也在情理之中。作为递归解法,我这个解法可能是最优的 !!!另外,递归的嵌套最大层数为m+n,当m+n太大时,有可能出现栈溢出。递归方法会提供一个最简单最易理解的解题思路。转化为递推解法会提高效率,但有些问题是无法转的。也许哪个更牛的大神能有更好的方法 !!!解决方案5:................无语了。。。。。。。你这个是四重递归了吧。。。解决方案6:小伙子,这个递归实质上是一个二叉树!看来递归你还未入门!先从简单地做起吧!通过对数据库的索引,我们还为您准备了: double和int在内存地址中存储的结构不一样,double占8个字节,int占4个字节。上图是double a在内存中的值。printf("%d",a);这时a的取值为0转化成int...===========================================打开一个Excel表,按ALT+F11进入VBE窗口,在左上方的工程-VBAProject那里的sheet1上双击一下,在右边的空白区域输入下列代码: Sub aa() M = Val(InputBox("请输入放...=========================================== (你说的应该是下面这个吧?) e100 33 f6 bf 0 20 b5 10 f3 a5 8c c8 5 0 2 50 68 13 1 cb e 1f be a1 1 bf 0 1 e11b 6 57 b8 11 1 bb 21 13 89 7 4b 4b 48 79 f9 ad 86 e0 8b c8 bd ff ...=========================================== 定义两个数组一个用来存储图片,一个用来存储相对应的文字......===========================================但是因为服务器太贵而且一直存在效率问题,不建议现在转学Java,未来难以预料啊。反正是作为第二种开发语言,学一门比较新的吧。想做苹果的开发的话学一下Objective-C也不...=========================================== 3,4、使徒代表着来自于adam这一支白之月的补完,他们的补完意味着地球上人类失败,无法完成补完而将灭绝。因而为了杜绝这个问题,必须先将使徒处理干净。 5、原渡所需...===========================================哥告诉你 &前面是对应问题的序号1.(1)& len(a)(2)substr(a,3,4) (4) right(A,3)+left(B,3) (5) ROUND(VAL(B),2) (6) & at("cde",a) & & & &...===========================================木马可以盗取你电脑所有的用户资料、信息 软件高手会用一些生僻的编程语言来编... 会直接在后台上传一个木马到您的机器上(其实不种木马对他们来说也没有太大问题 就...===========================================喜欢编程,就选择个自己喜欢的语言学习下去,新私ㄒ檠?vB,C/C++也不错。 3、多去论坛看帖子,看自己懂的,不懂的,回答自己懂的问题,因为在你回答自己懂的问题的同时,自己加...===========================================一般的IBM PC兼容将使用Intel 82C59A-2 CMOS可编程中断控制器或其派生者。这种控... 对PCI设备驱动来说这不是什么大问题,它们总是可以知道其中断号。但对于ISA设备驱动...===========================================
本文欢迎转载,转载请注明:转载自中国学网: []
用户还关注
可能有帮助pascal编程练习100题3
&|&&|&&|&&|&&|&&|&&|&&|&&|&&|&&|&&|&&|&&|&&|&&|&
您现在的位置:&&>>&&>>&&>>&&>>&正文
pascal编程练习100题3
作者:佚名&&&&信息来源:&&&&点击数:604&&&&更新时间:&&&&
6119921992
&& & : 33=7+9+11=27&&&&&&&&&&& 43=13+15+17+19=64
63“52”“”2005000“Gao”“Di”“Ok”
65,6,3;5,4,?
661700(31)(21),, ?
67X100,X168 X?
&&& 530180180830
72<SPAN lang=EN-US style="FONT-SIZE: 15 COLOR: #+2+...+nforrepeatwhile
73<SPAN lang=EN-US style="FONT-SIZE: 15 COLOR: #+1/2+1/3+...+1/nforrepeatwhile
74<SPAN lang=EN-US style="FONT-SIZE: 15 COLOR: #-1/2+1/3-1/4+1/5-1/6...+1/nforrepeatwhile
<SPAN lang=EN-US style="FONT-SIZE: 15 COLOR: #<SPAN lang=EN-US style="FONT-SIZE: 15 COLOR: #-2+3-4+5-6+..+ nforrepeatwhile
<SPAN lang=EN-US style="FONT-SIZE: 15 COLOR: #1+(1+1/2)+(1+1/2+1/3)+ (1+1/2+1/3+1/4)...+(1+1/2+...+1/n)forrepeatwhile
77<SPAN lang=EN-US style="FONT-SIZE: 15 COLOR: #0+97+……+4+1forrepeatwhile
781N55.N&32767
801,2,3,4,5……nx
&&&&&&& 16& 31&& 6
&& 1& 4&& 7&& 10&& 13&& 16&&
&& 2& 5&& 8&& 11&& 14&&&
&& 3& 6&& 9&& 12&& 15
&&& 3541131258
86XX10000X7“Yes”“No”
87‘#’ABC
&&& ABcdAbCD#A& 2&& B& 2 &C& 2
88输出如下数字图形
&&& 1&&&&&& &2 &3& 4&&&&& & 5& 6& 7&& 8& 9&&&&&& &7 &8 &9 &10& 11 12 13
&&14 15 16& 17& 18 19 20 21 22
89、输出如下图形:
&& *&& ###&&&*****&& #######&& *********
901*3+3*5+5*7+7*9+…+99*101
91Faibonacci: 0,1,1,2,3,5,8,…,, 30,&& 56
92N,N: N=12,: 12=1*2*2*3.
93 N 100000 N
94N1≤N≤100N 11234……N-2,N-1,N1N N=121212345678910111212 S=1+2+3+4+5+6+7+8+9+1+0+1+1+1+2=51
95N1≤N≤100N x0≤x≤10A0≤A≤20B0≤N≤2035678 917
95编程序打印出下列图案:
平行四边形&&&&&&&&&&& 等腰三解形      菱形
  ******&&&&&&&&& *&&&&&&&&&&&&&   *
&& ******&&&&&&&&& ***&&&&&&&&&&&&&&& ***
& ******&&&&&&&&& *****&&&&&&&&&&&&& *****
&******&&&&&&&&& *******&&&&&&&&&&&&& ***
******&&&&&&&&& *********&&&&&& &&&&&&&*
96编程打印出如下图案:
&&&&&&&&& 1
&&&&&&&& 222
&&&&&&& 33333
&&&&&& 4444444
97题目描述
h ( 0 &= h & 24 )m ( 0 &= m & 60 )s ( 0 &= s & 60 )
有一头成年母牛,当年年初生一头小母牛。每头小母牛在从出生那一年算起的第四年的年初成年(算当年,实际指三年后),也能生一头小母牛(哇,全生母牛,这样公牛就不怕找不到媳妇了),问年后共有多少头母牛(母牛全是长生不老的,且无灾无病,成年后永久保持生育能力每年都能生一头小母牛)。
一行:一个整数()。
一行:一个整数,表示年后母牛一共的头数。
输出解释第一年时,一只成年母牛生下一只小母牛,第一年有只母牛;第二年时,这只成年母牛又生下一只小母牛,第二年有只母牛;第三年时再生一只,第三年有只母牛;第四年时再生一只,同时第一年生的小母牛成年了,也生下一只小母牛,一共有只母牛。
数据规模的数据满足;的数据满足。
某人摘下一些桃子,第一天卖掉一半,又吃了一个,第二天卖掉剩下的一半,又吃了一个,以后各天都是如此处理,到第天发现只剩下一只桃子,试编写程序一共摘的桃子个数。
一行:一个整数()
一行:一个整数,表示一开始的桃子个数。
的数据满足;的数据满足;的数据满足。
S=1+2+3+…n& 输入一个数据,求时的的最大值。
上一个信息: 下一个信息: 没有了
信息录入:良犬&&&&责任编辑:良犬&
以上资源来源于网络,假如侵害到你的权力请第一时间联系本站,本站将立即删除相关内容。
本站部分资源来自网络,如果侵害到你的权力请第一时间联系我们,本站将立即删除相关内容。
小学生自学网
QQ: 邮箱:(把#改成@)浙ICP备号FreePascal编程语言题目高手速度进谢谢
FreePascal编程语言题目高手速度进谢谢
描述从键盘输入n个整数a1,a2,…,ak,ak+1,…an对其进行平移处理,按ak+1,…,an,a1,a2,…,ak,ak+1的顺序输出,其中k是小于n的常数。输入第一行输入两个整数:nm(2&m&n&100)第二行输入n个整数。输出输出n个每个数,每个整数的输出场宽为6。样例输入85样例输出
varn,m,i:a:array[1..100]beginread(n,m);fori:=1tondoread(a[i]);fori:=m+1tom+ndowrite(a[(i-1)modn+1]:6);end.
相关知识等待您来回答
编程领域专家
& &SOGOU - 京ICP证050897号

我要回帖

更多关于 pascal编程题目 的文章

 

随机推荐