博客园  :: 首页  :: 新随笔  :: 联系 :: 订阅 订阅  :: 管理

2010年10月7日

摘要: 10. “牛顿楼梯问题”: 有个楼梯共N级,上楼时每步可以跨1级、2级或者3级。问:共有多少种上楼梯的方法? //“牛顿楼梯问题”: 有个楼梯共N级,上楼时每步可以跨1级、2级或者3级。问:共有多少种上楼梯的方法?////楼梯只有一级的走法://如果只有一级楼梯,那就只有1种走法。而且是一步一级。即:1 = 1////楼梯只有两级的走法://如果楼梯... 阅读全文

posted @ 2010-10-07 13:49 桃子在路上 阅读(98) 评论(0) 推荐(0) 编辑

摘要: 9. fibonacci数列的前两项为0、1,以后的每一项都是其前两项之和。计算fibonacci数列前100项的值。 program exRecurrence9_1;var a1, a2, s : double; i : integer;begin a1 := 0; a2 := 1; write(a1:0:0, ' ', a2:0:0, ' '); for i := 3 to 100 do be... 阅读全文

posted @ 2010-10-07 13:46 桃子在路上 阅读(148) 评论(0) 推荐(0) 编辑

摘要: 6. 一个两位数 x,个位上的数字与十位上的数字对调后得到第二个两位数 y;此时, y - x = 36。求所有这样的两位数。 program exExhaustive6_1;const c = 36;var f, s : integer;begin for s := 1 to 9 do for f := 1 to s-1 do if (s*10+f-f*10-s = c) then writel... 阅读全文

posted @ 2010-10-07 13:42 桃子在路上 阅读(160) 评论(0) 推荐(0) 编辑

摘要: 5. 求出 1 - 10000 以内所有所有 10 以内的素数的倍数,统计它们的和。 program exExhaustive5_1;const e = 10000;var i, sum : Longint;begin for i := 2 to e do if (i mod 2 = 0) or (i mod 3 = 0) or (i mod 5 = 0) or (i mod 7 = 0) the... 阅读全文

posted @ 2010-10-07 12:00 桃子在路上 阅读(233) 评论(0) 推荐(0) 编辑

摘要: 1. 将100圆兑换为20, 10, 5, 2, 1,五种不同面额的纸币,输出每种换法,最后输出换法总数。 program exExhaustive1_1;const All = 100;var twenty, ten, five, two, num : integer;begin for twenty := 1 to All div 20 do for ten := 1 to (All - tw... 阅读全文

posted @ 2010-10-07 11:55 桃子在路上 阅读(291) 评论(0) 推荐(0) 编辑

摘要: program expicture1_1;const lines = 4;vari, j : integer;beginfor i := 1 to lines dobeginwrite(' ' : i);for j := 1 to 2*(lines-i)+1 dowrite('#');writeln;end;readln;end.program expicture1_1;const MaxChar... 阅读全文

posted @ 2010-10-07 11:31 桃子在路上 阅读(193) 评论(0) 推荐(1) 编辑

摘要: 1、打印以下图形 ############ ### #2、打印以下图形 * +++ *****+++++++ ***** +++ *3、打印以下图形 3 33322222 222 14、 打印以下图形 a bbb ccccc ddddddd eeeeeeeeef f f f f f f f f f f5、打印以下图形 0 101 21012 32101234321012346、打印以下图形 ... 阅读全文

posted @ 2010-10-07 11:28 桃子在路上 阅读(199) 评论(0) 推荐(0) 编辑

摘要: 一、竞赛形式和成绩评定NOIP分两个等级组:普及组和提高组。每组竞赛分两轮:初试和复试。初试形式为笔试,侧重考察学生的计算机基础知识和编程的基本能力,并对知识面的广度进行测试。初试为资格测试,获本省初试成绩在本赛区前15%的学生进入复赛。复试形式为上机编程,着重考察学生对问题的分析理解能力,数学抽象能力,编程语言的能力和编程技巧、想象力和创造性等。各省NOIP的等第奖在复试的优胜者中产生。比赛中使... 阅读全文

posted @ 2010-10-07 11:18 桃子在路上 阅读(1970) 评论(0) 推荐(0) 编辑

摘要: 1.定义枚举类型monthtype表示十二个月,输入1-12中的某一个数,输出对应月份的英文缩写和表示写一个月的数字。如:输入 6输出 jun next month :7program ex01;type month=(jan,feb,mar,apr,may,jun,jul,aug,sep,oct,nov,dec);var m,n:month; k:1..12;begin write('input... 阅读全文

posted @ 2010-10-07 11:17 桃子在路上 阅读(233) 评论(0) 推荐(0) 编辑

摘要: 【问题】甲乙丙丁戊五个人在运动会上分获百米、二百米、跳高、跳远和铅球冠军,有 四个人猜测比赛结果: A说:乙获铅球冠军,丁获跳高冠军。 B说:甲获百米冠军,戊获跳远冠军。 C说:丙获跳远冠军,丁获二百米冠军。 D说:乙获跳高冠军,戊获铅球冠军。 其中每个人都只说对一句,说错一句。求五人各获哪项冠军。【算法】用1,2,3,4,5分别代表百米、二百米、跳高、跳远和铅球5个项目,用a,b,c,d,e 分... 阅读全文

posted @ 2010-10-07 11:15 桃子在路上 阅读(400) 评论(0) 推荐(0) 编辑