每套Pascal语言试题

合集下载

PASCAL练习题-18页word资料

PASCAL练习题PASCAL练习题序号题目难度完成数1计算路程167 2摄氏温度转华氏温度165 3求一元二次方程的根265 4成绩评定266 5商场折扣268 6倒数数列和357 7阶乘和357 8求最大值和最小值362 9菲波拉契数列354 10求素数347 11百钱买百鸡363 12水仙花数362 13计算π的值355 14最大公约数和最小公倍数458 15完数461 16亲密数对455 17奖学金认定259 18计算年龄261 19汽车时速计算353 20猴子吃桃问题454 21验证哥德巴赫猜想435 22钞票兑换344 23成绩评定2225 24聪明的猪414 25插入排序47 26约瑟夫问题516 27不重复的随机数413 28侦察任务310 29猜数游戏218 30因式分解411 31砝码选择34 32电灯开闭36 33追查凶手34 34十进制转二进制315 35分糖216 36贮油点53 37运动会成绩统计45 38等式填空315 39验证尼科彻斯定理410 40回文字符串217 41中缀表达式转后缀表达式57 42二叉树的遍历313 43留学生应会的语言31 44绝对素数20 45互不相同的七位完全平方数30 46求数字的乘积根50 47纯粹素数30 58完全平方数40 49十六进制数转十进制数20 50楼梯的不同走法50 51计数排序30 52厄拉多赛筛法求素数20 53杨辉三角形30 54打印图形20 55扑克分发30 56统计单词个数40 57二叉排序树20 58按比例组数30 59数字三角形40 60最佳字符编码40 1.计算路程【题目描述】从键盘输入速度v和时间t，要求计算路程s。

2.摄氏温度转华氏温度【题目描述】读入摄氏温度c，将它转换成华氏温度f输出，写出程序。

已知：f=9/5*c+32 3.求一元二次方程的根【题目描述】输入a,b,c，求一元二次方程ax2+bx+c=0的根。

PASCAL语言_复习题_FXT352064_1606

