第三部分选择结构的程序设计.docVIP

第三部分 选择结构的程序设计 1．无条件转向语句：[行号] GOTO 行号 A．GOTO后面的行号为转向的目标行，必须是程序中存在的行号，否则机器将显示行号不存在的错误信息。 B．GOTO语句可以作为命令，以立即方式从GOTO后的行号开始执行程序。 C．单独使用此语句容易产生死循环。强制退出此种程序按下：Ctrl+Break A．有关条件表达式可以用算术表达式、关系表达式、逻辑表达式。详情见教材。 B．如果是多条语句，每个语句中间用“：”分开。而且（程序中）不能分行写。 3．对称型条件转向语句： [行号] IF② 条件表达式 THEN ELSE A．其中子句1、子句2可以是一个或多个语句。当是多个语句时中间需要用“：”隔开。 B．执行过程：如果条件满足，则执行THEN后所给出子句1的内容，然后执行IF的下一个语句。如果条件不满足，则执行ELSE后的子句2的内容。然后再执行IF的下一个语句。 C．引申：对称型语句可以多层嵌套。但所有嵌套必须写在一行。否则要出错。 4．开关语句：ON 算术表达式 GOTO 行号1，行号2，……，行号N A．该算术表达式的值在0~255之间。 B．该值若为小数时，自动四舍五入取整。当表达式值为1时，转到GOTO后第一个所列行号语句执行，当值为2时，转到GOTO后第二个所列行号语句执行。依次类推。当算术表达式的值小于1或大于行号个数N时，不进行转移，而顺序执行开关语句的后继语句。该值为负或大于255时系统报错。 5．子程序： （1）调用子程序语句：GOSUB 子程序段的首行号 （2）子程序返回语句：RETURN （3）子程序运行过程及注意事项：见教材。 例题1 10 INPUT “X=”；X 20 IF X0 THEN 60 30 Y=SQR（X） 40 PRINT “SQR（“；X”）=”；Y 50 GOTO 10 60 PRINT “NO；” 70 END 分析 本程序是采用非对称型语句的格式，当我们输入某值后，会求出他的平方根，当输入一个负数时，程序输出“NO”进而结束程序。 例题2 运行程序，体会运行过程正确判断程序结果。 10 T=0：A=0：B=1 20 A=A+B 30 B=B+A 40 PRINT A，B 50 T=T+1 60 IF T=7 THEN END 70 GOTO 20 分析 程序的运行结果为： 1 2 3 5 8 13 21 34 55 89 144 233 377 610 本程序也是运用非对称结构编制的一个程序，通过IF语句可以看出，GOTO语句需要执行7次，此类程序在判断结果上要细心，一次一次的仔细判断。 例题3 运行程序判断程序的运行结果。 10 I=10 20 I=I-1 30 IF I=5 THEN 60 40 PRINT TAB（I）；“*” 50 GOTO 20 60 END 分析 程序的运行结果为： * * * * 注意每次输出“*”时，前面有几个空格取决于TAB（I）函数和I的具体值。 例题4 运行下列程序，判断运行结果。 10 T=0：S=1 20 INPUT “A=”；A 30 IF A=-1 THEN 60 40 IF A/2=INT（A/2）THEN T=T+A ELSE S=S*A 50 GOTO 20 60 PRINT “S=”；S，“T=”；T 70 END 分析 本程序采用的是对称型结构并结合GOTO语句组成的程序，仔细分析后不难发现，本程序最终的目的是，把所输入的数如果是偶数累加，如果奇数则累乘，如果输入-1结束程序。 例题5 10 X=0 20 X=X+1 30 IF X=10 GOTO 70 40 Y=X 50 Y=Y+1 60 IF Y=2*X+1 THEN 50 ELSE 20 70 PRINT Y 80 END 分析 本程序的运行结果是20，本程序只是寻找一个合适的X值，在分析时注意程序在运行过程中X，Y值的变化，通过变化体会对称型结构的程序的特点。 例题6 10 A=0：B=0 20 READ X 30 IF X=-1 THEN 60 40 IF X=0 THEN A=A+X ELSE B=B+X 50 GOTO 20 60 PRINT “A=”；A，“B=”；B 70 DATA -2.5，6.3，-4.6，11，-2.9，-1 80 END 分析 程序的结果是：A=17.3 B=-10，本程序的功能是把数据区中的数据正数相加，负数相加，当X读到-1时，结束程序。主要还是体会对称型结构的程序的运行特点。 例题7 编程对某次考试分数进行统计。60分以下、60~69，70