09-IF语句的应用.pptVIP

* * ＩＦ语句的应用 首先通过一个很简单的例子来引出ＩＦ语句的应用： ＩＦ　　Ａ＜Ｂ　　　ＴＨＥＮ 　　　　　　　　ＷＲＩＴＥＬＮ（‘Ａ＜Ｂ’） 　　　　　　ＥＬＳＥ 　　　　　　　　ＷＲＩＴＥＬＮ（‘Ａ＞Ｂ’）； 　　　上面这句话的功能就是：如果Ａ＜Ｂ就输出Ａ＜Ｂ，否则输出Ａ＞Ｂ． 　　　注意：上面是一个语句！！虽然写成了很多行，但只有一个分号，也可以 写成一行，如： IF AB THEN WRITELN(‘AB’) ELSE WRITELN(‘AB’); 通过这个简单的例子可以看出，IF语句是一个选择结构的语句，也就是说： 有些事情可能有两种结果，（如AB?，有可能大于，有可能不大于，） 而每一种结果所对应的语句又不一样，这个时候就要用到了IF语句。 IF语句的使用格式就是： IF （条件表达式） THEN 语句组 1 ELSE 语句组 2； 说明： 1、语句组可能是一条语句，也可能是很多条语句！ 2、THEN 必须要有，但ELSE可以没有，也就是说可以有这样的语句： IF （条件表达式） THEN 语句组； IF语句的使用方法说明： IF （条件表达式） THEN 语句组 1 ELSE 语句组 2； 这个语句的作用就是： 首先判断 条件表达式的值， 如果表达式的值为TRUE的话，就 执行 THEN 后面的语句组，如果不为真的的话就执行ELSE后面的语句组。 也就是说：在IF中，只能执行THEN和ELSE中一个，不能既执行THEN 后面的语句组又执行ELSE后面语句组。看看下面的程序段： ＰＲＯＧＲＡＭ　　ＪＪＺＸ（ＩＮＰＵＴ，ＯＵＴＰＵＴ）； 　　　ＶＡＲ 　　　　　　　　Ａ，Ｂ：ＩＮＴＥＧＥＲ； 　　　ＢＥＧＩＮ 　　　　　ＷＲＩＴＥ（‘请输入两个整数：’）； 　　　　　ＲＥＡＤ（Ａ，Ｂ）； 　　　　　ＩＦ　Ａ＞Ｂ　ＴＨＥＮ　ＷＲＩＴＥ（‘Ａ＞Ｂ’）　 　　　　　　　ＥＬＳＥ　ＷＲＩＴＥ（‘Ａ＜Ｂ’） 　　　ＥＮＤ． 　　想想这个程序完成什么功能？ 再来看一段程序： 　　　　　　功能：输入两个自变量Ａ＼Ｘ，要求得到函数Ｙ的值，其中 函数Ｙ与自变量的关系是： 　　　　　　０　　　　　　　　　　　　　　　（Ｘ＜＝－Ａ） 　Ｙ＝ 　ＳＱＲＴ（Ａ＊Ａ－Ｘ＊Ｘ）　　　（－Ａ＜Ｘ＜＝Ａ／２） 　　　　　　Ｘ　　　　　　　　　　　　　　　（Ｘ＞Ａ／２） 想想这个程序应该怎么写？ ＰＲＯＧＲＡＭ　ＪＪＺＸ（ＩＮＰＵＴ，ＯＵＴＰＵＴ）； VAR Y,X,A:REAL; BEGIN WRITELN(‘请输入两个数A、X:’); READLN(A,X)； 　　ＩＦ （X＜－Ａ）　　　　ＴＨＥＮ　　　Ｙ：＝０； 　　ＩＦ　（Ｘ＞－Ａ）　ＡＮＤ　（Ｘ＜＝Ａ／２） 　　　　　　　　ＴＨＥＮ　　Ｙ：＝ＳＱＲＴ（Ａ＊Ａ－Ｘ＊Ｘ）； 　　ＩＦ　　（Ｘ＞Ａ／２）　　ＴＨＥＮ　　Ｙ：＝Ｘ； 　　ＷＲＩＴＥ（‘Ｙ＝’，Ｙ：１０：３） ＥＮＤ． 注意：这里的所有ＴＨＥＮ后面只有一句，下面讲讲有多句的情况（语句组） 所谓语句组也就是有一条语句以上。也就是说在THEN后面有很多条语句。 例如：有输入两个数给两个变量A、B，要使A的值一定要B的值就可以采用下面 的程序： PROGRAM JJZX（INPUT，OUTPUT）； VAR A，B，C：INTEGER；（*C是一个中间变量*） BEGIN READ（A，B）； IF BA THEN BEGIN T:=B; B:=A; A:=T END END. 通过前面这个例子可以看出，如果THEN后要执行多条语句的话