《PASCAL》复习题一、选择题1、下面语句中，可以使布尔型变量L的值为真的是___C____：A）L：=TB）L：=‘T’C）L：=TRUED）L：=‘TRUE’（2章赋值语句）2、下面的常量定义中正确的是__C___：A）CONST B) CONSTI=100 OR 200 R:12.5;C) CONST D) CONSTPI=3.14 J:=10（2章常量定义）3、循环语句FOR C:=‘X’DOWNTO ‘Z’DO writeln;的循环次数是___A___：A）0B）1C）2D）3（4章for语句）4、如果输入的数据是2，3，4，则下面程序的输出应为___C_______：PROGRAM SAM(INPUT,OUTPUT);V AR i, x, y:integer;BEGINFOR i:=1 TO 3 DOBEGINRead(x); y:=sqr(x)END;Writeln(‘x=’,x, ‘y=’,y)END.A) x=2 y=4 x=3 y=9 x=4 y=16B) x=4 y=16 x=4 y=16 x=4 y=16C) x=4 y=16D)x=2 y=4 x=2 y=4 x=2 y=4（2,4章for语句）5、选择适当内容填入下面的过程说明中，要求过程SWAP中的形式参数X 为值参，Y为变参____C______PROCEDURE swap( );…………A)CONST x: real;V AL y:realB)CONST x: real;y:realC）X:real;V AR y:realD）X,y:real（5章过程的语法）6、分析下面的一组语句，其中N为整型变量，这组语句执行的结果将输出字符串Good________D___个n:=0;repeatwriteln(‘Good’);n:=n+2;until n=5A)0B) 3C) 5D)无限（4章repeat循环语句）7、根据下面的变量说明V ARM, n, i, j:integer;bool:Boolean;则下面的赋值语句中正确的是______B_______A）m+n:=2*jB）bool:=n=i DIV jC）m=15 MOD 7D）m:=i+j:=n+8（2章赋值语句）8、对于PASCAL语言的记录类型，其开域语句用保留字____D____A)RECORDB)CASEC)WHILED)WITH（9章with 语句）9、设有如下的过程说明PROCEDURE wri;BEGINWriteln(‘Welcome to use pascal!!!’);End;则下面有关过程wri的叙述中正确的是____D_____A)过程说明有错，因为没有形式参数B)过程说明有错，因未说明过程的类型C)过程说明有错，因为在过程体内没有给过程名赋值的语句D)过程说明正确（2章赋值语句）10、已知变量ch是字符型变量，下面PASCAL赋值语句正确的是___D_____A)ch:=’ab cd’;B)ch:=chr(ord(succ(‘c’)+1));C)ch:=ord(‘b ’)+ord(‘a’);D)ch:=pred(succ(succ(‘f’)));（2章赋值语句）11、判断以下叙述，其中正确的是___A_______A) 在pascal程序中所用到的变量必须先说明后使用B) 在pascal程序中,允许使用的最小值是－maxintC) 在pascal程序中,分号是语句的一部分，在每个语句中不能省略D) 在pascal程序中,符号常数的值可根据需要随时修改（1，2章基本知识）12、以下不符合pascal规定的字符常量是___B_________A)‘2’B)‘pascal’C)’’’’D)‘a’（2章标准数据类型）13、以下属非法的pascal用户自定义标识是_____A____A)CONSTB)FORMATC)MAXD)NEXT（1章保留字）14、下面循环语句仅执行一次的是_____A_____A) I:=0; B) I:=0;Repeat while (I<3) doI:=I+1; I:=I+1;Writeln(i) writeln(i);Until I<3C)for I:=0 downto 3 do D) I:=0I:=I+1; while (I>0) or (I<3) doWriteln(i); I:=I+1;writeln(i);（4 章循环结构）15、下面函数首部或过程首部合法的是__B_______A)function sum;B)procedure next;C)function s(V AR s:real):integer;D)procedure f(a,b:real):char;（5章函数与过程）16、以下叙述不正确的是____D__________A)Pascal提供了一些标准函数和过程，用户使用时可直接调用，无需定义B)使用标准函数sin时，每调用一次都能得到唯一的一个值C)标准函数只能出现在表达式中，不能以一个调用语句的形式单独调用D)调用标准函数或标准过程均能通过一个函数名或过程名带回一个结果（5章函数与过程）17、设有过程首部procedure f (V AR x:integer;y:real);若a,b为整型变量，c为实型变量，则合法的过程调用语句是____D_____A)f(2,3)B)f(2,3.0)C)f(a+b,c)D)f(b,2)（4章过程调用语法）18、每个pascal程序都必须包括___D_____A) 常量说明B）类型定义C）变量说明D）程序首部（1章基本知识）19、已知实型变量r的值为32 .635，若要求按32 . 635的形式输出，应使用的写语句是___B__A)writeln(r );B)writeln(r:6:3);C)write(r:5:3);D)writeln(r:5);（2章write语句）20、以下标准数据类型中，____D______ 不能用读语句赋值A）整型B）实型C）字符型D）布尔型（2章基本类型）21、以下程序段共执行_____C______次循环I:=0.5;While I<2.5 doBeginI:=I+0.5;End;A) 1B) 3C) 4D) 5（4章for语句）22、以下pascal程序输出结果是____C______program tea(output);V AR i,j:integer;BeginFor i:=1 to 4 doBeginFor j:=4-i to 1 doWrite(‘*’);Writelnendend.A) * * * B) * C) * D) * ** * * * * * ** * * *（4章for语句,多重循环）23、下面循环语句能构成有限次循环的是____A_______A）I:=5;repeati:=i+1;until I>0B)I:=1;RepeatWriteln(i);Until I>1C)I:=5;While (I>0) doI:=I+1;Writeln(i);D)I:=1;While I<>0 doI:=I+2;Writeln;（4章for,while,repeat 循环语句）24、设a和b为同一类型枚举变量，以下语句合法的是：__A_______A) a:=b;B) read(a,b);C) a:=ord(b);D) writeln(a,b);（6章枚举类型）25、结构化程序的主要优点是（C ）A）程序体积小，节省内存空间B）程序效率高，节省运行时间C）程序结构清晰，可读性高，易维护与修改，可靠性高D）容易实现巧妙的算法（1章概述）26、下列for 循环的次数是（A ）a:=true ; b:=false ;for I:=a to b dowrite(i);A）0 B）1 C）A D）B（4章for语句）27、COS500 +e-X 的正确表达式为（）A）cos (50.0) + exp(-x)B）cos (pi * 50.0/180) + exp(-x)C）cos (3.1416 * 50.0 /180) + exp(-x)D）cos (50.0) + 1.0/exp(-x)（2章表达式）28、一个完整的pascal 程序由程序首部，说明部分及执行部分组成，其说明部分的次序为（ C ）A）常量说明，类型说明，变量说明，标号说明，过程说明B）标号说明，类型说明，变量说明，常量说明，过程说明C）标号说明，常量说明，类型说明，变量说明，过程说明D）类型说明，变量说明，标号说明，过程说明，常量说明（1章概述）29、．Pascal 程序中无序类型是指（A ）A）实型B）字符型C）整型D）布尔型（2章基本类型）30 A ）head …….A)Q^.next:=P^.next; B)q^.next^.next:=next;Dispose(p); dispose(p);C) q^.next:=p; D) p:=q^.next;P^.next:=nil; q^:=p^.next;Dispose(P); p^.next:=q^.next;Dispose(p);（11章链表删除）31、.下列具有输出功能的是_____D______A) Assign B) Input C) Begin D) Write32、当n为任意正奇数时，值总为Ｔtre的表达式是_____D______A) n MOD 2=０B) DIV 2=１C) N-(n DIV 2)=１D) n-Trunc(n/2)*2=133、表达式Pred(Chr(Ord(‘A’)+4))的值是_____B______A) ‘C’ B) ‘D’ C) 69 D) 10134、程序段：FOR i:=1 TO 5 DOFOR j:=2 TO i DOWriteln(‘A’);输出字符Ａ的个数是_____B______A) ５B) 10 C) 15 D) 2035、数学表达式Sin(60o)的正确PASCAL表达式是:______C_______A) Sin(60) B) Sin(3.14159*60)C) Sin(3,14159*60/180.0) D) Sin(60*3.14159/360.0)36、下列属PASCAL合法常数的是: _____A______A) 102 B) 1O.0 C) 35,000,000 D) 1/237、设x是一个实型变量，下面能将x四舍五入使小数部分精确到百分之一的PASCAL表达式是:_____A______A) Round(x*100.0)/100.0 B) Round(x/100,0)*100.0C) Trunc(x*100.0)/100.0 D) Trunc(x/100.0)*100.038、一个文件文件的基类型不可以是_____A______A) 文件B) 数组C) 实数D) 记录数组39、下列表达式中正确的是_____B______A) 8/2 MOD 2 B) NOT(1=0) AND(3<>2) C) ’a’+2 D) 2+False40、不能作为FOR语句循环控制变量的是下列哪种类型变量_____C______A) 整型B) 布尔型C) 实型D) 字符型二、填空题1、下面程序依次读入一个字符,以与读入相反的次序,建立以HEAD为头的单向链表,直到读入’!’为止。

PASCAL语言历年考题

1、不论怎样复杂的算法，它的基本结构一般有三种：顺序结构、分支结构和循环结构。 2. 程序设计的语言和环境在不断地发展，从最初的机器语言发展到汇编语言，再发展到现在常用的高级语言。 3、刚编写好的程序一般并不完全符合要求，它还需要在计算机上实际运行，以发现其中的错误，进行相应的修改和完善。这个过程称为程的调试与维护。 4、计算机解决问题的过程一般分为4个阶段，它们分别是需求分析、明确数据结构并设计算法、 _______、调试与维护。编写程序
4、在Pascal语言中，能够判断X不小于10的条件表达式是（ D ）。 A、X＞10 B、X≥10 C、X＜＝10 D、X＞＝10 5. 在Pascal语言中，能够判断x不大于20的条件表达式是（ D ）。 A.x>=20 B. x≥20 C. x≤20 D. x < =20 6. Pascal语言的基本输入语句是（ C ）。 A.Var B.Write C.Read D.While
1、算法的结构一般分为三种，以下选项中不属于算法基本结构的是（ B ）。 A．顺序结构 B．框架结构 C．循环结构 D．分支结构 2、在Pascal语言中，表示代数式的表达式是（C ）。 A A． 2a/3+b/3 B B． 2a+b/3 C． (2*a+b)/3 D． (2a+b)/3 3、在Pascal语言中，用于实现分支结构的语句通常是（ A ）。 A、If语句 B、While语句 C、Reห้องสมุดไป่ตู้d语句 D、Write语句
7.
C

