pascal第三章金程序的三种结构课件.pptVIP

Pascal的基本语句 3.1顺序结构的程序设计 例1.求半径为5的圆的面积。 流程图： 例2：运行下列程序后，屏幕上的输出结果是什么： 例3：运行下列程序后，屏幕上的输出结果是什么： 例4：运行下列程序后，屏幕上的输出结果是什么： 例5：输入半径r，输出圆的面积。 例6：运行下列程序后，屏幕上的输出结果是什么： 例7：运行下列程序后，屏幕上的输出结果是什么： 分支结构的程序设计 注： 例9.输入3根小木棒的长度，判断能否用它们搭出一个三角形。 例10.输入a、b两个整数，如果a大于b，请交换a与b的值，最后再输出a和b的值。 例11.输入一个年份，判断并输出它是否是闰年。 例12.输入一个一元二次方程ax2+bx+c=0的三个系数a、b、c，输出该方程的解；如果无解则输出“no solution” 自学p35分支结构的嵌套。 * * 语句1 语句2 语句3 代码： 注： 1 赋值语句 r : = 5的作用是把5赋值给变量 r,其中“ ：= ”为赋值号，它的 左边必须是一个变量名，右边是一个表达式。 输出： 输出： 2 输出语句 writeln(s)的作用是把变量s的值输出到屏幕上。 注： write(s)的作用也是输出变量s的值，与writeln(s)有何区别？ 注：在一个writeln 或者write 语句中，若需要同时输出多个 变量或者表达式的值，则各个 “输出项”之间用逗号隔开。 如： 语句中有4个输出项，其中 ‘a= ’和‘b=’为字符串，是按引号中的原样输出。 1997 ？ true ok! 答案参考课本p28中间部分 program ex3_5; const pi=3.1415926; var r,s:real; begin readln( r ); s:=pi*r*r; writeln(s:10:2); end. 注：当程序运行到readln( r )时，会退到桌面， 等待用户从键盘输入一个数给变量r 输入： 1 2 3 4 5 6 6 7 8 9 输出什么？？ 注：read(m)与readln(m)的区别在于，从键盘读入m的值后，光标并 不换到下一行。 1. 输入 1 2 3 4 5 6 7 8 9 0 10 20 输出什么？ 2.如果把readln语句都换成 read语句，输入1 2 3 4 5 , 输出什么？ 3.如果把程序中的所有变量 都定义成integer类型，输出 什么？ 例8.从键盘上输入一个整数，判断并输出它是奇数还是偶数。 1. if语句的格式有以下两种书写形式： （1）if 布尔表达式 then 语句1 else 语句2； （2）if 布尔表达式 then 语句1 else 语句2； 流程图： 2.在if语句中，语句1后面是没有“;”的。 注:1.not、and、or逻辑运算结果表（课本p32表3-2） 2.a+bc, a+cb,b+ca 三个表达式要加括号 3.本例中if语句没有else子句，表示条件不成立时什么也不做。 语句1 布尔表达式 no 程序中出现了如下格式的if语句： if 布尔表达式 then begin 语句1； 语句2； … end； 其中，“begin…end”称为复合语句， 表示当布尔表达式成立时，要执行 多条语句来完成一个任务。 语句1 布尔表达式 no 语句2 语句3 *