福师17秋《高级语言程序设计》在线作业12题目
福师《高级语言程序设计》在线作业一一、单选题:【20道,总分:80分】
1.设有说明 const zero=‘0‘;pi=3.1416;str=‘abc‘; var r:real;i:integer;b;boolean;c:char; 下面赋值合法的是( )。 (满分:4)
A. r:=zero B. b:=pi>=3
C. c:=str D. c:=ord(‘b‘)
2.已知type color=(red,yellow,blue);则下列类型定义中不合法的是( )。 (满分:4)
A. type t1=red..blue; B. type t2=red..yellow;
C. type t3=red..red; D. type t4=blue..red;
3.设三个字符组成的集合是[‘a‘,‘b‘‘c‘],其子集共有多少个? (满分:4)
A. 9个 B. 8个
C. 7个 D. 6个
4.若有说明: var a:arrayof arrayof integer; 下列语句中正确的是( )。 (满分:4)
A. a]:=100； B. a:=100；
C. a:=100 D. a:=100；
5.当a=1,b=3,c=5,d=4时，执行下面一段程序后，x的值为：if(a＜d)if(c＜d)elseif(a＜c)if(b＜d) x=2;else x=3;else x=6;else x=7; (满分:4)
A. 1 B. 2
C. 3 D. 6
6.设有说明var f:file of integer;则f所代表的文件是 (满分:4)
A. ascii码文件 B. 二进制文件
C. 文本文件 D. 存放整数的文本文件
7.已知有如下说明:var a:array[-3..3]of integer; k,i:integer; 程序段: k:=0; for i:=-3 to 3 do if i<0 then a:=k+1 else a:=k+2; writeln(a-a[-3]); 输出的是( )。 (满分:4)
A. 10 B. 7
C. 2 D. 1
8.下面程序执行后显示abab,请填空完成它( )。 Program p11(output); var a:integer; begin a:=1; while a<=4 do begin case odd(a) of ( ):write(‘a‘); ( ):write(‘b‘)end; a:=( ); end; writeln end. (满分:4)
A. false, true, a+1 B. true, false, a+1
C. false, true, a*1 D. true, false, a*1
9.下面的程序最多可输入100位学生的姓名,姓名全由大写英文字母组成,输入‘?‘后则停止输入,然后按字典打印这些姓名 program sort(input,output); var name:array of string; t:string; i,j,count:integer; begin i:=1; readln(name); while name‘?‘do begin ( )( ); readln(name) end; count:=( )( ); for i:=1 to( )do begin for j:=i+1 to count do if name( )( )namethen begin t:=name; name:=name; name:=t end; end for i:=1 to( )do writeln(( )) end (满分:4)
A. i=1,1,count,<,count, name
B. i=i+1,i,count,<,count, name
C. i=1,i,count,>,count, name
D. i=i+1,i,count,>,count, name
10.磁盘处于写保护状态,那么磁盘中的数据: (满分:4)
A. 不能读职,不能删改,也不能写入新数据
B. 可以读出,不能删改,也不能写入新数据
C. 可以读出,可以删改,但不能写入新数据
D. 可以读出,不能删改,但可以写入新数据
11.设a和sin3均为整型变量,下面函数调用正确的是( )。 (满分:4)
A. pred(23.5)
B. abs(sin3)
C. trunc(true)
D. eof(a)
12.下列说法中,肯定正确的是 (满分:4)
A. 动态变量没有变量名,只能通过指向它的指针变量来引用
B. 动态变量获得或更换其值可以使用赋值语句,但不能使用read过程
C. 动态变量的值只能增加而不能减小
D. 动态变量不能是布尔类型
13.下面程序段不能实现求阶乘8!(结果在p中,p是实型变量)的是( )。 (满分:4)
A. p:=1;for n:=2 to 8 do p:=p*n;
B. p:=2;for n:=8 downto 3 do p:=p*n;
C. p:=1;n:=1; whilen<=8do begin n:=n+1; p:=p*n end;
D. p:=1;n:=2; repeat p:=p*n; n:=n+1 until n>8;
14.下列循环语句所构成的循环,共执行循环体的次数是( )。 i:=2.5; repeat i:=j0.5; write(1) until(i>3); (满分:4)
A. 0
B. 1
C. 2
D. 3
15.pascal语言提供的数据文件中,按文件存储结构要以分为 (满分:4)
A. text文件和file文件
B. 磁盘文件和非磁盘文件
C. 顺序存取文件和随机存取文件
D. 缓冲文件和非缓冲文件
16.标准PASCAL程序说明部分的正确顺序是 (满分:4)
A. LABEL——》CONST ——》VAR ——》TYPE
B. VAR——》CONST——》LABEL——》TYPE
C. LABEL——》CONST——》TYPE——》VAR
D. CONST——》VAR——》TYPE——》LABEL
17.在 Pascal 语言中，表达式(23 or 2 xor 5)的值是( ). (满分:4)
A. 18
B. 1
C. 23
D. 32
18.设实型变量x已赋值为4.1876,下面能输出4.188的语句是( )。 (满分:4)
A. write(trunc(x*1000)/1000:5:3 )
B. write(x:5:4)
C. write(round(x*1000)/1000:5:3)
D. write(trunc(x):5)
19.要用一个数组元素存放某班30人3门课的考试成绩(考试成绩保留1位小数), 下面哪个说明中的数组可以存放这些数据( )。 (满分:4)
A. var s:array of integer;
B. var s:array[‘a‘..‘c‘,1..30] of real;
C. var s:array of real;
D. var s:array of integer;
20.下面是对PASCAL程序组成结构的四条描述，其中错误的是：( ). (满分:4)
A. PASCAL程序必须有程序首部
B. 程序的注释部分只能写在程序中一条语句的最后
C. 程序首部的参数部分可有可无
D. 一个完整的PASCAL程序的主程序只能有一个
二、判断题:【5道,总分:20分】
1.读语句变量表中，变量的类型仅可以是整型、实型、字符型和枚举型。 (满分:4)
A. 错误
B. 正确
2.记录类型是一种用户自定义的复杂构造类型，该类型的各个分量具有不同的类型，甚至可以是另外一种记录类型。 (满分:4)
A. 错误
B. 正确
3.在Turbo Pascal语言中将字符串类型视为标准的数据类型，其类型标识符为STRING。 (满分:4)
A. 错误
B. 正确
4.eoln函数的功能是若文件指针指向行结束符或文件结束符，则返回true，否则返回false。 (满分:4)
A. 错误
B. 正确
5.readln语句用于从外部设备(如键盘)上顺序读入数据，并将这些数据依次赋值给变量表中相应的变量. (满分:4)
A. 错误
B. 正确
福师《高级语言程序设计》在线作业二
一、单选题:【20道,总分:80分】
1.设有集合运算,则正确的与结果是 (满分:4)
A.
B.
C.
D.
2.把整数7转换为字符‘7‘的表达式是( ) (满分:4)
A. chr(7)-ord(‘0‘)
B. chr(7-ord(0))
C. chr(7or(‘0‘))
D. chr(7ord(0))
3.下列for语句构成的循环,能执行且有输出的是( )。 (满分:4)
A. for i:=1 downto 5 do write(i)
B. for i:=5 to 1 do write(i)
C. for i:=5 to 5 do write(i)
D. for i:=0.5 to 5.5 do write(i)
4.若有以下程序 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 则下列说法中正确的是( ). (满分:4)
A. 主程序中x的作用域包含过程p
B. 过程p中x的作用域包含主程序
C. 主程序中x的作用域和过程p中x的 作用域相同
D. 主程序中x的作用域不包含过程p
5.有下列程序段: x:=3;y:=5; for i:=x to y do begin x:=3;y:=6; write(i) end 则for循环体的执行次数是( )。 (满分:4)
A. 0
B. 3
C. 4
D. 死循环
6.设实型变量x已赋值为4.1876,下面能输出4.188的语句是( )。 (满分:4)
A. write(trunc(x*1000)/1000:5:3 )
B. write(x:5:4)
C. write(round(x*1000)/1000:5:3)
D. write(trunc(x):5)
7.有下列函数说明: 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)的值是 (满分:4)
A. 21
B. 3
C. 7
D. 25
8.下列常量说明中,合法的是 ( )。 (满分:4)
A. const color=red..blue
B. const const=10*5
C. const x1:=3.9
D. const abc=‘abc‘
9.有下列程序 program test(input,output); var s:integer; ch:char; count:array[‘a‘..‘z‘]of integer; begin for ch:=‘a‘to‘z‘do count:=0; read(ch); while not eoln do begin if(ch>=‘a‘)and(ch<=‘z‘)then count:=count+1; read(ch) end; s:=0; for ch:=‘b‘ to ‘y‘ do s:=s+count; writeln(s) end 运行程序,输入一行正文‘weareproudofourcountry!‘则程序的输出是( )。 (满分:4)
A. 10
B. 22
C. 11
D. 20
10.下列循环语句能构成有限次循环的是( )。 (满分:4)
A. i:=10; repeat writeln(i); i:=i1 untili>0;
B. i:=10; repeat writeln(i); i:=i1 untili=10;
C. i:=0; repeat writeln(i); i:=i-2 untili>0;
D. i:=10; repeat writeln(i); untili=1;
11.当同时满足a=b时把n赋给m,应选用的程序段是 ( )。 (满分:4)
A. if a < b then if c=d then x:=y else m:=n
B. if(a< b)and(c=d) then x:=y else m:=n
C. if a < b then begin if c=d then x:=y else m:=n end
D. if a < b then begin if c=d then x:=y end else m:=n
12.pascal语言提供的数据文件中,按文件存储结构要以分为 (满分:4)
A. text文件和file文件
B. 磁盘文件和非磁盘文件
C. 顺序存取文件和随机存取文件
D. 缓冲文件和非缓冲文件
13.下列循环语句所构成的循环,共执行循环体的次数是( )。 i:=2.5; repeat i:=j0.5; write(1) until(i>3); (满分:4)
A. 0
B. 1
C. 2
D. 3
14.有程序段 for i:=1 to 10 do begin j:=i mod 4; case j of 0:x:‘a‘; 1:x:=‘b‘; 2:x:=‘c‘; 3:x:=‘d‘ end; end; for i:=1 to 10 do write(x:1); writeln; 输出应为( )。 (满分:4)
A. bcdabcdabc
B. abcdabcdab
C. cdabcdabcd
D. dabcdabcda
15.设a,b,c为整型变量,并有以下程序段: read(a);readln(b,c);readln(c,b);readln(a,b);writeln(a:2,b:2,c:2); 若运行时输入: 123 456 789 其中表示回车符,则输出是( )。 (满分:4)
A. 123
B. 147
C. 783
D. 784
16.已知函数f1如下： FUNCTION f1(a,b:Integer)：Integer; BEGIN IF a=0 THEN f1:=b ELSE f1:=f1(Pred(a)，Succ(b)) END; 函数f1返回的是 (满分:4)
A. a——b的值
B. b——a的值
C. a*b的值
D. ab的值
17.设有说明var x,y:(d,c,b,a);( )。 执行下面3条语句后的输出是 x:=a; y:=c; writeln(ord(y)-ord(x)); (满分:4)
A. 1
B. -2
C. 2
D. 3
18.以下运算符中运算优先级最高的是( )。 (满分:4)
A. NOT
B. or
C. >=
D. div
19.表达式trunc(-sqrt(sqr(17mod5)*2*(15div2)*sqr(1/2)))的值是( )。 (满分:4)
A. 1
B. -3
C. 5
D. 12
20.设有程序 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 其中为回车符,则输出是( )。 (满分:4)
A. abc
B. gec
C. ceg
D. adg
二、判断题:【5道,总分:20分】
1.读语句变量表中，变量的类型仅可以是整型、实型、字符型和枚举型。 (满分:4)
A. 错误
B. 正确
2.readln语句用于从外部设备(如键盘)上顺序读入数据，并将这些数据依次赋值给变量表中相应的变量. (满分:4)
A. 错误
B. 正确
3.eoln函数的功能是若文件指针指向行结束符或文件结束符，则返回true，否则返回false。 (满分:4)
A. 错误
B. 正确
4.记录类型是一种用户自定义的复杂构造类型，该类型的各个分量具有不同的类型，甚至可以是另外一种记录类型。 (满分:4)
A. 错误
B. 正确
5.在Turbo Pascal语言中将字符串类型视为标准的数据类型，其类型标识符为STRING。 (满分:4)
A. 错误
B. 正确
页:
[1]