辽师大版信息技术九年Pascel语言基础p

Pascal语言程序设计基础程序=计算机语言+数据结构+算法PascalConstpi=3.14159;Vars,r:real;beginreadln(r);s:=pi*r*r;writeln(‘s=‘,s);end.{程序首部}{程序体}ProgramArea(input,output);{说明部分}{执行部分}例：计算半径为R的圆面积SPascal符号保留字：（关键字）预定义标识符标准常量：FLASE、MAXINT、TRUE标准类型：BOOLEAN、CHAR、REAL标准函数：ABS、CHR、COS标准过程：DISPOSE、GET标准文件：INPUT、OUTPUT用户标识符在Pascal语言中具有特定的含义选用的表识符不能和保留字相同。有效长度为63个字符，并且大小写等效。标识符必须是以字母开头的字母、数字、下划线序列。判断：a_1a-178tMax9_ahi.a数据类型基本简单类型标准类型用户自定义类型实数类型整数类型字符类型布尔类型枚举类型子界类型顺序类型构造（复杂）类型数组类型集合类型记录类型文件类型指针类型类型　　数值范围　　占字节数　　格式shortint　-128~128　　　1　　　  带符号8位（短整型）integer　-32768~32767　2　　 　带符号16位（整型）longint　-2147483648~4带符号32位（长整型）2147483647 　　　　 byte　　　0~255　　　1　　　带符号8位（字节型）word　　0~65535　　　2　　　带符号16位（字类型）1、整型Pascal规定了两个预定义整型常量标识符maxint和maxlonint，他们各表示确定的常数值maxint为32767maxlongint为2147483647他们的类型分别是integer和longint类型　数值范围　占字节数　有效位数real　2.9e-39..1.7e38　　　6　　　11..12基本实型Single1.5e-45..3.4e38　　　4　　　7..8单精度实型double　5.0e-324..1.7e308　8　　　15..16双精度实型2、实型一个实型数据用来存放实数。3、字符型标识符：char字符型必须用单引号括起来字母作为字符型时，大小写是不等价的字符型只允许单引号中有一个字符，否则就是字符串。比较大小：‘A’()‘a’一个布尔型数据用来存放逻辑值（布尔值）。4、布尔型布尔型的值：false（0）和true（1）；boolean是布尔型的标识符。false和true都是预定义常数标识符，分别表示逻辑假和逻辑真。true>false。abNOTaNOTbaANDbaORbaxorbTrueTrueFalseFalseTrueTruefalseTrueFalseFalseTrueFalseTruetrueFalseTrueTrueFalseFalseTruetrueFalseFalseTrueTrueFalseFalsefalse布尔运算的运算次序：NOTANDXOR、OR例1：（第11届NOIP）设A＝true，B＝false，C＝false,D=true，以下逻辑运算表达式值为真的是（）A.(A∧B)∨(C∧D)B.((A∧B)∨C)∧DA∧((B∨C))∧DD.(A∧(B∨C))∨DE.(A∨B)∧(C∧D)例2（第9届NOIP）设A＝true，B＝false，C＝true，D=true，逻辑运算表达式A∧B∨C∧D的值是（）二进制的逻辑运算二进制数1和0在逻辑上可以代表“真”与“假”、“是”与“否”、“有”与“无”。1、逻辑加法（“或”运算）逻辑加法通常用符号“+”或“∨”来表示。逻辑加法运算规则如下：0+0=0，0∨0=00+1=1，0∨1=11+0=1，1∨0=11+1=1，1∨1=12、逻辑乘法（“与”运算）逻辑乘法通常用符号“×”或“∧”或“·”来表示。逻辑乘法运算规则如下：0×0=0，0∧0=0，0·0=00×1=0，0∧1=0，0·1=01×0=0，1∧0=0，1·0=01×1=1，1∧1=1，1·1=13、逻辑否定（非运算）逻辑非运算又称逻辑否运算。其运算规则为：0=1非0等于11=0非1等于04、异或逻辑运算（半加运算）异或运算通常用符号"⊕"表示，其运算规则为：0⊕0=00同0异或，结果为00⊕1=10同1异或，结果为11⊕0=11同0异或，结果为11⊕1=01同1异或，结果为0即两个逻辑变量相异，输出才为1练习：1、1010111∧10011101=书本P11-N152、10101010∨01100110=3、10101100=4、10101010⊕00001111=试一试：1、请模仿写出一个Pascal程序以实现计算梯形面积。假设梯形上底a＝5，下底b＝10，高h＝6。2、给出半径R＝100，求圆周长、圆面积。3、一个学生五门课的成绩为：70、89、65、100、78。编PASCAL程序，输出平均成绩。一、常量1、常量定义2、定义常量的语法格式CONST<常量标识符>=<常量>;……<常量标识符>=<常量>;3、类型（1）数n＝100（2）字符ch＝’*’（3）字符串str＝’Hangzhou’（4）布尔值flag＝True二、变量1、变量定义2、变量说明部分的语法格式VAR<变量标识符表>:<数据类型>;……<变量标识符表>:<数据类型>;Varbeginread(a,b);c:=a*b;d:=a/b;writeln(c);writeln(d);End.?例:输入:两个整数a、b(<=3000)，输出它们的乘积c，商d。a,b:integer;C:longint;d:real;三、标准函数1、算术函数函数标识符　自变量类型　　　　意义　　　　　结果类型abs　　　　整型、实型　　　　绝对值　　　　同自变量exp　　　　整型、实型　　　　指数　　　　　实型ln　　　　整型、实型　　　　自然对数　　　实型int　　　　整型、实型　　　　整数部分　　　实型frac　　　整型、实型　　　　小数部分　　　实型arctan　　整型、实型　　　　反正切　　　　实型sin　　　　整型、实型　　　　正弦　　　　　实型cos　　　　整型、实型　　　　余弦　　　　　实型sqr　　　　整型、实型　　　　平方　　　　　同自变量sqrt　　　整型、实型　　　　平方根　　　　实型练习abs(-4)=　　　　abs(-7.49)=　　　　frac(-3.71)=int(-3.71)=sqr(4)=sqrt(4)=函数标识符自变量类型　意义　　结果类型odd(x)　　　整型　　判断奇数　布尔型pred(x)　　顺序类型　　求前趋　同自变量succ(x)　　顺序类型　　求后继　同自变量　　例：odd(1000)=false　　pred(2000)=1999　succ(2000)=2001odd(3)=　　　pred(‘x’)=　　　　succ('x')=2、标量函数函数标识符　自变量类型　　意义　结果类型chr(x)　　byte　　自变量对应的字符　字符型ord(x)　　顺序类型　自变量对应的序号　longint　round(x)　实型　　　四舍五入　　longinttrunc(x)　　实型　　　截断取整　　　　longint　　例：chr(66)=‘B’　ord(‘A’)=65　round(-4.3)=-5　　trunc(2.88)=23、转换函数4、杂类函数：Random：0，1之间的随机实数Random(x)：0，x之间的随机整数Randomize：初始化内部随机数产生器Upcase(x)：使小写英文字母变成大写四、Pascal运算符(2)逻辑运算符运算符　　运算　　运算对象　　　结果类型not　　　逻辑非　　布尔型　　　　布尔型and　　逻辑与　　布尔型　　　　布尔型or　　　逻辑或　　布尔型　　　　布尔型xor　　　逻辑异或　布尔型　　　　布尔型(1)运算符+-*/divmod(3)关系运算符运算符　　运算　　　　运算对象　　结果类型　=　　　　等于　　　　简单类型　　　布尔型　<>　　　不等于　　　简单类型　　　布尔型　<　　　　小于　　　　简单类型　　　布尔型　>　　　　大于　　　　简单类型　　　布尔型　<=　　　小于等于　　简单类型　　　布尔型　>=　　　大于等于　　简单类型　　　布尔型优先级运算符　　　　　　　　优先级　not　　　　　　　　　1(高)*,/,div,mod,and　　　　　2xor,+,-,or　　　　　　　3in,=,<,>,>=,<=,<>　　　　4(低)练习：求下列表达式的值：  20mod19    15mod9    7div8     19div3 (4>5)  and  (7<8)     (8>9)  or (9<10) (2>3)  and  ((3=3)  or (3<7))13-2*3DIV4MOD2五、Pascal表达式1、算术表达式：3.1415929X2*pi*r2、字符表达式：’A’CHR(65)3、关系表达式：a+b<c4、布尔表达式：ROUND(a－b)>10算术表达式1、定义：由符合PASCAL语法规定的数值型运算对象（包括数值型的常量、变量、函数）、运算符、圆括号组成的有意义的式子。2、算术运算符：+、-、*、/、DIV、MOD3、运算次序：（1）圆括号（）（2）函数（3）*、/、DIV、MOD（4）+、-同一级别的运算符，按在表达式中次序“先左后右”的原则算术表达式例1：将下列的数学表达式改写成PASCAL表达式：     b^2-4ac     例2：n为四位数。请运用算术表达式分离出它的个、十、百、千位nMOD10--（个位数）（nMOD100）DIV10--（十位数）（nMOD1000）DIV100--（百位数）nDIV1000--（千位数）下面的程序执行后，变量b、c、d的值是多少？Programpl(input,output);Consta=256;Varb,d:integer;c:real;beginb:=adiv16;c:=a/b;d:=a;end.作业:写出下面运算的结果（注意类型）1、5*3*6DIV22、8/4*2.5/1.25*（3.7+2.3）3、18DIV4*sqr(4.0)/1.64、25DIV3MOD3*Trunc（2.5）5、8MOD(-16MOD3)*66、5DIV3/Ord(pred(‘C’))*Trunc(7.5*6.3)*Round(7.5-6.3)注：MOD函数按“求余”运算，Ord(‘A’)=65六、PASCAL语言的语句语句基本语句赋值语句过程语句读语句写语句其他过程语句转移语句空语句构造型语句复合语句条件语句分情况语句如果语句重复语句当语句直到语句循环语句开域语句1、赋值语句格式：<变量名>:=<变量名>注意：:=是赋值号，在书写时中间不能加空格。赋值语句的执行是：先计算（表达式的值），后赋值如：A：=（9*8）-（2-1）;A:=A+1注意:a，b:integer；——是一个说明语句。“：”是变量表和变量类型的分隔符a=b——是一个表达式。它的值是一个布尔类型的量：TRUE或FALSEa:=3；——是一个赋值语句。把整型常量值3赋给整型变量a写出下列程序运行后，变量a、b的值Programp2(input,output);Vara，b:integer;begina:=3;b:=a;b:=a+1;a:=a+1;b:=b+1;end.2、写语句－－输出语句功能：写（write）语句是Pascal中唯一能将运算结果送出显示在显示器屏幕的语句。格式：write(输出量表)；{输出后不换行}writeln(输出量表)；{输出后换行}writeln；{输出一个回车符}write(1,2,3,4);write(5,6);输出为：123456Write语句与writeln语句的区别:write语句将其后括号中的表达式一个接一个输出后，没有换行。而writeln语句则在输出各个表达式的值后换行。writeln(1,2,3,4);write(5,6);输出为：123456例如以下两个程序段的输出分别为：注意：场宽的限制在输出不同格式的数值时的作用：例2：实型数据小数位数的确定。 vara:real;begina:=15/8;writeln(a);{输出1.8750000000E+00}wiiteln(a:0:2);{输出1.88整数部分按实际位数输出，小数部分保留两位小数，末位四舍五入.}writeln(a:0:0):{输出2只输出整数部分，小数部分四舍五入}end.例1：数据项间隔。如输出最多四位的数据：write(x:5)。则数据间至少分隔一个空格。 写出输出结果consta=10;b=20;beginwriteln(50);write(a:3);writeln(a+b:4);writeln(‘a+b=’,a+b);end.3、读语句－－输入语句格式：read(<输出项表>)；--读入不换行readln(<输出项表>)；--读入换行readln；read后一定要有参数表；readln可以不带参数表,即可以没有任何输入项,只是等待读入一个换行符(回车)。经常用于暂停程序的运行，直到输入一个回车注意：写在括号中的变量，都要在变量说明中先预以说明；变量与变量之间，以“,”分隔；例：vara,b:integer;read(a,b); read与readln的区别    例：有两段程序有相同的变量说明如下，不同的读语句。变量说明vara,b,c,d:integer；执行结果abcd程序段一read(a);readln(b,c);read(d);1236程序段二readln(a);read(b,c);read(d)1678输入数据12345678写出下面程序的运算结果。Programp8(input,output);vara,b,c:integer;beginwriteln(‘请输入两个数：’);read(a,b);c:=a;a:=b;b:=c;writeln(a:5,b:5);end.输入：58作业：编写程序1、输入一个三位自然数，分离出它的百位、十位与个位上的数字，并逆序变成一个新的三位数输出。2、输入一个华氏温度，要求将其转换成摄氏温度。公式为C＝5/9（F-32），其中F是华氏温度，C是摄氏温度。3、输入a，b两个整数，要求输出a除以b得到的商和余数。（商保留两位小数，场宽为5）4、火车作直线加速运动，已知初速V0＝0，加速度a＝0.1米/秒2，求t＝10分钟时火车速度（以公里/小时表示），取两位小数。公式：Vt=V0+at演讲完毕，谢谢观看！