2010年自学考试《高级语言程序设计》习题16001

《2010年自学考试《高级语言程序设计》习题16001》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、一、是非题(下列各题，你认为正确的，请在题干的括号内打“√”，错的打“×”。每题1分，共10分)　　1、实型是有序类型。　　A。正确　　B。不正确　　2、保留字具有特定含义，不能挪作它用。　　A。正确　　B。不正确　　3、true＜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

2、.95)之值为5.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为字符变量，下列哪一个语句是

3、正确的()　　A.ch：＝‘－3’；　　B.ch：＝－ch；　　C.ch：＝ch；　　D.ch：＝‘R’＋‘T’；　　3。下列哪一个可用作用户自定久标识符()　　A.LABEL　　B.A(i)　　C.A＋name　　D.boolean　　4。设a为123.4，执行write(a：5：2)后输出为()　　A.123.40　　B.123.4　　C.23.4　　D。极错　　5。在CASE语句中，下列哪一类常量不能用作选择因子()　　A。实型　　B。整型　　C。布尔型　　D。枚举型三、填空题(每空2分，共20分)　　1、chr(8＋ord(‘1’)之值为____________。　

4、　2、子程序调用时，对应变量参数方式形参传递的是实参的___________。　　3、语句标号之大小必须为1到___________________的无符号整数。　　4、succ(9)＋ord(true)＋5.0之值为__________________。　　5、国际上用得最广泛的字符集叫____________________字符集。　　6、代数式A≥B≥C对应的PASCAL表达式为______________________。　　7、PASCAL的数据类型分为简单类型、构造类型和____________________。　　8、代数式e

5、x

6、＋3对应的PASCAL表达式

7、为_____________________。　　9、局部变量在____________________时才必须分配内存单元。　　10、TEXT型变量是具有_____________________类型元素的文件。　四、选择填空题(本题中的每个小题，已分别给出相应的求解和程序。但程序中空出若干个括弧，每个括弧中的4个备选答案。请把你认为正确的答案题号填入题后相应的位置。每空3分，共30分)　　问题：求2～1000之间的所有素数，并存入文件ff中。　　程序：　　PROGRAMprime(ff)；　　VAR　　ff：FILEOFinteger；　　i，j：integer；　　b

8、：boolean；　　BEGIN　　(①　　)；　　FORi：＝2TO1000DO　　BEGIN　　(　②　　)；　　FORj：＝2TOi－1DO　　IFiMODj＝0　　THEN(　③　　)；　　IFbTHENwrite(ff，i)　　END　　END。　　1。你选择(　)　　A.reset(ff)　　B.writeln(ff)　　C.rewrite(ff)　　D.new(ff)　　2。你选择(　)　　A.b：＝false　　B.b：＝true　　C.b：＝‘false’　　D.b：＝‘true’　　3。你选择(　)　　A.b：=false　　B.b：＝true　　C.b

9、：＝‘false’　　D.b：＝‘true’问题：构造一链表，并按与输入相同的次序输出该链表中的数据。　　程序：　　PROGRAMfifolist(input，output)；　　TYPE　　pointer＝↑cooperate；　　cooperate＝RECORD　　next：pointer；　　data：integer　　END；　　VAR　　p1，p2，p3：pointer；　　BEGIN　　(　④　　)；　　P3：＝P1　　read(p1↑。data)；　　WHILENOTeofDO　　BEGIN　　(　⑤