pascal 练习题

pascal 练习题Pascal练习题Pascal是一种结构化的编程语言，于20世纪70年代由Niklaus Wirth开发。

它以其简洁、易读和高效的特点而闻名。

由于Pascal语言的特殊性质，它被广泛用于教育和训练编程入门者。

本篇文章将为大家呈现一些适用于Pascal编程的练习题。

通过这些练习题，读者们可以增加他们的Pascal编程技能，深入了解Pascal语言的特性与用法。

下面列出了一些练习题，每个练习题都有对应的题目和要求。

练习题一：阶乘计算器题目：编写一个程序，实现阶乘的计算。

要求：用户输入一个正整数，程序将输出该数的阶乘。

练习题二：质数判断器题目：编写一个程序，判断一个数是否为质数。

要求：用户输入一个整数，程序将输出该数是否为质数。

练习题三：字符串翻转题目：编写一个程序，实现字符串的翻转。

要求：用户输入一个字符串，程序将输出该字符串的翻转结果。

练习题四：数列求和题目：编写一个程序，计算数列的和。

要求：给定一个正整数n，程序将计算1到n的所有整数的和。

练习题五：矩阵转置题目：编写一个程序，实现矩阵的转置。

要求：用户输入一个m×n的矩阵，程序将输出该矩阵的转置矩阵。

练习题六：冒泡排序题目：编写一个程序，实现冒泡排序算法。

要求：用户输入一个整数数组，程序将按照升序或降序的方式对数组进行排序。

通过上述练习题，我们可以锻炼Pascal编程的各个方面，包括基本的算术运算、条件语句、循环语句、字符串处理以及数组操作等。

通过编写这些程序，读者不仅可以提高他们的编程技能，还可以更好地理解算法的实现过程。

为了更好地完成这些练习题，以下是一些有用的提示：1. 阶乘计算器：使用一个循环结构，递增一个变量并与用户输入的数相乘，直到达到用户输入的数。

2. 质数判断器：使用一个循环结构，检查除了1和自身以外的数是否可以整除用户输入的数。

3. 字符串翻转：使用一个循环结构，从字符串的末尾开始逐个提取字符，然后将提取的字符逐个连接起来形成新的字符串。

PASCAL练习题

2.摄氏温度转华氏温度【题目描述】读入摄氏温度c，将它转换成华氏温度f输出，写出程序。

已知：f=9/5*c+32 3.求一元二次方程的根输入a,b,c，求一元二次方程ax2+bx+c=0的根。

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

