奥林匹克联赛复习Pascal——Pascal语言基础.pptVIP

* JSOI2009年大丰冬令营（B层） 程序设计 P ascal 一、复习回顾 基本结构 顺序结构 选择结构 循环结构 过程和函数 标准类型 整型 integer 0 -2 3678 实型 real 两种表示： 小数表示法 、科学表示法 字符型 char 如：‘a’ 、 ‘A’、‘ ’ 布尔型 boolean 如： 真 true 假 false 文件类型 file 常量：指在程序执行过程中值不能改变的量。 变量：指在程序执行过程中值可以改变的量。 表达式和函数： 常量的说明：如： 圆周率π Const pi=3.14 ; 注意：变量必须先说明再使用！ 变量说明： VAR x:integer ; 算术运算符：div (整除) 34 div 5=6 mod (取余) 34 mod 5=4 常用函数： 函数名 功能 举例 Abs(x) 求变量的绝对值 Abs(-5.4)=5.4 Sqr(x) 求变量x的平方 Sqr(2)=4 Sqrt(x) 求变量x的平方根 Sqrt(4)=2 Chr(x) 取ASCII码的值 Chr(48)=0 Ord(x) 取字符的ASCII值 ord(‘A’)=65 Trunc(x) 截尾函数 Trunc(1.99)=1 Round(x) 舍入取整 Round(-3.9)=-4 round(-3.1)=-3 Round( 3.9)= 4 round( 3.1)= 3 pred 前导函数 Pred(2)=1 pred(‘b’)= ‘a’ succ 后继函数 Succ(1)=2 Succ(‘a’)=‘b’ 表达式 1、写出一个整数被3整除所得余数的表达式。 x mod 3 2、写出计算圆的周长表达式。 2 * pi * r 3、将任一大写字母转换成小写字母。 Chr( ord (x) +ord (‘a’) – ord (‘A’)) 4、写出表示年龄大于50岁的表达式。 N50 5、写出一个数既能被3整除又能被5整除的表达式。 (x mod 3=0) and (x mod 5=0) 基本语句： 一、赋值语句 变量：=表达式； 功能：先计算后赋值 二、输入语句 read/readln read (变量1，变量2，。。。） readln(变量1，变量2，。。。） 功能： 依次从键盘上读入数据。 三、输出语句 write/writeln write (变量1，变量2，。。。） writeln(变量1，变量2，。。。） 例：从键盘输入两个数，交换后输出。 Program ex_1(input,output); var a,b,c:integer; begin writeln(‘请输入两个数：’); read(a,b); c:=a; a:=b; b:=c; writeln(‘交换后的值是：’,a:5,b:5) End. 程序首部 说明部分 语句部分 运行： 请输入两个数： 3 4 交换后的值是： 4 3 例：从键盘输入一个三位数，分离出百位、十位和个位并输出。 Program ex_2(input,output); var x,ge,shi,bai:integer; begin writeln(‘请输入一个三位数：’); read(x); ge:=x mod 10; bai:=x div 100 ; shi:=(x-bai*100) div 10; writeln(‘bai=’,bai, ’shi=‘:10,shi,’ge=‘:10,ge) End. 程序首部 说明部分 语句部分 运行结果：请输入一个三位数： 836 bai=8 shi=3 ge=6 四、选择结构的程序设计 格式一：If 条件 then 语句1； 格式二：If 条件 then 语句1 else 语句2； 格式一功能： 如果条件成立则执行then后的语句1， 否则执行该条件语句的下一条语句。