奥赛信息学竞赛班进阶篇课件pascal-01-基本语句(共21张PPT).pptVIP

PASCAL基本语句 汕头金山中学信息竞赛班 Pascal 语言的基本语句 赋值语句 读语句 写语句 条件判断语句 循环语句 常量 常量：程序执行过程中其值保持不变的数据 变量 变量：程序执行过程中其值可以改变的数据 var i , j , k , l : integer； { integer 整数类型 } a , b : real； { real 实数类型 } ch : char； { char 字符类型 } p : boolean; { Boolean 布尔类型 } 算符 运算符 + {加}、 – {减}、 * {乘}、 / {除}、 div {整除}、 mod {取余数} 程序结构 赋值语句 赋值语句 赋值语句 常见错误 读语句 读语句 读语句 写语句 写语句 写语句 写语句 写语句 If语句 条件判断语句 If语句 If语句 If语句 If语句 条件判断语句 Case语句 (2) case 语句 Case语句 Case语句 * * LOGO const pi = 3.1415926； f = false； { f为逻辑值false(假) } st = ’abcd ’； { st为字符串’abcd ’} SS : array[1..4,0..1] of integer =((0,1),(1,0),(0,-1),(-1,0)); i 15 ch ‘A’ 关系运算符 ＝、 {不等于}、 、 ＝ 、 、 ＝ 逻辑运算符 not {逻辑非}、and {逻辑与}、or {逻辑或}、xor {逻辑异或} program first； const pi=3.14159； var s,r : real; begin write (r=); readln (r)； s:=pi*sqr(r)； writeln(s=,s); end.　 【例】 (1) a := 200； (2) b := a + 30*2； (3) a := a–50; 200 a 200 + 30*2 200 a b a 200 - 50 a:=35+6y; a:=35+6y; a:=35+6*y; 【例】 read （a , b , c）； readln（i , j , k）； readln （x , y）； 当输入数据： 1 2 3 4 5 6 7 8 9 10 11 读入结果为： 1 2 3 4 5 ↓ ↓ ↓ ↓ ↓ a b c i j 6 7 8 ↓ k 9 10 11 ↓ ↓ x y read（a , b , c）； readln（i , j , k）； readln （x , y）； 【例】 x := 20； y := 30； write（x，‘+’，y，‘=’）； write（x + y）； 执行上述语句后，在显示屏输出： 20+30=50 执行上述语句后，在显示屏输出： 20+30= 50 【例】 x := 20； y := 30； writeln（x，‘+’，y，‘=’）； writeln（x + y）； begin c := ’a’； r := 3. 5； writeln（c : 6）； writeln（r）； writeln（r : 9）； writeln（r : 1）； writeln（r : 9 : 3）； writeln（r : 2 : 3）； end. (1)If 语句 A 条件 B 是 否 readln（x）； if x 0 then writeln（‘x0’） else writeln（’x=0’）； readln（x）； if x 0 then begin