1、分析下面的程序,找出A,B,C,D对应的语句中正确的是() PROGRAM samp(Input,Output);TYPEW=(A,B,C,D,E);VARI:叱..9;T: W;m:Integer;BEGINA . ReadlnL;B . Readln(t) ;C . m：=SqrL;D . Writeln(t )End.2、代数式“:一仞一的Pascal表达式是()ci+b火 a * b a-bA.(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=(M 1 ,M2,M3,M4);B.xset=('x 1 ','x2','x3')C.P=( ARRAY,DIV);D.pia=(lc,2d,3a);4、下列中合法的变量说明是()A.VAR r:Real;Num:200;B.VAR a=Real;I=Integer;C.DIM Read,White:Integer;D.VAR il,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/nrCL'D.C9、下列哪种类型的常量不能用来定义子界类型()A.RealB.IntegerC.CharD.用户定义的任何顺序类型10、已知rl,r2的实行变量，il,i2是整型变量,下列各赋值语句中错误的是()A.i2:=il+i2 DFVilB.il:=il/i2C.r2:=2/3*Sqr(rl+r2)D.rl:=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.OB.lC.2D.313、表达式Round(Sqrt(14/3)-Sqrt(14 div 3))的值为()A.2B.lC.OD.-l14、每一个Pascal程序体必须包括()A.常量定义，类型定义，变量说明，语句体B.类型说明，变量说明，语句体C.变量说明，语旬体D.语旬体15、下列中和法的关系表达式是()A.'a'v99B.23.5V20C.12<32AND 56>46D.5<X<1416、以下正确的字节类型定义是()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 fan —nB.允许有赋值语句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.TYPEop= (1, 2, 3, 4)；B.TYPE op= (1. .4)；C.TYPEop= ('a', 'b', 'c', 'd')；D.TYPE op= (a,b,c,d)；20、下面的常量说明中，正确的是()A.CONSTB=True；B.CONSTA,b=Il；C.CONST1=10,20；D.CONSTB = 1. .2；21、设有类型定义如下：TYPE SPECTRUM = (RED, ORANGE, YELLOW, BLUE, INDIGO, VIOLET)；VAR COLOR : SPECTRUM；则Ord (Succ (Red))的值为()A.0B. 1C.REDD.ORANGE22、下列符号()是标示符A.IscaaB.FirstTry-Of-HersD.Number One23、下面正确的关系表达式是()A.'t' v '大'AND 'r' >= 'w'B.NOT (0<x< 1)C.(3.43v8) or FalseD.'34' <10024、Pascal 表达式Ord (NOTTrue) +6 MOD 4 的值为()A. 2B. 3C.TRUED.025、Pascal 表达式Round (4.9) MOD Trunc (2.5)的值为()A. 1B. 2C. 4.926、设有TYPEsex= (male, female)；则下列表达式中和法的是()A.Ord (male) = femaleB.Male=Succ (Female) —2C.Pred (male) <Pred (female)D.Male>female27、与代数式』WTn3 + l)|对应的Pascal语言的赋值语句是()A.Y:=Sqrt (Abs (Exp (X) Ln (X+l)))；B.Y:= Sqrt (Abs (Exp (X) Ln (X+l)))；C.Y:=Sqrt (Abs (Exp (X)大Ln (X+l)))；D ・ Y:=Sqrt(Abs(Exp(X))大Ln(X+1))；28、以下正确的子届类型定义是()A.TYPEzj=1..5；B.TYPE zj= 1.0. .5.0；C.TYPEzj= (1..5);D.TYPEzj=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 (<m, > 'g') OR NOT (PRED (12 MOD 5) +2)D.Abs (-100) =Abs (100) AND Sqr (—2) >Sqr (2)31、以下正确的枚举类型定义是()A.TYPE tp= ('A', 'E', T, '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/ (CcDIVe-1 MODa) Modb)的值为()B. 1.5C. 3.0D. 334、设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 (’O')B.Chr (5-Ord ('0'))C.Chr (5+Ord ('0'))D.Chr (5+Ord (0))40、下列表达式的中和法且运算结果为True的是()A.[1, 2] <> [2, 1]B.Ll, 2, 3, 4] <= [1, 4]C.[red, blue] <= [red, green, blue]D.[] IN [1]41、己知有类型说明:TYPE tl = (red, yellow, blue)；下面可以输出变量a： tl 值的程序段是()A.CASE a OFRed : Writein ('red')；Yellow : Writein ('yellow')；Blue : Writein ('Blue')EndB.CASE Ord A. OF'O'： Writein ('red')；T： Writein ('yellow')；'2'： Writein ('blue')EndC.CASE a Of0： Writein ('red')；1: Writein ('yellow')；2： Writein ('blue')EndD.CASE Ord A. OFred : Writein ('red')；yellow： Writein ('yellow')；blue： Writein ('blue')End42、下面的4个函数中，其函数值不可能是布尔类型的是()A.Odd (x)B.Ord (x)C ・ Pred (x)D.Succ (x)43、下列常量定义中正确的是()A.CONST C=21 OR 3.0B.CONST S： 1.3C.CONST S = 3.1416D.CONST S： (5>2)44、设a,b,c,d,e 均为整型变量，且a=6,b=15,c=8,d=9,e=4测表达式a+b DIV c*d MODe的值为()A.7B.—6C.11D. 245、变量说明如下：VARChl,ch2： 'A' .. 'F'；Week： (sun,mon,tue,wed,thu,fri,sat)；且chi： = 'A'； ch2： = 'D'； week 1: =sat,则表达式Ord (week) MOD (Ord (ch2) -Ord (chi))的值是()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 (15/6) <>15 MOD 647、下列中错误的Pascal表达式是()A.10e6*3.7B.7 DIV 15C.20 DIV 6 / 5.0D. 4.0 DIV 248、设有说明:CONSTc= 'a'； d= 'b'；下面表达式的值等于False的是()A.Odd (96 MOD 12)B.False OR TRUE=trueC.OrdC.+l=OrdD.D.Pred (SuccC.) <=c49、下面表达式的结果为一100的是()A.Trunc (-99.9)B.Trunc (-100-0.1)C.-Round (一99.9)E.—Round (Trunc (—100—0.1))50、分析下面的程序,判断A,B,C,D对应的4种语句中,正确的是() PROGRAM Pro (Input,Output)；TYPE Day = (MON,TUE,WED,THU,FRI)；VARA.H： (xl,x2,x3,WED)；W1,BUSY： DAY；BEGINB.BUSY： =MONC.Readln (Wl)；D.Writein (Wl)END.51、Pascal程序首部除必须有保留关键字PROGRAM外，还必须有()A.程序名B.程序参数C.OutputD.Input52、以下不可以用作用户定义标示符的是()A.ReadB.RESC.BEGIND.TO TAL53、字符串‘123,和字符串'321，比较，如果要让比较的结果为真，应选用关系运算符()A.vB.>C.=D.==54、表达式Round (Sqrt (61 /7)) >Sqrt (61 DIV 7)的值为()A..T.B. FC.TrueD.False55、代数式1/5 (634+C OS r°)的Pascal 表达式是()A. 1 /5 (Exp (3.4大(In (6)) +Cos (r)B.0.2大(Exp (3.4*lh (6)) +Cos (r))C.0.2 (Exp (3.4大Ih (6)) +Cos (3.14159*(7180))D.0.2大(Exp (3.4大Ih (6)) +Cos (3.14I59*r/180))56、下列表达式中运算结果为False的是()A.'x' IN ['A', 'C', 'E', 'G']B・[?A，] <> [B]C.[*, C] = [C, *]D.['A',，B',，C'] >= ['A',，B']57、假设枚举类型定义如下：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) < (8—5v=3)的值为()A.TRUEB.FlalseC.0D. 159、下列哪组数据是符合Pascal规定的整数()A.121, 85.,1.0B・-325, 0#, 987C.324.0, -64E8, 34D.7832, 57, -160、表达式：Trunc (—Sqr (23 MOD 7) *2大(21 DIV 3) +Sqr (1/2))的值为()A. 4B.-55C. 6D.2461、下面有效的Pascal字符型数据是()A.'A Dog Is Here'B. 1C.ND.' " '62>代数式arcSin x的Pascal表达式为()A.ARCSin (x)B.Asin (x)C.Arctan (x / Sqrt (1 — Sqr (x)))D.ATAN (X/Sqrt (1.0-x* *2))63、设x是整型变量，下列表达式能将x四舍五入后保留两位小数的是()A.Round (x)B.Round (x) / 100C.Round (x* 100.0) / 10()D.Round (x* 1000.00) / 1000.0064、(多项选择题)若要用枚举类型标示符来表示加、减、乘、除运算，则下列正确的定义形式是()A.TYPE tp= ( + ,—,大，/ )；B.TYPE tp= ('+ '/')；C.TYPE tp= (A+,B-,C*,D/)；D.TYPE tp= (Add,Sub,Mui,Dv)；65 > Pasca程序的执行部分是A.程序体B.整个程序C.语句体D.程序说明部分和语句部分66、以下类型定义中，有效的是()A.TYPEA=12. .12；B.TYPEB = 8. .5；C.TYPEC=l..Sqr (7)；D.TYPED=1.. '3'；67、以下正确的子界类型定义是()A.TYPENum=O. . — 5；B.TYPENum=1.0. .5.()；C.TYPE Sc = A. ,E；D.TYPE Sc= 'A' .. 'E'；68、设有VAR da： (Max, Min)；则下面表达式中合法的是()A.Succ (Max) <Succ (Min)B.Max<MinC.Min=Pred (Max) +2D.Pred (Max>Min) oTrue69、与代数式2S/7?30° + Cos30°对应的Pascal表达式为()A.2Sin (30.0) +Cos (30.0)B.2*Sin (30.0) +Cos (30.0)C.2Sin (3.14*30.0/180.0+Cos (3.14*30.0/180.0))D.2*Sin (3.14*30.0/180.0) +Cos (3.14*30.0/180.0)70、若有说明：TYPE data=1..1000；F=.5. .0；VAR i： data；J： f则下面说法正确的是()A.变量i和j的类型相同B.可以有语句i： =j；C.变量i和j的类型不相同D.可以有语句i： = — j；71、以下有错误的Pascal实型数是()A.0.34E1.5B. 2.34E2C.23E1D.56.E572、已知有以下说明：TYPE t= (J AN,TED,LED, YAN,SUN)；C = (YELLOW,WHITE,GREEN,BLACK)；VAR v 1: t； v2： c；V3： t；以下语句能够执行的是()A.vl： =SUN； v2： = WHITE； v3： = GREEN；B.IF (JAN<YAN) AND (YELLOWoSUN) THEN Writein (' WRE')；C.IF Succ (WHITE) = BLACK THEN Writein ('SEA')；D.IFvl= YAN OR LED THEN Writein ('TIG')；73、表达式Round (Sqr (11 /3)) >Sqr (11 Div 3)的值是()A..T.B..F.C.FalseE.True74、下面的标准标示符中，()是Pascal的标准函数A.Reset (F)B.Rewrite (F)C.WriteinD.Eoln75> Pascal编译程序是()A.把Pascal源程序转换成可执行的EXE文件的程序B.把Pascal源程序转换成等价的目标码的程序C.生成和修改一个Pascal语言源程序的程序D.把Pascal的目标码程序转换成可运行的EXE文件的程序76、标准Pascal程序的说明部分的正确顺序是()A.CONST VAR TYPE LABLEB.VAR CONST LABLE TYPEBLE CONST TYPE VARBLE CONST VAR TYPE77、表达式Odd (k) or Odd (k+1)的值为()A.TrueB.KC.0D.k+178、下列在CONST中说明的正确的常量定义是()A.least = —200；B.High： =300；C.TheChr= "a”；D.Oko 1000.0；79、使用下列说明TYPECOLOR = (RED,ORANGE,YELLOW,GREEN, BLUE)；VARTheColor： COLOR；在执行下面语句：TheColor： = GREEN；表达式Char (Ord (TheColor) +Ord ('A'))的值为()A.'E，B.'A，C. 3E.080、设有变量说明：VARA： (R, B, A, J, K)；则函数Succ (A)的取值是()A. 5B. BC.JD. 3。

pascal 语言练习

1、设a,b,c,d,e均为整型变量，且a=1, b=2, c=10,d=3,e=4,则表达式a-b*c div d mod e 的值是A. 13B. 5C. 11D.02、设a,b,c,d,e均为整型变量，且a=13, b=2, c=10,d=3, e=4,则表达式c div d*b-a mod e的值是A. 5B. –3C. 0D. -23、设a为整型变量，b、c、d为实型变量，且a=9, b=1.5,c=8.3, d=3.5,则表达式：trunc(c) div round(d) +sqrt(a)/b的值是A. 4B. 4.0C. 5.0D. 54、设a为整型变量，b、c、d为实型变量，且a=9, b=1.5,c=8.3, d=3.5,则表达式：a/b-trunc(c)*3 div round(c) +sqrt(round(d))的值是A. 4.0B. 4C. 5.0D. 55、下面正确的布尔表达式是A.‘9’>8B. 5<=10/1.5C. 3<X<8D. X>5 AND X<=8.86、下面正确的布尔表达式是A.NO(X>7) OR (X=7)B.(5*3)AND(5>X)C.9>3+1D.(9>3)+1.57、设a,b,c,d为布尔变量，则表达式(a and(b and not b))or not( c or ( d or not d))A.其值为flase的表达式B.其值为true的表达式C.不正确的表达式D.得不到结果8、表示下图中坐标轴上阴影部分的表达式应该是A.(x<=a)and(x>=b)and(x<=c)B.(x<=a)or(b<=x<=c)C.(x<=a)or(x>=b)and(x<=c)D.(x<=a) and (b<=x<=c)9、x既不在-5.5到-2.5的范围内，又不在2.5到5.5的范围内，下面正确的布尔表达式是A.x>5.5 or x<-2.5 and x>2.5 or x<5.5B.(abs(x) <2.5) or (abs(x)>5.5)C.(x<=-2.5 and x>=-5.5)and(x>=2.5 and x<=5.5)D.(x<-5.5 or x>5.5)or(x>-2.5 and x<2.5) 10、设a,b,c为整型变量，且有a:=5；b:=2；，下面能使c的值为1的正确语句是A. c:=(a-2)/bB. c:=a mod (b+2.0)C. c:=a div (b+1)D. c:=(a-2)div(b/1)11、设x是实型变量，能将x四舍五入后保留2位小数的表达式是A. ROUND(X)B. ROUND(X)/100.0C. ROUND(X*100.0)/100.0D. TRUNC(X*100.0)/100.012、下列中正确的布尔表达式是A. ‘x’<100B.55.5<20C. 25<46 AND 75>8D.55<Y<22013、把整数5转化为字符‘5’的表达式是A. CHR(5)-ORD(‘0’)B. CHR(5-ORD(0))C. CHR(5+ORD(0))D. CHR(5+ORD(‘0’))14、下列语句中正确的是A. x=x+1;B. pi*r+r/a;C. write(‘write(i)=’,i);D. x+y:=z;15、已知x=100,y=200,z=300以下程序段执行后x,y,z 的值应是if x>y then z:=x;x:=y; y:=z;A. x=100,y=200,z=300B. x=200,y=300,z=300C. x=200,y=300,z=200D. x=200,y=300,z=20016、已知实型变量x的值为12.345，若要求按12.345的形式输出，应该使用的输出语句是A. Writeln(x)B. Writeln(x:6:3)C. Writeln(x:3:6)D. Writeln(x:5)17、如果a是整型变量，b，c是实型变量，ch是字符型变量，x是布尔型变量，并且它们已被赋值为：a=1，b=2.5，c=5.0, ch=’A’，x=true，下面无效的赋值语句是A．b:=c:=8.8; B．c:=a+1;C．ch:=’*’; D．x:=x and (a=b)18、var ch1,ch2,ch3:char;beginreadln(ch1);readln(ch2,ch2);readln(ch3,ch3,ch3);writeln(ch1,ch2,ch3)end.运行以上程序时，若输入为：abcdefghi以下输出的正确的是A．adg B．ghiC．aei D．cfi19、设ｘ，ｙ，ｚ为整数变量，并有以下程序段read(x);readln(y,z);readln(z);readln(x,y);writeln(x:2,y:2,z:2);若运行是输入：1 2 34 5 67 8 9则以下输出中正确的是A. 1 2 3B. 1 4 7C. 7 8 3D. 7 8 420、已知ａ，ｂ，ｃ，ｄ，ｅ，ｆ，ｇ均为整型变量，其值分别为2，4，6，8，10，12，14，若输出结果为 2 46 8 1012 14则正确的输出语句应该是A. write(a:3,b:3）;write(c:3,d:3,e:3);write(f:3,g:3);B. writeln(a:3,b:3);write(c:3,d:3,e:3);writeln(f:3,g:3);C. write(a:3,b:3）;writeln(c:3,d:3,e:3);writeln;write(f:3,g:3);D. write(a:3,b:3）;writeln;write(c:3)writeln(d:3,e:3);write(f:3,g:3); 21、设x，y，z为整型变量且变量已赋值。

pascal练习题

一、填空题(每空1分，共14分)1 如果希望将参数作为过程处理的结果传递至过程外，那么这种参数应作为（变量参数）。

2 一个PASCAL程序由程序首部与（分程序）两部分组成，以“.”结束。

【解】答案为：分程序。

正确的PASCAL程序结构是：程序首部分程序.3 设有说明var a,b,c,d,e:integer则对于待输入数据12345678执行下列语句后，d=___________。

readln(a,b,d);readln;readln(c,d)【解】第一个读语句读去了2行(第1、2行)第二个读语句读去了1行(第3行)第三个读语句是读第4行上的数据，即：7→C；8→d，因此d=8。

这里要注意readln的作用。

此题的readln若都换成read，情况就不同了。

4 动态变量与静态变量的关键区别在于动态变量_____________。

【解】答案为：不需(在分程序的说明部分)明显说明。

分析：动态变量是无法由说明部分明确说明的，它是随机产生的。

5 程序中的错误一般分为语义错误、_____________与___________三类。

【解】语法错误。

逻辑错误。

分析：语法错误是指程序或其成分(各说明，语句等)不合乎语法，如实在参数表与相应形参表不一致等。

语义错误是指程序或其成份语义有错，如除法的除数为零等。

逻辑错误是指程序未能真实反映算法，或算法本身就有错误。

例如，把a+b错写成a*b等。

6 succ(round(38.5/5))－(ord('D')－ord('A'))mod 4 =______________【解】正确答案为6。

这里要注意表达式的运算顺序以及succ、ord和mod运算的含义。

7 PASCAL语言的标准简单类型是整型、实型、_________与字符型，标准构造类型是_______【解】布尔型(boolean型)正文文件类型(text型)。

此题的标准构造类型容易被忽视，它是用类型标识符text标记的。

pascal语言笔试题及答案

pascal语言笔试题及答案pascal语言笔试题及答案一、单选题（每小题2分，共60分）1、在结构化程序设计中所说的程序的三种基本结构是指（）。

a）主函数、函数、过程b）顺序、选择、循环c）程序首部、说明部分、语句部分 d） while、repeat、for2、以下各组运算中运算优先级最低的一组是（）。

a) +，-，orb) *,/c) div, mod,andd) >=, in3、数学表达式sin(60o)的正确pascal表达式是 ()。

a) sin(60)b)sin(3.14159*60)c) sin(3.14159*60/180)d)sin(60*3.14159/360)4、下列表达式中正确的是()。

