【精品】第六章程序设计初步教案资料.ppt

分析：（1）此题要求判断100到200之间的所有数，那么是一个循环判断的过程。 （2）设一个变量i初值为100，循环条件为i=200。 （3）循环体中，对每次的i先利用MOD函数判断奇偶性。若i为奇数则累加到变量s中，否则，通过LOOP语句退出本次循环，进入下一次循环判断。 【例6.15】 求100到200之间所有奇数之和。 SET TALK OFF CLEAR s=0 i=100 DO WHILE i=200 i=i+1 必须放在IF语句前 IF MOD(i,2)=0 LOOP 若i被2除后余数为0，则i为偶数，否则退出本次循环。 ELSE s=s+i ENDIF ENDDO ？100到200之间奇数累加之和为：+s SET TALK ON RETURN 2、步长循环 条件循环可以实现已知和未知循环次数的循环。 对于循环次数已知的循环还可采用步长循环。 格式： FOR 循环变量=初值 TO 终值 [STEP 步长] 语句序列 ENDFOR∣NEXT 数值表达式，默认值为1。 说明： （1）循环变量按步长值增加或减小。 （2）当循环变量的值不在初值与终值范围内时，结束循环。 几种步长循环形式： 1.省略步长 FOR i=1 TO 100 n=n+1 ENDFOR 没有给出步长，默认为1， 退出循环后n的值为100。 假设n的初值为0 2.步长为正数 FOR i=-5 TO 10 STEP 3 n=n+1 ENDFOR 退出循环后n的值为5。 3.步长为负数 FOR i=15 TO 2 STEP -5 n=n+1 ENDFOR 循环变量递减,退出循环后n的值为3 4.初值与终值相等 FOR i=1 TO 1 STEP 10 n=n+1 ENDFOR 循环只做一次 ， 退出循环后n的值为1。 5.出现死循环 FOR i=1 TO 9 STEP -2 n=n+1 ENDFOR 步长为负，初值小于终值， 循环始终进行，成为了一个 死循环。 6.循环体内部出现改变循环变量的语句 FOR i=1 TO 100 STEP 2 i=i＋3 n=n+1 ENDFOR 实际每次循环变量的步长为5,退出循环后n的值为20。 求1+2+3+……+100之和。 【例6.12】 SET TALK OFF CLEAR S=0 FOR i=1 TO 100 STEP 1 S=S+i ENDFOR ? 1-100之和为,S SET TALK ON RETURN 举一反三：求1×2×3×……×100之积。 S＝1 S=S*i 积 求所有的3位数中能同时被5和12整除的数有多 少个？其和是多少？并按照每行输出5个，输出这些数。 分析： 1.所有的三位数，也就确定了范围是从100～999，使用步长循环，初值为100，终值为999，步长为1。 2.用循环到的数对5和12求余，若其余数为0，则是一个需要的数，那么存放统计个数的变量加1，用于求和的变量累加上该数值。 3.对于每个满足条件的数都使用“??”来保证同行输出，一旦输出了5个，则使用“?”换行。即，如果统计的个数能被5整除，就输出一个“?”，用来换行。 【例6.13】 STORE 0 TO s,t s保存累加和，t保存满足条件的数的个数 FOR i=100 TO 999 IF (i%5=0) AND (i%12=0) s=s+i t=t+1 ?? i, IF t%5=0 ? 已经输出5个数，则换行输出。 ENDIF ENDIF ENDFOR ？满足条件的数的个数为：, t ？满足条件的数之和为：, s 思考：输出所有的四位数中能同时被9和11整除的数，每行输出6个。 分析： 1.在表中添加新的空记录可以使用APPEND BLANK命令。 2.用步长循环来控制添加记录的数量。 3.内部数