《Pascel语言基础》ppt课件九年级信息技术.ppt

Pascal语言程序设计基础,程序=计算机语言+数据结构+算法,Pascal,Const pi=3.14159;Var s,r:real;begin readln(r);s:=pi*r*r;writeln(s=,s);end.,程序首部,程序体,Program Area(input,output);,说明部分,执行部分,例：计算半径为R的圆面积S,Pascal符号,保留字：（关键字）,预定义标识符,标准常量：FLASE、MAXINT、TRUE,标准类型：BOOLEAN、CHAR、REAL,标准函数：ABS、CHR、COS,标准过程：DISPOSE、GET,标准文件：INPUT、OUTPUT,用户标识符,在Pascal语言中具有特定的含义,选用的表识符不能和保留字相同。,有效长度为63个字符，并且大小写等效。,标识符必须是以字母开头的字母、数字、下划线序列。,判断：a_1 a-1 78t Max 9_a hi.a,数据类型,基本简单类型,标准类型,用户自定义类型,实数类型,整数类型,字符类型,布尔类型,枚举类型,子界类型,顺序类型,构造（复杂）类型,数组类型,集合类型,记录类型,文件类型,指针类型,类型 数值范围占字节数格式shortint-1281281带符号8位（短整型）integer-3276832767 2 带符号16位（整型）longint-2147483648 4 带符号32位（长整型）2147483647 byte 0255 1 带符号8位（字节型）word 065535 2 带符号16位（字类型）,1、整型,http:/,驾驶员之家 2016年新题库科目一模拟考试驾驶员之家 2016年安全文明驾驶常识模拟考试驾驶员之家 C1驾驶证能开什么车驾驶员之家 C2驾驶证能开什么车驾驶员之家 C3驾驶证能开什么车驾驶员之家 C4驾驶证能开什么车驾驶员之家 A1驾驶证能开什么车驾驶员之家 A2驾驶证能开什么车驾驶员之家 A3驾驶证能开什么车驾驶员之家 B1驾驶证能开什么车驾驶员之家 B2驾驶证能开什么车,Pascal规定了两个预定义整型常量标识符maxint和maxlonint，他们各表示确定的常数值 maxint为32767 maxlongint为2147483647 他们的类型分别是integer 和longint,类型 数值范围 占字节数有效位数real 2.9e-39.1.7e38 6 11.12基本实型Single 1.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都是预定义常数标识符，分别表示逻辑假和逻辑真。,truefalse。,布尔运算的运算次序：NOT AND XOR、OR,例1：（第11届NOIP）设Atrue，Bfalse，Cfalse,D=true，以下逻辑运算表达式值为真的是（）,A.(AB)(C D)B.(AB)C)DA(B C)D D.(A(B C)DE.(A B)(C D),例2（第9届NOIP）设Atrue，Bfalse，Ctrue，D=true，逻辑运算表达式AB C D的值是（）,二进制的逻辑运算,二进制数1和0在逻辑上可以代表“真”与“假”、“是”与“否”、“有”与“无”。,1、逻辑加法（“或”运算）逻辑加法通常用符号“+”或“”来表示。逻辑加法运算规则如下：0+0=0，00=0 0+1=1，01=1 1+0=1，10=1 1+1=1，11=1,2、逻辑乘法（“与”运算）逻辑乘法通常用符号“”或“”或“”来表示。逻辑乘法运算规则如下：00=0，00=0，00=0 01=0，01=0，01=0 10=0，10=0，10=0 11=1，11=1，11=1,3、逻辑否定（非运算）逻辑非运算又称逻辑否运算。其运算规则为：0=1 非0等于1 1=0 非1等于0,4、异或逻辑运算（半加运算）异或运算通常用符号表示，其运算规则为：00=0 0同0异或，结果为0 01=1 0同1异或，结果为1 10=1 1同0异或，结果为1 11=0 1同1异或，结果为0 即两个逻辑变量相异，输出才为1,练习：,1、1010111 10011101=,书本P11-N15,2、1010101001100110=,3、10101100=,4、10101010 00001111=,试一试：,1、请模仿写出一个Pascal程序以实现计算梯形面积。假设梯形上底a5，下底b10，高h6。,2、给出半径R100，求圆周长、圆面积。,3、一个学生五门课的成绩为：70、89、65、100、78。编PASCAL程序，输出平均成绩。,一、常量,1、常量定义,2、定义常量的语法格式,CONST=;=;,3、类型,（1）数 n100（2）字符 ch*（3）字符串 strHangzhou（4）布尔值 flagTrue,二、变量,1、变量定义,2、变量说明部分的语法格式,VAR:;:;,Var begin read(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)=2001 odd(3)=pred(x)=succ(x)=,2、标量函数,函数标识符自变量类型意义 结果类型 chr(x)byte 自变量对应的字符 字符型 ord(x)顺序类型 自变量对应的序号 longint round(x)实型 四舍五入 longint trunc(x)实型 截断取整 longint例：chr(66)=B ord(A)=65 round(-4.3)=-5trunc(2.88)=2,3、转换函数,4、杂类函数：Random：0，1之间的随机实数Random(x)：0，x之间的随机整数Randomize：初始化内部随机数产生器Upcase(x)：使小写英文字母变成大写,四、Pascal运算符,(2)逻辑运算符运算符运算 运算对象结果类型not逻辑非 布尔型布尔型and 逻辑与 布尔型布尔型or 逻辑或 布尔型 布尔型xor逻辑异或 布尔型 布尔型,(1)运算符+-*/div mod,(3)关系运算符运算符 运算运算对象 结果类型=等于 简单类型 布尔型 不等于 简单类型 布尔型大于 简单类型 布尔型=大于等于 简单类型 布尔型,优先级,运算符 优先级not 1(高)*,/,div,mod,and2xor,+,-,or 3in,=,=,4(低),练习：求下列表达式的值：20 mod 19 15 mod 9 7 div 8 19 div 3(45)and(79)or(93)and(3=3)or(37)13-2*3 DIV 4 MOD 2,五、Pascal表达式,1、算术表达式：3.1415929 X 2*pi*r,2、字符表达式：A CHR(65),3、关系表达式：a+bc,4、布尔表达式：ROUND(ab)10,算术表达式,1、定义：由符合PASCAL语法规定的数值型运算对象（包括数值型的常量、变量、函数）、运算 符、圆括号组成的有意义的式子。,2、算术运算符：+、-、*、/、DIV、MOD,3、运算次序：（1）圆括号（）（2）函数（3）*、/、DIV、MOD（4）+、-同一级别的运算符，按在表达式中次序“先左后右”的原则,算术表达式,例1：将下列的数学表达式改写成PASCAL表达式：b2-4ac,例2：n为四位数。请运用算术表达式分离出它的个、十、百、千位,n MOD 10-（个位数）（n MOD 100）DIV 10-（十位数）（n MOD 1000）DIV 100-（百位数）n DIV 1000-（千位数）,下面的程序执行后，变量b、c、d 的值是多少？,Program pl(input,output);Consta=256;Varb,d:integer;c:real;,beginb:=a div 16;c:=a/b;d:=a;end.,作业:写出下面运算的结果（注意类型）1、5*3*6 DIV 22、8/4*2.5/1.25*（3.7+2.3）3、18 DIV 4*sqr(4.0)/1.64、25 DIV 3 MOD 3*Trunc（2.5）5、8 MOD(-16 MOD 3)*66、5 DIV 3/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的值,Program p2(input,output);Var a，b:integer;begin a:=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);输出为：123456,Write语句与writeln语句的区别:write语句将其后括号中的表达式一个接一个输出后，没有换行。而writeln语句则在输出各个表达式的值后换行。,writeln(1,2,3,4);write(5,6);输出为：123456,例如以下两个程序段的输出分别为：,注意：场宽的限制在输出不同格式的数值时的作用：,例2：实型数据小数位数的确定。var a:real;begina:=15/8;writeln(a);输出 1.8750000000E+00wiiteln(a:0:2);输出 1.88 整数部分按实际位数输出，小数部分保留两位小数，末位四舍五入.writeln(a:0:0):输出 2 只输出整数部分，小数部分四舍五入end.,例1：数据项间隔。如输出最多四位的数据：write(x:5)。则数据间至少分隔一个空格。,写出输出结果,const a=10;b=20;begin writeln(50);,write(a:3);writeln(a+b:4);writeln(a+b=,a+b);end.,3、读语句输入语句,格式：read()；-读入不换行 readln()；-读入换行 readln；,read 后一定要有参数表；readln可以不带参数表,即可以没有任何输入项,只是等待读入一个换行符(回车)。经常用于暂停程序的运行，直到输入一个回车,注意：写在括号中的变量，都要在变量说明中先预以说明；变量与变量之间，以“,”分隔；例：var a,b:integer;read(a,b);,read与readln的区别例：有两段程序有相同的变量说明如下，不同的读语句。,写出下面程序的运算结果。,Program p8(input,output);vara,b,c:integer;beginwriteln(请输入两个数：);read(a,b);c:=a;,a:=b;b:=c;writeln(a:5,b:5);end.,输入：5 8,作业：编写程序,1、输入一个三位自然数，分离出它的百位、十位与个位上的数字，并逆序变成一个新的三位数输出。2、输入一个华氏温度，要求将其转换成摄氏温度。公式为C5/9（F-32），其中F是华氏温度，C是摄氏温度。3、输入a，b两个整数，要求输出a除以b得到的商和余数。（商保留两位小数，场宽为5）4、火车作直线加速运动，已知初速V00，加速度a0.1米/秒2，求t10分钟时火车速度（以公里/小时表示），取两位小数。公式：Vt=V0+at,