1、第三章 Pascal程序控制语句,回顾,了解常量和变量的概念 掌握变量的定义方法与使用方法 掌握常用的数据类型 掌握运算符号和表达式,本章目标,掌握条件语句 了解条件语句的嵌套 掌握情况语句 掌握循环语句 掌握Break与Continue语句,条件语句,语法结构: if then else 功能 表达式为真,执行语句块1,否则执行语句块2,实例1,实例1,例:求两个数中的最大值。,var a,b,max:integer; begin a:=10; b:=5; if ab then max:=a else max:=b; showmessage(inttostr(max); end;,实例2,例
2、:判断数据的正负。 -1 (x0),var x,y:integer; begin x:=1; if x0 then y:=1 else if x=0 then y:=0 else y:=-1; showmessage(inttostr(y); end;,情况语句,语法结构: case of : else case 语句适用被判断的变量或属性是整型、字符型等; 用case语句进行逻辑跳转比编写复杂的if语句容易阅读,而且程序代码运行较快!,实例,For 循环(一),语法结构 格式1: for 循环变量:= 值1 to 值2 do 功能,For 循环(二),格式2: for 循环变量:= 值1 d
3、ownto 值2 do 功能,使用For循环完成示例,求1100的和,var sum,i:integer; begin sum:=0; for i:=1 to 100 do begin sum:=sum+i; end; showmessage(inttostr(sum);,var sum,i:integer; begin sum:=0; for i:=100 downto 1 do begin sum:=sum+i; end; showmessage(inttostr(sum);,当型循环,语法格式 while do 功能 先计算表达式的结果,如果表达式为true,while语句将重复执行循环
4、体。如果表达式结果为false,则退出循环,执行while之后的语句 while后面的为通常为关系或逻辑表达式,While示例,求1100的和 var sum,i:integer; begin sum:=0; i:=1; while i=100 do begin sum:=sum+i; i:=i+1; end; showmessage(inttostr(sum);,求1100的奇数和 var sum,i:integer; begin sum:=0; i:=1; while i=100) and (i=200) then begin break; /跳出循环 end; until false;
5、/设置为false表示一直循环,永不退出 showmessage(你输入的数据为: + input_str ); end;,continue语句,continue语句也用在循环体中,其作用是强行结束本次循环,转入循环开始处,开始执行下一次循环操作。,var i,s: Integer; s=0; begin for i:=1 to 100 do begin if i mod 2=0 then continue; /如果为0,跳过剩余语句,转到下一个循环 s:=s+i; end; end; showmessage(inttostr(s);,循环三要素,循环控制变量赋初值 将循环控制变量写入正确的循环条件中 更新循环控制变量的值,示例,总结,条件语句: If 情况(分支)语句: Case 循环语句:repeat while for Break continue,