Pascal语言基础练习(选择题).doc

1、分析下面的程序，找出A,B,C,D对应的语句中正确的是（ ）PROGRAM samp(Input,Output);TYPEW=(A,B,C,D,E);VARI: 0.9;T: W;m:Integer;BEGINA. ReadlnI.;B. Readln(t);C. m:=SqrI.;D. Writeln(t)End.2、代数式的Pascal表达式是（ ）A.(a-b)/a+b/a-b+a*bB.(a-b)/(a+b)/(a-b)+abC.(a-b)/(a+b)/(a-b)+a*b)D.(a-b)/(a+b)/(a-b)+a*b3、以下正确的枚举类型定义是（ ）A.mset=(M1,M2,M3,M4);B.xset=(x1,x2,x3)C.P=(ARRAY,DIV);D.pia=(1c,2d,3a);4、下列中合法的变量说明是（ ）A.VAR r:Real;Num:200;B.VAR a=Real; I=Integer;C.DIM Read,White:Integer;D.VAR i1,i2:Integer; Red,White:Real;5、以下语句语法正确的是（ ）A.PROG Em;B.Program (Output);C.Program (Input,Output);D.Program Exa (Input,Output);6、如果a,b均为整型变量，则表达式：(a MOD 10=0) OR (a=10) And (b=5)的数据类型是（ ）A.数值类型B.布尔类型C.字符类型D.表达式不正确7、设有说明TYPE byte=0.7; Word=0.15; Re=Real;VAR a:byte; b,c:word; d:Integer; e:re; f:Char;则下列中不合法的赋值语句是（ ）A. b:=a;B. d:=c;C. e:=d;D. a:=f;8、下面的字符串中，有效的Pascal字符型数据是（ ）A. B.HIC. D.C9、下列哪种类型的常量不能用来定义子界类型（ ）A.RealB.IntegerC.CharD.用户定义的任何顺序类型10、已知r1,r2的实行变量，i1,i2是整型变量，下列各赋值语句中错误的是（ ）A.i2:=i1+i2 DIV i1B.i1:=i1/i2C.r2:=2/3*Sqr(r1+r2)D.r1:=r2+i211、下面（ ）是Pascal的合法数A.73e4B.-e5.C.21D.1,717,15812、设有类型定义如下：TYPE Season=(SPRING,SUMMER,AUTUMN,WINTER);City=(BEIJING,SHANGHAI,TIANIN,GUANGZHOU);表达式ORD(Succ(SPRING) MOD Pred (Ord(GUANGZHOU)的值是（ ）A.0B.1C.2D.313、表达式Round(Sqrt(14/3)-Sqrt(14 div 3)的值为（ ）A.2B.1C.0D.-114、每一个Pascal程序体必须包括（ ）A.常量定义，类型定义，变量说明，语句体B.类型说明，变量说明，语句体C.变量说明，语句体D.语句体15、下列中和法的关系表达式是（ ）A.a99B.23.520C.1246D.5X1416、以下正确的字节类型定义是（ ）A.TYPE alpha=F.A;B.TYPE ze=Maxint.-Maxint;C.TYPE boo=False.True;D.TYPE sun=Yellow.Green;17、已知有如下说明，所给选项不正确的是（ ）VAR number ： 0. .50；fan ：1. .100；m,n ：Integer；A 允许有表达式m+number DIV fannB 允许有赋值语句n:=20*4；C 可以引用函数Sqr（number）；D 可以定义VAR data ：number. .fan18、表达式Sqrt（Abs（100）Sqr（Round（4.2）的值为（ ）A 30B 40C 30.0D 40.019、下列中和法的枚举类型定义是（ ）A TYPE op（1，2，3，4）；B TYPE op（1. .4）；C TYPE op（a，b，c，d）；D TYPE op（a,b,c,d）；20、下面的常量说明中，正确的是（ ）A CONSTB=True；B CONSTA,b=11；C CONSTI=10,20；D CONSTB1. .2；21、设有类型定义如下：TYPE SPECTRUM（RED，ORANGE，YELLOW，BLUE，INDIGO，VIOLET）；VAR COLOR ： SPECTRUM；则Ord（Succ（Red）的值为（ ）A 0B 1C REDD ORANGE22、下列符号（ ）是标示符A 1scaaB FirstTryC Name-Of-HersD Number One23、下面正确的关系表达式是（ ）At=wBNOT（0x1）C（3.438）or FalseD3410024、Pascal表达式Ord（NOT True）6 MOD 4的值为（ ）A 2B 3C TRUED 025、Pascal表达式Round（4.9）MOD Trunc（2.5）的值为（ ）A 1B 2C 4.9D 2.526、设有TYPE sex（male，female）；则下列表达式中和法的是( )A Ord（male）femaleB MaleSucc（Female）2C Pred（male）female27、与代数式对应的Pascal语言的赋值语句是（ ）A Y:=Sqrt（Abs（Exp（X）Ln（X+1）；B Y:= Sqrt（Abs（Exp（X）Ln（X+1）；C Y:=Sqrt（Abs（Exp（X）Ln（X+1）；D Y:=Sqrt(Abs(Exp(X)Ln(X+1)；28、以下正确的子届类型定义是（ ）A TYPE zj1. .5；B TYPE zj1.0. .5.0；C TYPE zj=（1. .5）;D TYPE zj=5. .1；29、每个Pascal程序的子程序都必须包括（ ）A 变量说明，语句体B 语句体C 变量说明，类型说明，语句体D 语句体，常量说明，变量说明30、下列正确的表达式是（ ）A Round（1.5）Chr（1.5）+1.5B (10 MOD 4)（10 MOD 5）（10 MOD 6）DIV Round（4.5）)C NOT（mg）OR NOT（PRED（12 MOD 5）2）D Abs（100）Abs（100）AND Sqr（2）Sqr（2）31、以下正确的枚举类型定义是（ ）A TYPE tp（A，E，I，O，U）B TYPE ran（1. .3,8. .10）C TYPE color（RED，BLUE，GREEN）D TYPE rt（1.5，2.5，3.5，4.5）32、表达式23 DIV3 MOD 4的值是（ ）A 0B 2C 3D 733、已知a,b,c,d,e,f均为整型变量，他们的值分别为9，6，7，5，2，3，那么表达式f/（c DIV e1 MOD a）Mod b）的值为（ ）A2.0B1.5C3.0D334、设a=6,b=3,c=42.15，d=-8，则表达式（a*Trunc（c）-b）MOD Succ（d）的值为（ ）A 12B 3C 7D 435、设a和b为同一枚举类型变量，以下语句合法的是（ ）A READ(a,b)；B Writeln(a,b)；C A:=b；D A:=OrdB.；36、设有如下的定义和说明TYPEColor（red,yellow,blue,green,black,white）；VARFLAG：color；如果进行赋值：flag：green；再执行语句Writeln(Chr(Ord(Pred（flag）)Ord（A）)将输出（ ）A redB 3C CD Yellow37、结构化程序设计的一种基本方法是（ ）A 递归法B 筛选法C 逐步求精法D 迭代法38、下列函数的值是整型的是（ ）A Succ(False)B Ord（True）C Chr(23)D Odd（98）39、把整数5转换成字符5的表达式是（ ）A Chr（5）Ord（0）B Chr（5Ord（0）C Chr（5Ord（0）D Chr（5Ord（0）40、下列表达式的中和法且运算结果为True的是（ ）A1，22，1B1，2，3，4=1，4Cred，blue2）44、设a,b,c,d,e均为整型变量，且a=6,b=15,c=8,d=9,e=4,则表达式a+b DIV cd MOD e的值为（ ）A 7B 6C 11D 245、变量说明如下：VARCh1,ch2：A. .F；Week：（sun,mon,tue,wed,thu,fri,sat）；且ch1：A；ch2：D；week1：sat，则表达式Ord（week） MOD （Ord（ch2）Ord（ch1）的值是（ ）A 0B tueC ED 346、下列表达式中，值为False的是（ ）A Sqr（6）Sqr（6）B Trunc（2.89）10 DIV 4C TRUE AND FALSE OR NOT FALSED ROUND（156）15 MOD 647、下列中错误的Pascal表达式是（ ）A 10e63.7B 7 DIV 15C 20 DIV 65.0D 4.0 DIV 248、设有说明：CONST c=a；d=b；下面表达式的值等于False的是（ ）A Odd（96 MOD 12）B False OR TRUEtrueC OrdC.+1=OrdD.D Pred（SuccC.）=c49、下面表达式的结果为100的是（ ）A Trunc（99.9）BTrunc（1000.1）CRound（99.9）E Round（Trunc（1000.1）50、分析下面的程序，判断A,B,C,D对应的4种语句中，正确的是（ ）PROGRAM Pro（Input,Output）；TYPE Day（MON,TUE,WED,THU,FRI）；VARA H：（x1,x2,x3,WED）；W1,BUSY：DAY；BEGINB BUSY：MONC Readln（W1）；D Writeln（W1）END.51、Pascal程序首部除必须有保留关键字PROGRAM外，还必须有（ ）A 程序名B 程序参数C OutputD Input52、以下不可以用作用户定义标示符的是（ ）A ReadB RESC BEGIND TO TAL53、字符串123和字符串321比较，如果要让比较的结果为真，应选用关系运算符（ ）ACD54、表达式Round（Sqrt（617）Sqrt（61 DIV 7）的值为（ ）A.T.B FC TrueD False55、代数式15（63.4Cos r）的Pascal表达式是（ ）A 15（Exp（3.4（ln（6）Cos（r）B 0.2（Exp（3.4lh（6）Cos（r）C 0.2（Exp（3.4lh（6）Cos（3.14159r/180）D 0.2（Exp（3.4lh（6）Cos（3.14159r/180）56、下列表达式中运算结果为False的是（ ）Ax IN A，C，E，GBABCA，B，CC，B，ADA，B，CA，B57、假设枚举类型定义如下：TYPE Day（MON,TUE,WED,THU,FRI）；则表达式Succ（Tue），Pred（Tue），Ord（Tue）的值为（ ）A WED，MON，1B MON，WED，1C WED，MON，2D MON，WED，258、表达式True And Not Odd（136）（85=3）的值为（ ）A TRUEB FlalseC 0D 159、下列哪组数据是符合Pascal规定的整数（ ）A121，85.,1.0B 325，0，987C 324.0，64E8，34D 7832，57，160、表达式：Trunc（Sqr（23 MOD 7）2（21 DIV 3）Sqr（12）的值为（ ）A 4B 55C 6D 2461、下面有效的Pascal字符型数据是（ ）AA Dog Is HereB1CND “ 62、代数式arcSin x的Pascal表达式为（ ）A ARCSin（x）B Asin（x）C Arctan（xSqrt（1Sqr（x）D ATAN（XSqrt（1.0-x2）63、设x是整型变量，下列表达式能将x四舍五入后保留两位小数的是（ ）A Round（x）B Round（x）100C Round（x100.0）100D Round（x1000.00）1000.0064、（多项选择题）若要用枚举类型标示符来表示加、减、乘、除运算，则下列正确的定义形式是（ ）A TYPE tp（，）；B TYPE tp（， ，）；C TYPE tp（A+,B-,C*,D/）；D TYPE tp（Add,Sub,Mul,Dv）；65、Pasca程序的执行部分是A 程序体B 整个程序C 语句体D 程序说明部分和语句部分66、以下类型定义中，有效的是（ ）A TYPE A12. .12；B TYPE B8. .5；C TYPE C1. .Sqr（7）；D TYPE D1. .3；67、以下正确的子界类型定义是（ ）A TYPE Num0. .5；B TYPE Num1.0. .5.0；C TYPE ScA. .E；D TYPE ScA. .E；68、设有VAR da：（Max，Min）；则下面表达式中合法的是（ ）A Succ（Max）Succ（Min）B MaxMin）True69、与代数式对应的Pascal表达式为（ ）A 2Sin（30.0）Cos（30.0）B 2Sin（30.0）Cos（30.0）C 2Sin（3.14*30.0/180.0+Cos（3.14*30.0/180.0）D 2Sin（3.14*30.0/180.0）+Cos（3.14*30.0/180.0）70、若有说明：TYPE data1. .1000； F-5. .0；VAR i：data； J：f则下面说法正确的是（ ）A 变量i和j的类型相同B 可以有语句i：j；C 变量i和j的类型不相同D 可以有语句i：j；71、以下有错误的Pascal实型数是（ ）A0.34E1.5B2.34E2C23E1D56.E572、已知有以下说明：TYPE t（JAN,TED,LED,YAN,SUN）；C（YELLOW,WHITE,GREEN,BLACK）；VAR v1：t；v2：c；V3：t；以下语句能够执行的是（ ）A v1：SUN；v2：WHITE；v3：GREEN；B IF（JANYAN） AND （YELLOWSUN） THEN Writeln（WRE）；C IF Succ（WHITE）BLACK THEN Writeln（SEA）；D IF v1YAN OR