全国青少年信息学奥林匹克联赛培训习题(4)

- 16 - 成都树德实验中学Pascal程序设计

* * * * * * * * * * * * * * * program ex4_5_1(input,output)； var

i,j:integer；

begin

for i:=1 to ① do begin

write(’ ’: ② )； for j:=1 to ③ do write( ④ )； writeln； end；

end.

2、下面是一个求：1/1+1/2+2/3+3/5+5/8+8/13+13/21+21/32+?前20项的和的程序段，试将程序补充完整：

s:=0； a:=1； b:=1； for k:=1 to 10 do begin

s:=_____①______； a:=_____②______； s:=_____③______； b:=_____④______； end； writeln(s)；

3、求出满足下列条件的二位数：

将此二位数的个位数字与十位数字进行交换，可以得到一个新的数，要求新数与原数之和小于100（每行输出6个满足要求的数）。

begin

k:=0；

for i:=____①_____ to 99 do begin

x:=____②_____； y:=____③_____； j:=x*10+y；

if ____④_____ then begin

k:=k+1； write(i:4)；

__⑤__ then writeln; end； end； end.

六、编写程序

1、编写程序，分别用字符打印如下图形：

成都树德实验中学Pascal程序设计 - 17 -

⑴ * * * * * ⑵ @ * * * * * @ @ * * * * * @ @ @

2、键入a,b二个变量的值，打印输出a+b的横式与竖式。 3、键入三个变量值a,b,c,将它们交换值打印输出。. 4、求一个长方形的周长和面积。

5、键入一个四位整数（如3529），将其各位数字倒序（如9253）打印。 6、输入一个字符，输出该字符及其序数值。

7、输入两个字符，分别打印它们的前导值，后续值和字符码。 8、输入圆的半径，分别打印周长和面积值。

9、输入两个整数，输出它们的平方和及它们的平方根。

10、输入两个整数，输出它们相除的整数商及余数。（用算式表示） 11、输入一个时间的秒数，分别将其换算为下述时间单位输出： * 小时 * 天 * 星期

12、读入二个整数a,b,输出其中最小的数。 13、判断读入的整数a是奇数还是偶数。

14、读入二个字符，若这两个字符的ascⅡ码之差是奇数，打印这两个字符的后续字符；否则打印它们的前趋字符。

15、将字母A、B、C、D或a、b、c、d转换成1、2、3、4，其余的字符转换成5。 16、输入三个数a,b,c, 打印出最大者。 ⑴ 不嵌套的if语句； ⑵ 嵌套的if语句。 17、读一组整数，用0作为终止标志，打印其中正、负数的个数及各自的总和。 18、找出被2、3、5除时余数为1的最小的十个数。

19、选票统计：有a、b、c、d四位候选人，n位投票人，统计时，a、b、c、d以外的字符为弃权，按得票多少打印出候选人代号及得票数。

20、按字母表的顺序和逆序每隔一个字母打印输出。 21、打印输入的n个整数中的最大、最小数及其字号。 22、打印以下各式的值：

⑴ s=1+3+5+?+99

⑵ s=1+1/2+1/3+?+1/100

⑶ s=1x2+2x3+3x4+?+nx(n+1)

23、猴子吃枣问题。猴子摘了一堆枣，第一天吃了一半，还嫌不过瘾，又吃了一个；第二天又吃了剩下的一半零一个；以后每天如此。到第十天，猴子一看只剩下一个了。问最初有多少个枣子？

24、求e=1+1/2!+1/3!+?+1/n!

25、齐王点兵的故事，相传齐王韩信才智过人，从不直接点数自己军队的人数，只是让士兵先后以三人一排，五人一排，七人一排地变换队形，而他每次只掠一眼队伍的排尾就知道总人数了（不超过100人）。

26、警察局抓了a、b、c、d四名偷窃嫌疑犯，其中有一人是小偷。审问中： a说：“我不是小偷。” b说：“c是小偷。”

- 18 - 成都树德实验中学Pascal程序设计

c说：“小偷肯定是d。” d说：“c冤枉人！”

现在已经知道四人中三人说的是真话，一人说的假话。问到底谁是小偷。

27、甲乙丙丁戊五个人在运动会上分获百米、二百米、跳高、跳远和铅球冠军，有四个人猜测比赛结果：

a说：乙获铅球冠军，丁获跳高冠军。 b说：甲获百米冠军，戊获跳远冠军。 c说：丙获跳远冠军，丁获二百米冠军。d说：乙获跳高冠军，戊获铅球冠军。 其中每个人都只说对一句，说错一句。求五人各获哪项冠军。 28、编程求出下式中n的最大值：22+42+62+?+n2<1500。

29、打印以下图形：（键入n，控制图形的行数，以下图形均为n=3）⑴ * * * * * * * *

