新学期奥鹏远程教育福建师范大学《高级语言程序设计》在线作业一

奥鹏教育福建师范大学在线作业

福师《高级语言程序设计》在线作业一-0004

下面函数值等于7的是（ ）。
A:round(-7.49)
B:trunc(-(abs(-7.5)))
C:abs(0-13 mod 54)
D:ord(chr(pred(8)))
答案问询微信：424329

program exam(output); var x,y,x:integer; proedure silly(x:integer;vary:integer); begin x:=5;y:=6;z:=3; writeln(x,y,z) end; begin x:=1;y:=2;z:=3; silly(x,y); writeln(x,y,z) end. 以上程序运行结果为().
A:567 563
B:567 567
C:567 167
D:567 163
答案问询微信：424329

下列循环语句所构成的循环,共执行循环体的次数是（ ）。 i:=2.5; repeat i:=j0.5; write(1) until(i3);
A:0
B:1
C:2
D:3
答案问询微信：424329

设有集合运算[3,2,1][5,3,1],则正确的与结果是
A:[5,1..3]
B:[8,5,2]
C:[5,2]
D:[3,1]
答案问询微信：424329

下列程序段执行后,输出为（ ）。 Begin m:=[1..4,8..10]; for i:=1 to 10 do a[i]:=5*i+3; for i:=1 to 5 do if a[i] in m then write(a[i]) end;
A:8
B:8,9,10
C:1
D:1,2,3,4
答案问询微信：424329

在主程序中有说明: type small=1..10; var x,y,z:real;m,n:small;c1,c2:char; 过程首部为: procedure mass(vara,b:real;x:small;c:char); 则下列过程调用语句中正确的是().
A:mass(x,y,z,c1)
B:mass(xy,x-y,m,c1);
C:mass(x,y,s,c1)
D:mass(x,y,m.10);
答案问询微信：424329

有下面程序段： a:=false;b:=false;c:=false; x:=15; if a then x:=x-10 else if b then x:=x-5 else if c then x:=20 else x:=25; 假设所有变量均已说明，程序运行后x的值是（ ） 。
A:25
B:20
C:15
D:5
答案问询微信：424329

要用一个数组元素存放某班30人3门课的考试成绩(考试成绩保留1位小数), 下面哪个说明中的数组可以存放这些数据（ ）。
A:var s:array[1..3,1..30] of integer;
B:var s:array[a..c,1..30] of real;
C:var s:array[1..30,boolean] of real;
D:var s:array[1..30,a..c] of integer;
答案问询微信：424329

设有说明 TYPE byte=0.。7; word=0.。15; num=Real; VAR a:byte;b,c:word;d:Integer;c:num;f:Char; 下面哪一组变量的类型是相容的而不是同一的
A:a和c
B:c和f
C:c和d
D:c和d
答案问询微信：424329

设有以下程度段: begin
a:=0;
for i:=7 downto 2 do
case I of
1,2:a:=a1;
3,4:a:=a2;
5,6:;
7,8:a:=a3
end;
writeln(‘a=‘,a:1)
end.
若变量均已说明,则程序运行后的输出是（ ）。
A:a=8
B:12
C:a=6
D:0
答案问询微信：424329

下面的程序最多可输入100位学生的姓名,姓名全由大写英文字母组成,输入?后则停止输入,然后按字典打印这些姓名 program sort(input,output); var name:array[1..100] of string[20]; t:string[20]; i,j,count:integer; begin i:=1; readln(name[i]); while name[i]?do begin ________; readln(name[i]) end; count:=________; for i:=1 to_______do begin for j:=i+1 to count do奥鹏教育福建师范大学在线作业 if name[i]________name[j]then begin t:=name[i]; name[i]:=name[j]; name[j]:=t end; end for i:=1 to_______do writeln(_______) end
A:i=1,1,count,,count, name[i]
B:i=i+1,i,count,,count, name[i]
C:i=1,i,count,,count, name[i]
D:i=i+1,i,count,,count, name[i]
答案问询微信：424329

下列程序段执行后,d的值应是（ ）。 a:=false;b:=true;c:=false;d:=20; if a then d:=d-10 else if not b then if not c then x:=15 else x:=25
A:10
B:20
C:3
D:30
答案问询微信：424329

一个文件的成分(基类型)不可以是
A:文件
B:数组
C:记录
D:记录数组
答案问询微信：424329

设4个字节存放一个实型数,若有说明: var a:array[1..10]of array [boolean] of real; 则数组a需占用的存储空间是（ ）。
A:10字节
B:20字节
C:80字
D:40字节
答案问询微信：424329

设有常量定义：CONST A=0；B=22768；下面对常量引用正确的是:
A:READLN（A）；
B:A：=A=1；
C:PROCEDURE P（C：B.。1）；
D:VAR C：A.。B；
答案问询微信：424329

下面语句正确的是：
A:COLOR：=GREEN；
B:WRITELN（GREEN）；
C:WRITELN（COLOR）；
D:IF RED30 AND 70》15 C）15《30《50 D）70 NOT 70》20
答案问询微信：424329

设数组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]
答案问询微信：424329

下列说法中,肯定正确的是
A:动态变量没有变量名,只能通过指向它的指针变量来引用
B:动态变量获得或更换其值可以使用赋值语句,但不能使用read过程
C:动态变量的值只能增加而不能减小
D:动态变量不能是布尔类型
答案问询微信：424329

已知a,b,c,d是类型简单变量,且都已有互不相同的值,执行下列语句b:=a; a:=c; d:=a; d:=b;后,其值相等的变量是( )。
A:a,d
B:a,c
C:c,b
D:b,a
答案问询微信：424329

有变量定义如下： type weekday=(mon,tue,wed,thu,fri,sat,sun); workday=mon..fri; var day1:weekday; day2:workday; 下列不正确的语句是（ ）。
A:day1:=wed
B:day2:=wed
C:day1:=day2
D:day2:=sun
答案问询微信：424329

记录类型是一种用户自定义的复杂构造类型，该类型的各个分量具有不同的类型，甚至可以是另外一种记录类型。
A:错误
B:正确
答案问询微信：424329

读语句变量表中，变量的类型仅可以是整型、实型、字符型和枚举型。
A:错误
B:正确
答案问询微信：424329

readln语句用于从外部设备(如键盘)上顺序读入数据，并将这些数据依次赋值给变量表中相应的变量.
A:错误
B:正确
答案问询微信：424329

eoln函数的功能是若文件指针指向行结束符或文件结束符，则返回true，否则返回false。
A:错误
B:正确
答案问询微信：424329

在Turbo Pascal语言中将字符串类型视为标准的数据类型，其类型标识符为STRING。
A:错误
B:正确
答案问询微信：424329