17春福师《高级语言程序设计》在线作业1.docVIP

2017秋17春福师《高级语言程序设计》在线作业一 一、单选题（共 20 道试题，共 80 分。） 1. 设三个字符组成的集合是[‘a‘,‘b‘‘c‘],其子集共有多少个? A. 9个 B. 8个 C. 7个 D. 6个 正确答案： 2. 已知函数说明如下: function dn(m:integer):integer; var value:integer; begin if m:=0 then value:=5 else if m0 then value:=dn(m+1)+2 else value:=dn(m-1)-2; dn:=value end; 则dn(3)的值为_____, dn(dn(2))的值为____. A. p2(x,y); B. p2(x,z); C. p2(z,x); D. p2(z,y); 正确答案： 3. 有下列函数说明: function f(a,b,c:integer):integer; var t:integer; begin a:=3*a;t:=b div c;f:=a+4*t end; 则表达式f(f(1,f(1,2,3),3),2,3)的值是 A. 21 B. 3 C. 7 D. 25 正确答案： 4. 设数组a和变量i,j,k,m,均已说明，且各自的值如 a[1]=1,a[2]=2,a[3]=3,a[4]=4,a[5]=5,a[6]=6,a[7]=7,a[8]=8,a[9]=9, i=1,j=2,k=3,m=4 下面数组元素的值等于3的是（ ）。 A. a[i*j] B. a[a[j=k-2]] C. a[m div j] D. a[a[k-i]+3] 正确答案： 5. 假定y是集合变量,变量x的类型与y的基本类型相同,则下列表达式中错误的是 A. [x] in y B. y-[x] C. [x]+[]*y D. y=[x] 正确答案： 6. 磁盘处于写保护状态,那么磁盘中的数据: A. 不能读职,不能删改,也不能写入新数据 B. 可以读出,不能删改,也不能写入新数据 C. 可以读出,可以删改,但不能写入新数据 D. 可以读出,不能删改,但可以写入新数据 正确答案： 7. 下列常量说明中,合法的是 （ ）。 A. const color=red..blue B. const const=10*5 C. const x1:=3.9 D. const abc=‘abc‘ 正确答案： 8. 设有常量定义：CONST A=0；B=22768；下面对常量引用正确的是: A. READLN（A）； B. A：=A=1； C. PROCEDURE P（C：B.。1）； D. VAR C：A.。B； 正确答案： 9. 下列有关集合运算的表达式中,有语法错误的是 A. ‘y‘in[‘c‘,‘d‘,‘k‘..‘l‘,‘z‘] B. [2,4,6]*[8,5,2] C. [‘l‘,‘m‘,‘n‘]+[3,6,9] D. [1..100][1..211] 正确答案： 10. 已知有如下说明: var x,y:integer; z:real; procedure p2(a:real;var b:real); 这些变量均已赋值,下列过程调用中正确的是 A. abc B. gec C. ceg D. adg 正确答案： 11. 设有如下说明:var q,p:^integer; 且已知有过程调用new(p);new(q);则下面语句正确的是 A. read(p,q); B. p^:=q^ C. p:=p+1 D. p:=p+q; 正确答案： 12. 设有说明 var a:array[‘a‘..‘e‘,1..4,boolean]ofrea1; repeat n:=i*i: 则a[‘a‘,3]是（ ）。 A. 一个实型的数组元素 B. 一个数组,该数组具有两个实型数组元素 C. 一个数组,该数组具有4*2个实型数组元素 D. 一个数组,该数组具有5*4*2个实型数组元素 正确答案： 13. 设4个字节存放一个实型数,若有说明: var a:array[1..10]of array [boolean] of real; 则数组a需占用的存储空间是（ ）。 A. 10字节 B. 20字节 C. 80字 D. 40字节 正确答案： 14. 有下面程序段: a:=false;b:=false; c:=true;x:=10; if a then x:=x-5 else if b then if c then x:=36 else x:=45; 假设所有变量均已说明,程序运行后x的值是（ ）。 A. 5 B. 10 C. 36 D. 45 正确答案： 15. 当a=1,b=3,c=5,d=4时，执行下面