16秋福师《高级语言程序设计》在线作业二.doc

奥鹏17春16秋福师高级语言程序设计在线作业二一、单选题（共 20 道试题，共 80 分。）1. 设4个字节存放一个实型数,若有说明: var a:array1.10of array boolean of real; 则数组a需占用的存储空间是（ ）。A. 10字节B. 20字节C. 80字D. 40字节正确答案：2. 下列表达式中值为假的是（ ）。A. ababcB. succ(false)=trueC. odd(351)=falseD. 219219正确答案：3. 下列常量说明中,合法的是 （ ）。A. const color=red.blueB. const const=10*5C. const x1:=3.9D. const abc=abc正确答案：4. 已知type color=(red,yellow,blue);则下列类型定义中不合法的是（ ）。A. type t1=red.blue;B. type t2=red.yellow;C. type t3=red.red;D. type t4=blue.red;正确答案：5. 表达式true and not odd(-202)(7-30;B. i:=10; repeat writeln(i); i:=i1 untili=10;C. i:=0; repeat writeln(i); i:=i-2 untili0;D. i:=10; repeat writeln(i); untili=1;正确答案：8. 磁盘处于写保护状态,那么磁盘中的数据:A. 不能读职,不能删改,也不能写入新数据B. 可以读出,不能删改,也不能写入新数据C. 可以读出,可以删改,但不能写入新数据D. 可以读出,不能删改,但可以写入新数据正确答案：9. 有变量说明: var i1,i2:integer; r1,r2:real; b1,b2:boolean; 设各变量均已赋值,下列语句中无语法错误的是（ ）。A. b2:=ord(r1r2)B. i2:=i1/r1C. b1:=i1=i2D. b1:=b1/b2正确答案：10. 设有程序 program exam(input,output); var ch1,ch2,ch3:char; begin readln(ch1,ch2;ch3); readln(ch1,ch2); readln(ch1); writeln(ch1,ch2,ch3) end. 运行以上程序时,若输入为: abc def ghi 其中为回车符,则输出是（ ）。A. abcB. gecC. cegD. adg正确答案：11. 设有说明 const zero=0;pi=3.1416;str=abc; var r:real;i:integer;b;boolean;c:char; 下面赋值合法的是（ ）。A. r:=zeroB. b:=pi=3C. c:=strD. c:=ord(b)正确答案：12. 设有集合运算5，7，9.。113，11，7，正确的结果是A. 5，3，9.。10B. 5，9.。10C. 5，3，9，10D. 3，5，9.。10正确答案：13. 已知a,b,c,d是类型简单变量,且都已有互不相同的值,执行下列语句b:=a; a:=c; d:=a; d:=b;后,其值相等的变量是( )。A. a,dB. a,cC. c,bD. b,a正确答案：14. 有变量定义如下： type weekday=(mon,tue,wed,thu,fri,sat,sun); workday=mon.fri; var day1:weekday; day2:workday; 下列不正确的语句是（ ）。A. day1:=wedB. day2:=wedC. day1:=day2D. day2:=sun正确答案：15. 下列表达式中,其值为true的是（ ）A. 150=150B. 100150C. abs(-200)200D. succ(a)succ(a)正确答案：16. 设有说明 var a:arraya.e,1.4,booleanofrea1; repeat n:=i*i: 则aa,3是（ ）。A. 一个实型的数组元素B. 一个数组,该数组具有两个实型数组元素C. 一个数组,该数组具有4*2个实型数组元素D. 一个数组,该数组具有5*4*2个实型数组元素正确答案：17. 若有以下程序 program exam(input,output); var x,y:real;a,b,c:integer; procedure p(a,b,c,real); var x:integer; begin end; begin end 则下列说法中正确的是().A. 主程序中x的作用域包含过程pB. 过程p中x的作用域包含主程序C. 主程序中x的作用域和过程p中x的 作用域相同D. 主程序中x的作用域不包含过程p正确答案：18. 设k为整型变量,且有以下程序段: if(k0) then if k5 then if k2 then x:=3 else x:=4 用case语句改写上述程序,执行效果一样的是( )。A. case k of 1,2:x:=4; 3,4,5:x:=3; 8,9,10:x:=1; 6,7:x:=0 endB. case k of 1:x:=4; 2,3,4,5:x:=3; 8,9,10:x:=1; 6,7:x:=0 endC. case k of 1,2:x:=4; 3,4,5:x:=3; 9,10:x:=1; 6,7,8:x:=0 endD. case k of 1,2,3:x:=4; 4,5:x:=3; 8,9,10:x:=1; 6,7:x:=0 end正确答案：19. pascal语言提供的数据文件中,按文件存储结构要以分为A. text文件和file文件B. 磁盘文件和非磁盘文件C. 顺序存取文件和随机存取文件D. 缓冲文件和非缓冲文件正确答案：20. 有程序段 for i:=1 to 10 do begin j:=i mod 4; case j of 0:xi:a; 1:xi:=b; 2:xi:=c; 3:xi:=d end; end; for i:=1 to 10 do write(xi:1); writeln; 输出应为（ ）。A. bcdabcdabcB. abcdabcdabC. cdabcdabcdD. dabcdabcda正确答案： 福师高级语言程序设计在线作业二二、判断题（共 5 道试题，共 20 分。）1. 记录类型是一种用户自定义的复杂构造类型，该类型的各个分量具有不同的类型，甚至可以是另外一种记录类型。A. 错误B. 正确正确答案：2. readln语句用于从外部设备(如键盘)上顺序读入数据，并将这些数据依次赋值给变量表中相应的变量.A. 错误B. 正确正确答案：3. 在Turbo Pascal语言中将字符串类型视