a) 8/2 mod 2b)not(1=0) and(32)c)\a\+2d) 2+false5、当n为任意正奇数时，值总为true的表达式是()。

a) n mod 2=０b) n div 2=1c)n-(n div 2)=１ d)n-trunc(n/2)*2=16、表达式pred(chr(ord(\a \)+4))的值是 ()。

a) \c \b)\d c)69d) 707、下列表达式值为5的是()。

a) pred(8 div2)b) abs(round(23/4))c) su(trunc(22/(26 mod7)))d) ((8 mod 5)*3+1) div 38、下面变量说明中错误的是（）。

a) var s:set of char;b)var s:set of integer;c) var s:set of1..100;d) var s:setof(sun,mon,tue,wed,thu,fri,sat);9、不能作为for语句循环控制变量的是下列哪种类型变量（）。

a) 整型b) 布尔型c) 实型d) 字符型10、至少被执行一次的循环语句是（）。

a) for语句b) repeat-until语句c) while语句d) for、repeat-until和while语句11、下面关于for循环不正确的叙述是（）。

PASCAL语言期中试题

2004—2005学年第一学期PASCAL语言期中测试题适用年级：04高专班级：姓名：一、填空题：（2×10，共20分）1．Pascal语言程序由、和三部分组成。

2．最常用的Pascal语言的编译程序是。

