ObjectPascal语言的语法基础.pptVIP

　　分析：该题是数学中比较常见的一个分段函数，当x≤－5时，执行x+9；当－5x≤7时，执行x2－5；当x7时，执行3x－8，流程如图2.2.6所示。　　设计步骤如下： 　　1）界面设计（略）。 　　2）单击按钮事件的程序代码如下： 图2.2.6 分段函数流程图 procedure TForm1.Button1Click(Sender: TObject);Var 　x,y:real;begin 　 x:=strtofloat(edit1.text); 　if x=-5 then 　 y:=x+9 　　　else if x7 then 　　　　 y:=3*x-8 　　　 else 　　　　 y:=x*x-5;　　Label1.Caption:=‘y的值为’+floattostr(y);　　end;　　此例是一个较简单的复合条件语句，下面是一个稍微复杂的复合条件语句。 　　例2.25 成绩等级判断，输入成绩判断其等级。90～100分的成绩为“优”；80～89分的成绩为“良”；70～79分的成绩为“中”；60～69分的成绩为“及格”；60分以下的成绩为“不及格”。编写程序实现其功能。运行界面如图2.2.7所示。 图2.2.7 成绩等级判断界面 根据题意画出流程图，如图2.2.8所示。设计步骤如下