欢迎来到天天文库
浏览记录
ID:41583646
大小:59.17 KB
页数:4页
时间:2019-08-28
《Pascal基础知识测试答案》由会员上传分享,免费在线阅读,更多相关内容在工程资料-天天文库。
1、Pascal语言基础知识测验题第一套1、sqrt(4)的值为(2.0)(保留一位小数)。2、'A'>匕'的值为(False)o3、下列标识符哪个是合法的(A)oA、X1B、a(c)C、varD、1234、下列程序段输出结果为(9)。Varatb,c:integer;Begina:=5;b:=4;c:=a*a-b*b;writeIn(c);End.5、下列程序段输出结果为(45)。Varm,n:irvteger;BeginM:=0;Forn:=:2to3Dom:=m+2;Write(m);End.第二套1、Pascal语言中的赋值号为(:=)o2、ord(37)的值为(3
2、7)。3、用Pascal语言表达式表示X为偶数。(odd)4、下列程序段输出结果为(40)。VarA:integer;BeginA:=100;A:=A+20;A:=ADiv3;Writeln(A);End.5、下列程序段输出结果为(4)oVarY:integer;BeginY:=2;While(Y<=32)DoY:=Y*Y;Writeln(Y);End.第三套1、TurboPasca17.0中,Integer类型的取值范围为(-32768)到32767o2、已知chr(97)的值为字母a则chr(100)的值为字母(d)。3、-15mod4的值为(_3)。4、下列程序段
3、输出结果为(-1)。VarX,Y:integer;BeginX:=-100;If(X<0)ThenY:=-1ElseY:=1;Writeln(Y);End.5、下列程序段输出结果为(200)oVarX:integer;BeginX:二0;ForI:=1to100DoX:=X+2;Writeln(X);End.第四套1、odd(24)的值(FaIse)02、16Div5的值为⑶。3、PascaI语言中,实现循环结构的语句主要有(For)语句,while语句和Repeat语句。4、下列程序段输出结果为(10)。VarX,Y:integer;BeginX:二-10;If(X<
4、0)ThenY:=-XElseY:=X;Writeln(Y);End.5、从键盘上输入资料02下列程序段输出结果为(1)。VarX,Y:integer;BeginX:=1;Y:=0;whileXOODobeginY:=Y+X;Read(X);end;Writeln(Y);End.第五套1、Round(9.5)的值为(10)o2、机器语言仅由0和(1)两个代码组成。3、用Pascal语言表达式表示I被J整除(Imodj=0)。4、下列程序段输出结果为(Y)。VarA:integer;BeginA:=-11;Ifodd(A)ThenWriteln('Y')ElseWrite
5、ln('N‘);End.5、下列程序段输出结果为(abed)。Varch:char;BeginForch:二'b'to'e'doWrite(pred(ch));End.第六套1、所谓复合语句,就是指用(begin)和End括起来的多条语句的统称。2、int(24.9)的值为(24)。3、用Pascal语言表达式表示X<0或X>=10((X<0)or(X>=10))o4、输入资料-9下列程序段输出结果为(<二0)。VarA:integer;BeginRead(A);If(A>0)ThenWCte('>0')ElseWrite('<=0');End.5、下列程序段输出结果为
6、(A)。Varscore:integer;Ch:char;Beginscore:=80;CasescoreDiv10of10,9,8:ch:二'A7,6:ch:二'BElsech:="C';Writeln(ch);End.第七套1、Pascal语言中,循环体至少执行一遍的循环语句是(Repeatuntil)。2、b2_4ac的PascaI语言表达式为(b^2-4*a*c)。3、Trunc(12.3)的值为(12)。4、下列程序段输出结果为(3.14)VarArea,R:ReaI;BeginR:=1;Area:=pi*R*R;Writeln(Area:4:2);End.5
7、、下列程序段输出结果为(12)。VarI:integer;BeginI:=0;While(l<10)DoI:=l+3;Writeln(l);End.第八套1>PascaI语言中,实现计数循环一般用(For)语句。2、1/3a的Pascal语言表达式为(1/(3*a))«3、Round(10.4)的值为(10)。4、下列程序段输出结果为(1)。VarA,B:integer;BeginA:=5;Ifodd(A)ThenB:=1ElseB:=2;Writeln(B);End.5、下列程序段输出结果为(24)。VarS,I:Integer;Beg
此文档下载收益归作者所有