3．表达式47 MOD 8的值是。

4．在输出语句中，若设置域宽则按域宽输出时必须对齐，并且不足位的用补足。

5．Pascal语言中一般有、和三种循环语句。

二、选择题：（3×10，共30分）（）1.下列不可以作为用户自定义标识符的是A.字母B.数字C.下划线D.保留字（）2.对于用户自定义标识符说法错误的是A.用户自定义标识符长度任意，但只有前63个字符有效B.用户自定义标识符中不允许出现空格C.用户自定义标识符可以以任意字符开头D.用户自定义标识符必须在说明部分说明（）3.求X的平方用下面哪个函数A.SQR（X）B.ORD（X）C.ABS（X）D.CHR（X）（）4.下列数据类型哪个是非法的A.35B.5.6C.12.E+6D.6.6E+0.5（）5. Pascal语言程序中，字符串必须用作为括号A.圆括号B.单引号C.双引号D.分号（）6.下列关于读语句的说法不正确的是A.变量为什么类型，被读数据就为什么类型B.READ语句后可以没有变量C.READLN语句要求换行D.字符变量不能与整型变量同用一个输出语句（）7.输出语句中若省略域宽则将输出数据按位域宽输出A.15B.16C.17D.18（）8.布尔类型变量的标识符是A.BOOLEANB.REALC.CHARD.INTEGER（）9.CASE a+b OF1，0，5：X：=1；2，0，4：X：=2；17：X：=3；END；上述程序有几处错误？A.1B.2C.3D.4（）10.REPEAT循环控制条件必须为A.整型B.字符型C.实型D.布尔型三、问答题：（2×5，共10分）1.简述编写程序的一般步骤。

