《会考填空复习题2010版》由会员分享，可在线阅读，更多相关《会考填空复习题2010版（8页珍藏版）》请在金锄头文库上搜索。
1、第一套第一套 26 .Sqrt(4)的值为（ 2.0 ） （保留一位小数） 。 27.Aa的值为（FALSE ） 。 28.下列标识符哪个是合法的？（ A ） A.x1 B. a(c) C.var D.123 29.下列程序输出结果为（ 9 ） 。 Var A,B,C:Integer; BeginA:=5;B:=4;C:=A*A-B*B;Writeln(C); End. 30.下列程序输出结果为（ 4 ） 。 VarM,N:Integer; Begin M:=0; For N:=2 to 3 do M:=M+2; Write(M); End. 第二套第二套 26.Pascal 语言中的赋值号为
2、（:=） 。 27.Ord(37)的值为（ 37 ） 。 28.用 Pascal 语言表达式表示 x 为偶数（ ODD(X)=TRUE ） 。 * 另一答案：x mod 2=0 * 29.下列程序输出结果为（ 40 ） 。 VarA:Integer; BeginA:=100;A:=A+20;A:=A Div 3;Writeln(A); End. 30.下列程序输出结果为（256 ） 。 VarY:Integer; BeginY := 2; WHILE (Y0 Do Begin Y:=Y+X; Read(x); End; Write(Y); End.第五套第五套26、Round(9.5)的值为（
3、10 ） 。 27、机器语言仅由 0 和（1）两个代码组成。 28、用 Pascal 语言表达式表示 I 被 J 整除（ I Div J ） 。 29、下列程序输出结果为（Y ） 。 VarA:Integer; BeginA:=11;If Odd(A) ThenWriteln(Y)ElseWriteln(N); End. 30、下列程序输出结果为（ a b c d ） 。 VarCh:Char; Begin For Ch:=b to e do Write(pred(ch); End.练习六练习六 26、所谓复合语句就是用 ( Begin ) 和 End 括起来的多条语句的统称。 27、Int（
4、24.9）的值为（ 24.0 ） 。 28、用 Pascal 语言表达式表示 x=10。 （ (x=10) ） 29、输入数据：-9,下列程序输出结果为( =0) ThenWrite(0)ElseWrite(=1) and (a0) Do Begin N:=N Div 10;S:=S+1; End; Writeln(S); End.练习十练习十26Pascal语言的关系运算符中， “不等于”运算符为（ 5;Writeln(S); End.练习十一练习十一 26Pred(C)的值为（ B ） 。 27错误信息Error 85：“；” expected表示程序中可能缺少的符号是（ ； ） 。 28
5、Not(11+2232)的值为（ False ） 。 29下列程序段的输出结果为（ 0 ） 。 VarT:Integer; BeginT:=3;T:=T*100;T:=T Mod 3;Writeln(T); End.30下列程序段的输出结果为（ 100 ） 。 VarS,I:Integer; Begin S:=0; For I:=10 Downto 1 DoS:=S+10;Writeln(S); End.练习十二练习十二 26已知Ord(A)=65，则Ord(D)=（ 68 ） 。 27顺序结构中，每一条Pascal语句只执行（ 1 ）次。 28(a+b)h/2的Pascal语言表达式为（ （
6、a+b）*h/2 ） 。 29下列程序段的输出结果为（ 51 ） 。 VarA,B,C:Integer; BeginA:=1; B:=5; C:=A; A:=B; B:=C; Write(A,B); End.30下列程序段的输出结果为（ Sunday ） 。 Varch：char； begin ch:= 0； case ch of1:Writeln(Monday); 2:Writeln(Tuesday); 3:Writeln(Wednesday);； 4:Writeln(Thursday);； 5:Writeln(Friday); 6:Writeln(Saturday); 0:Writeln(
7、Sunday); end； end. 第十三套第十三套 26、Succ(Pred(2)的值为（2 ） 。 27、错误信息 Error 91：“:=” expected 表示程序中可能缺少的符号是（：） 。 28、a2-b2的 Pascal 语言表达式为（a*a-b*b ） 。 29、下列程序段的输出结果为（321） 。 VarN,A,B,C:Integer; BeginN:=123;A:=N Mod 10;B:=N Div 10 Mod 10;C:=N Div 100; Writeln(A,B,C); End. 30、下列程序段的输出结果为（ 678910 ） 。 VarI,X:Integer
8、; Begin X:=10; For I:=6 to x do Write(I)； End.第十四套第十四套 26、Sqr(4)的值为（ 16 ） 。 27、用Pascal语言表达式表示a为奇数（ Odd(a) ） 。(答案二： a mod 2 =1) 28、下列标识符哪个是合法的？（ A ） A、abc B、X# C、begin D、1a 29、下列程序输出结果为（ 232 ） 。 Var A,B,C:Integer; Begin A:=1; B:=2; C:=3; A:=B; B:=C; C:=A; Writeln(A,B,C); End.30、下列程序输出结果为（ Y ） 。 VarYe
9、ar:Integer; BeginYear:=2000;If (Year Mod 400=0) Or (Year Mod 4=0) And (Year Mod 1002）And (3=6)的值为（ false ） 。 28、Chr(Ord(h)的值为（ h ） 。 29、下列程序输出结果为（ NO ） 。 VarScore:Integer; BeginScore:=51;If (Score=60) ThenWriteln(PASS)ElseWriteln(NO); End.30、下列程序输出结果为（ 15 ） 。 Var I,S:Integer; Begin S:=0; For I:= 1 to 5 Do S:=S+I;Writeln(S); End.