* * * * * * * * * * * * * * * * ⑵ + +

++ ++ +++ +++ ⑶ e d c b a

c b a a

⑷ 1 3 5 7 9 1 3 5 7

30、把一张一元钞票换成一分，二分和五分的硬币（每种至少一枚）。问有哪几种换法？ 31、求二个正整数的最大公约数和最小公倍数。

32、任给一个自然数n，求出这个自然数不同因数的个数。

例如n=6时，因为1，2，3，6这四个数均是6的因数，故输出为total=4。

33、有A、B、C、D、E五本书，要分给张、王、刘、赵、钱五位同学，每人只能选一本，事先让每人把自己喜爱的书填于下表，编程找出每人都满意的方案。

张 王 刘 赵 钱 A √ √ B √ √ √ √ C √ √ D √ √ E √ √ 成都树德实验中学Pascal程序设计 - 19 -

第五章 枚举类型和子界类型

一、选择题

1、指出正确的枚举类型定义语句：

(A) type ktype=( ’a ’, ’b’ , ’ c ’ , ’d ’)； (B) type ktype=( 1，2，3，4，5 )；

(C) type ktype=( class1 , classl2 , class3 , class4 )； (D) type ktype=( red, blue, green, red )； 2、指出正确的子界类型定义语句：

(A) type stype= ’a ’..’k’； (B) type stype= 100..50； (C) type stype= ’z ’..’a’； (D) type stype= 2.5..4.5； 3、变量定义如下：

var

s1, s2:( red , blue , green , yellow)； k:integer； 则正确的语句是：

(A) k:=succ(red)； (B) read(s1, s2,)； (C) s2:=green； (D) writeln(s1, s2,)； 4、变量定义如下： var

s1, s2:’A ’..’ Z ’； ch1,ch2:char； 则正确的语句是：

(A) ch1:=succ(K)； (B) read(ch1, ch2,)； (C) s1:= ’ a ’； (D) s2:= ’ ABC ’； 5、变量定义如下： var

num1: -10 ..10； num2:integer； 则有可能出错的语句是：

(A) num2:= num1； (B) num1:= ads(num2) div 2； (C) num2:= num1*num1； (D) num1:= num2； 二、判断下列类型定义哪些是正确的，哪些是错误的 1、type atype=10..10 * 10； 2、type atype=1. 2 ..2. 0； 3、type atype=a .. z； 4、type atype= ’ 1 ’..’ 5 ’； 5、type atype=( ’a ’, ’ b ’, ’ c ’, ’d’, ’ e ’)； 6、type atype=(m,n,p,q)； 7、type atype=(ch1, ch2, char)； 8、type atype=( ’ k ’..’ e ’)；

- 20 - 成都树德实验中学Pascal程序设计

9、type atype=(1a , 2a , 3a , 4a , 5a)； 10、type atype=(tue , mon , fri , sun)；

三、类型定义如下

type name=(Cara , Jane , John , Mali , Tom)； 计算以下表达式的值：

1、succ(Jane) = John 2、pred(Tom)= Mali 3、ord(Cara)= 0

4、succ(succ(John))= Tom

5、suee(pred(pred(Mali))= John 6、ord(pred(succ(John))= 2 四、编程

1、变量s已定义如下：

var s:(knife , rule , pen , rubber)；

且s中已有值，试写一程序片段，输出s中的值。

2、定义枚举类型monthtype表示十二个月，输入1～12中的某一个数，输出对应月份的英文缩写和表示下一个月的数字。如

输入6

输出jun next month:7。

3、由五个字符组成一个字符串，规定前四个字符为小写字母，第五个字符为数字，问有多少种排列方法。

4、类型定义

type ren= ’ A ’..’ F ’；

用A至F表示6个人，输出6个人相互握手的各种情况, 并统计握手的次数。

第六章 数 组

一、选择题

1、设数组a[10..100，20..100]以行优先的方式顺序存储，每个元素占4个字节，且已知a[10，20]的地址为1000，则a[50，90]的地址是______。

(A) 14350 (B) 14240 (C) 15340 (D) 13250

2、在待排序的数据表已经为有序时，下列排序算法中花费时间反而多的是___。 (A) 堆排序 (B) 希尔排序 (C) 冒泡排序 (D)快速排序

3、某数列有1000个各不相同的单元，由低至高按序排列，现要对该数列进行二分法检索，在最坏的情况下，需要检索________单元。

(A) 1000 (B) 10 (C) 100 (D) 500

百度搜索“77cn”或“免费范文网”即可找到本站免费阅读全部范文。收藏本站方便下次阅读，免费范文网，提供经典小说综合文库全国青少年信息学奥林匹克联赛培训习题(4)在线全文阅读。