2.什么叫常数？常数与常量有什么区别？四、计算题：（2×5，共10分）1.（7-2）DIV （4+6 DIV 2）2.（NOT a1 OR a2）AND （a2 OR a3）（a1 、a2 、a3分别为T 、F 、F ）五、写出下列程序的输出结果（2×5，共10分）1.FOR COUNTER ：=‘C ’TO ‘F ’DOWRITER （‘HELLO ’）；WRITERLN （‘GOOD-BYE ’）；2. FOR COUNTER ：=‘C ’TO ‘F ’DOBEGINWRITER （‘HELLO ’）；WRITERLN （‘GOOD-BYE ’）END ；六、编写程序计算（用IF 语句）（20分）Y=1+X (X=0)1-X (X<0)。

pascal(低等难度)试题 (6)

PASCAL语言上机试题（第1套）二.(35分) 在A盘上给定t12.pas,其功能是:求N个数中的最小数及其序号。

N的值及整数由键盘输入, 将该程序调试修改:分别在两个"?"处填上正确变量,并把"?"号删除；修改后执行，以验证程序的正确性。

program t12(input,output);var n,k,i,a,min:integer;begin write('输入数的个数（ShuRu SHuDe Geshu）:'); readln(n);write('输入（ShuRu） ',n, ' 个数（Ge Shu）:'); read(min);k:=1;for i:=2 to n dobegin read(a);if a<min thenbegin min:=a;k:= iendend;writeln('min=',min,',k=',k:1)end.三.(35分)已知梯形的上底是10厘米,下底是15.5厘米,高是8厘米,编出PASCAL程序,求出梯形的面积。

用文件名T13.pas存在A盘上。

program t13(output);beginwriteln('梯形的面积是：’,(10+15.5)*8/2)end.PASCAL语言上机试题（第2套）二.（35分）在A盘上给定t22.pas,其功能是:求N个整数中的最小数及最大数。

N的值及整数由键盘输入, 将该程序调试修改:分别在三个"?"处填上正确变量,并把"?"号删除；修改后存盘并执行，以验证程序的正确性。

program t22(input,output);var n,i,x,max,min:integer;begin write('输入数的个数(ShuRu SHuDe Geshu):'); readln(n);write('输入(ShuRu) ',n, ' 个数(Ge Shu):'); read(min);max:=min;for i:=2 to n dobegin read(x);if x<min then min:=xelse if x>max then max:=xend;writeln('min=',min,',max=',max:1)end.三.（35分）已知园的半径为R,编出PASCAL程序,求出园的周长和面积。

Pascal基础知识测试答案

Pascal语言基础知识测验题第一套1、sqrt(4)的值为（2.0）（保留一位小数）。

2、’A’>’a’的值为（False）。

3、下列标识符哪个是合法的（A）。

A、X1B、a(c)C、varD、1234、下列程序段输出结果为（9）。

Var a,b,c:integer;Begin a:=5;b:=4; c:=a*a-b*b;writeln(c); End.5、下列程序段输出结果为（45）。

Var m,n:integer;Begin M:=0;For n:=2 to 3 Dom:=m+2; Write(m); End.第二套1、Pascal 语言中的赋值号为(:=)。

2、ord(37)的值为(37)。

3、用Pascal语言表达式表示X为偶数。

（odd）4、下列程序段输出结果为（40）。

Var A:integer;Begin A:=100;A:=A+20; A:=A Div 3;Writeln(A); End.5、下列程序段输出结果为（4）。

Var Y:integer;Begin Y:=2;While(Y<=32)DoY:=Y*Y; Writeln(Y); End.第三套1、Turbo Pascal7.0中，Integer类型的取值范围为(-32768)到32767。

2、已知chr(97)的值为字母a则chr(100)的值为字母(d)。

3、-15 mod 4的值为(-3)。

4、下列程序段输出结果为（-1）。

Var X,Y:integer;Begin X:=-100;If (X<0) Then Y:=-1 ElseY:=1; Writeln(Y); End.5、下列程序段输出结果为（200）。

Var X:integer;Begin X:=0;For I:=1 to 100 DoX:=X+2; Writeln(X); End.第四套1、odd(24)的值(False)。

2、16 Div 5的值为(3)。

pascal语言试题及答案

pascal语言试题及答案1. Pascal语言的创始人是谁？- A. Dennis Ritchie- B. Bjarne Stroustrup- C. Niklaus Wirth- D. Guido van Rossum答案： C2. 以下哪个选项不是Pascal语言的特性？- A. 结构化编程- B. 强类型- C. 面向对象- D. 编译型语言答案： C3. Pascal语言中，用于声明变量的关键字是什么？- A. var- B. let- C. def- D. declare答案： A4. 在Pascal中，以下哪个运算符用于比较两个变量是否不相等？ - A. =- B. <>- C. ==- D. !=答案： B5. Pascal语言中，以下哪个关键字用于定义函数？- A. function- B. procedure- C. define- D. method答案： A6. 在Pascal中，如何声明一个整型数组？- A. var arr: array[1..10] of integer;- B. var arr: integer[1..10];- C. var arr: integer array[1..10];- D. var arr: integer[10];答案： A7. Pascal语言中，以下哪个语句用于循环执行一段代码？ - A. loop- B. repeat- C. while- D. for答案： D8. 在Pascal中，以下哪个关键字用于定义过程？- A. function- B. procedure- C. subroutine- D. method答案： B9. Pascal语言中，以下哪个运算符用于取模运算？- A. %- B. mod- C. div- D. rem答案： D10. 在Pascal中，以下哪个关键字用于定义一个记录类型？ - A. record- B. struct- C. type- D. class答案： A。

Pascal 语言练习题

Pascal 语言练习题一、Pascal 语言1. Pascal语言规定,程序一律以保留字___________开始,作为程序标志。

5. 结构化程序设计的3种基本结构是_________、_________、_________。

9. 表达式PRED(CHR(ORD(′E′)+1))的值为___________。

11. 将一万分之一写成Pascal数的形式应为___________。

14. Pascal语言的数据类型按其特点可分3大类,即_____________类型,___________类型和___________类型。

15. 将65526.0034写成Pascal数的形式应为___________。

22. 表达式ORD(′6′)>=ORD(6)的值是___________。

二、基本语句和顺序结构1. 请写出把256.0赋给整型变量I的赋值语句是___________。

2. 设I为整型变量,L为布尔型变量(l:boolean),odd函数是判断一个数是否为奇数，如odd(5)=true,语句L:=ODD(I) OR ODD(I+1);执行后L的值为___________。

3. 以下程序的运行结果为___________。

PROGRAMEX(OUTPUT);VARA,B,C,N,SUM:INTEGER;BEGINN:=126;A:=N DIV 100;B:=(N-A*100) DIV 10;C:=N-A*100-B*10;SUM:=A+B+C;WRITELN(′SUM=′,SUM:3)END.4. 有以下程序:PROGRAM P1(input,output);VAR ch:char;BEGINREADLN(ch);writeln(pred(pred(ch)),pred(ch),ch,succ(ch) ,succ(succ(ch)))END.假设输入字母C,则输出为___________。

6. 表达式trunc(-sqrt(sqr(17 MOD 5)*2*(15 DIV 2)+sqr(1／2)))的值是__________。

Pascal试卷

Pascal试卷一、选择题下列各题A)、B)、C)、D)四个选项中，只有一个是正确的，请选出。

