自学考试《高级语言程序设计》习题.docx

1、自学考试高级语言程序设计习题2010年自学考试高级语言程序设计习题 一、是非题(下列各题，你认为正确的，请在题干的括号内打“”，错的打“”。每题1分，共10分)1、实型是有序类型。A.正确B.不正确2、保留字具有特定含义，不能挪作它用。A.正确B.不正确3、truefalse之值为false./false之值为false.A.正确B.不正确4、exp可作用户标识。A.正确B.不正确5、PASCAL源程序中一行只能写一个语句。A.正确B.不正确6、PASCAL源程序中每个变量都必须说明。A.正确B.不正确7、2.0E3.0是一个合法的实型常数。A.正确B.不正确8、trunc(5.95)之值为5

2、.0.A.正确B.不正确9、函数的类型只能是有序类型。A.正确B.不正确10、当形参为值参数方式时，对应的实参不能是变量。A.正确B.不正确二、单选题(在本题的每一小题的备选答案中，只有一个答案是正确的，请把你认为正确答案的题号，填入题干的括号内。多选不给分。每题2分，共10分)1.设i1，i2的整型变量，r1，r2是实型变量，下列哪一个语句是错误的()A.i1：=i2DIVi1;B.r1：=i1DIVi2/i2;C.r1：=i1/r2;D.i2：=i1/i2;2.设ch为字符变量，下列哪一个语句是正确的()A.ch：=-3;B.ch：=-ch;C.ch：=ch;D.ch：=R+T;3.下列哪

3、一个可用作用户自定久标识符()A.LABELB.A(i)C.A+nameD.boolean4.设a为123.4，执行write(a：5：2)后输出为()A.123.40B.123.4C.23.4D.极错5.在CASE语句中，下列哪一类常量不能用作选择因子()A.实型B.整型C.布尔型D.枚举型 三、填空题(每空2分，共20分)1、chr(8+ord(1)之值为_.2、子程序调用时，对应变量参数方式形参传递的是实参的_.3、语句标号之大小必须为1到_的无符号整数。4、succ(9)+ord(true)+5.0之值为_.5、国际上用得最广泛的字符集叫_字符集。6、代数式ABC对应的PASCAL表达

4、式为_.7、PASCAL的数据类型分为简单类型、构造类型和_.8、代数式e|x|+3对应的PASCAL表达式为_.9、局部变量在_时才必须分配内存单元。10、TEXT型变量是具有_类型元素的文件。四、选择填空题(本题中的每个小题，已分别给出相应的求解和程序。但程序中空出若干个括弧，每个括弧中的4个备选答案。请把你认为正确的答案题号填入题后相应的位置。每空3分，共30分)问题：求21000之间的所有素数，并存入文件ff中。程序：PROGRAM prime(ff);VARff：FILE OF integer;i，j：integer;b：boolean;BEGIN();FOR i：=2 TO 100

5、0 DOBEGIN();FOR j：=2TO i-1 DOIF i MOD j=0THEN();IF b THEN write (ff，i)ENDEND.1.你选择()A.reset(ff)B.writeln(ff)C.rewrite(ff)D.new(ff)2.你选择()A.b：=falseB.b：=trueC.b：=falseD.b：=true3.你选择()A.b：=falseB.b：=trueC.b：=falseD.b：=true问题：构造一链表，并按与输入相同的次序输出该链表中的数据。程序：PROGRAM fifolist(input，output);TYPEpointer=coope

6、rate;cooperate=RECORDnext：pointer;data：integerEND;VARp1，p2，p3：pointer;BEGIN();P3：=P1read(p1。data);WHILE NOT eof DOBEGIN();read(p2。data);();p3：=p2END;P2。next：=NIL;WHILE P1 NIL DOGEGINwrite(p1。data);();END;END.4.你选择()A.P1：=NILB.P2：=NILC.NEW(P1)D.new(p2)5.你选择()A.P1：=NILB.P2：=NILC.new(P1)D.new(P2)6.你选择(

7、)A.p3。next：=P2B.P3。next：=NILC.P3。next：=P2。nextD.p3。next：=p37.你选择()A.。next：=P1B.P1：=P1。nextC.P1=P2.nextD.P1。next：P2。next问题：统计并输出输入字串标点符号，：和;出现的总次数，直至出现字符?为止。程序：PROGRAM counter(input，output);TYPEtp=SET OF charVARP：tp;ch：chart;count：integer;BEGIN();p：，：，：;REPEATread(ch);IF();THEN count：=count+1UNTIL();

8、writeln(count)END.8.你选择()A.count：=0B.count：=1C.ch：=D.count：=-19.你选择()A.ch=PB.ch=P10.你选择()A.ch：=?B.ch=?C.ch?D.ch?五、编写程序题(每题10分，共30分)1、编一程序，计算并输出S=1-x+x2/2-x3/3+(-1)nxn/n(n=1，2)。其中x，n由终端输入。(x为实型，n为整型)2、编一程序，输入二维整数数组A55所有元素之值，寻找并输出该数组中最大元素之值(设只有一个)及其位置(行号和列号)。3、编一程序，从终端输入两个英文句子，每句均以句号结束，输出此两句子中都出现的所有大字

9、英文字母。答案一、是非题1 B 2 A 3 A 4 A 5 B 6 A 7 B 8 B 9 B 10 B二、单选题1 D 2 C 3 D 4 A 5 A三、填空题1、192、地址3、9994、16.05、ASC6、(AB)AND(BC)7、指针类型8、exp(abs(x)+39、 所在子程序执行10、字符四、选择填空题1 C 2 B 3 A 5 D 6 A 7 B 8 A 9 C 10 B五、编写程序1、PROGRAM sum(input，output);VARn，i：integer;x，s，t：real;BEGINS：=1，t：=1read(x，n);FOR i：=1 TO n DOBEGI

10、Nt：=-t*x;S：=S+t/iEND;writeln(S)END;评分细则：s，t初值占1分;输入占1分;FOR语句占7分;输出占1分。2、PROGRAM largest(input，output);VARa：ARRAY15，15OF integer;max ，i，j，h，l：integer;BEGINmax：=-maxint -1;FOR i：=1 TO 5DOFOR j：=1TO 5 DOread (ai，i;FOR i：=1 TO 5DOFOR j：=1TO 5 DOIF maxai，jthen/ai，jthenBEGINmax：=ai，j;h：=i;l：=jEND;writeln(max，h，l)END.评分细则：max初值占1分;输入占1分;求max，h，l占7分;输出占12分。3、 PROGRAM xyz(input，output);VARa，b：SET OF AZ;ch：char;BEGINa：=; b：=;REPEATread(ch);IF (ch=A)AND (ch=A) AND (ch=Z)THEN b：=b+chUNTIL ch=;FOR ch：=A TO ZDOIF (ch IN a) AND(ch IN b)THEN write(ch)END.评分细则：统计第一句大字字母，2分;统计第二句中大写字母，2分;输出共同的大写英文字母，6分。