(1) 下面是对PASCAL程序组成结构的四条描述，其中错误的是A) PASCAL程序必须有程序首部B) 程序的注释部分只能写在程序中一条语句的最后C) 程序首部的参数部分可有可无D) 一个完整的PASCAL程序的主程序只能有一个(2) 设a，b，c为整型变量，且有a:=5;b:=2，下面能使c的值为1的正确语句是A) c:=(a－2)/b; B) c:=a MOD (b＋2.0); C) c:=a DIV (b＋1); D) c:=(a－2) DIV (b/1);(3) 设有常量定义:CONST a=0;b=22768;下面对常量引用正确的是。

A) Readln(a); B) a:=a－1; C) PROCEDURE p(c:b..a);D) VAR c：a..b;(4) 下面函数值等于FALSE的是。

A) Odd(Trunc(－7.49)) B) Round((Abs(－9.5)))<10C) NOT(TRUE<FALSE) D) Ord(Chr(Pred(8)))>=7(5) 设有说明VAR color:(red,green,yellow,blue);a:Boolean;下面语句正确的是。

A) color:=’green’;B) Writeln(green);C) Writeln(color);D) IF red<blue THEN a:=TRUE;(6) 设n是整型变量，m是如下定义的子界型变量：TYPEmytype=－20..－10;VARm:mytype;下面赋值语句中不正确的是。

A) n:=m B) n:=m＋1.0 C) n:=Abs(m) D) n:=n＋m(7) 下列哪个表达式无语法错误?A) 70<30B) 70>30 AND 70>15 C) 15<30<50 D) 70 NOT 70>20(8) 标准PASCAL程序说明部分的正确顺序是。

PASCAL题集

PASCAL题集1、给一个不多于三位的正整数,求出它是几位数,并分别打印出各位上的数字。

vara,b,c,d,e:integer;beginreadln(a);b:=a div 100;c:=(a div 10) mod 10;d:=a mod 10;if b<>0 then e:=3 else if c<>0 then e:=2 else e:=1;writeln(e);if (e=1) then writeln(d)else if (e=2) then writeln (c,' ',d)else writeln(b,' ',c,' ',d);end.2、编写程序求出下式中n的最大值2*2+4*4+6*6+''''''''''+n*n<1500var a,s:integer;begina:=0;s:=0;repeata:=a+2;s:=s+a*a;until s>=1500;writeln(a-2); readln;end.3、古印度国王要褒奖他的聪明能干的宰相达依尔(国际象棋的发明者),问他要什么.达依尔回答:“殿下只要在棋盘(横竖个8行8列,共64个格)的第一个格子中放1粒麦子,在第二个格子中放2粒,在第三格中放4粒,以后每个格子中放的麦粒数都是前一个的两倍.如此放满64格,我就满足了。

”请你计算出输入格数（麦粒数或体积）后的麦粒数和体积（格数和体积或格数和麦粒数）提示：1立方米麦子约为1.42乘以10的8次方varsum,t:double;i,j:longint;begint:=0;for i:=0 to 63 dobeginsum:=1/142000000;for j:=1 to i dosum:=sum*2;t:=t+sum;end;writeln(t:10:10);end. 答案：129906648406.4054、已知一对兔子，每个月可以生一对小兔，而小兔子过一个月后也可以生一对小兔，即兔子的对数是：第一个月1对，第二月2对，第三个月3对，第四个月5对，……假设兔子的生育期是12个月,并且不死, 问一年后,这对兔子有多少对活着的后代?program t0101;constn=12;vari,l,p,x:integer;beginp:=1;l:=2;for i:=3 to n dobeginx:=l+p;p:=l;l:=x;end;writeln('total:',x);readlnend. 答案：即数列1，2，3，5，8……，结果为233。