vf结构化程序设计[精选].pptVIP

* 例求100个数的绝对值 n=1 do while n=100 input 输入第+ str(n,1)+个数 to x if x0 y=-1*x else y=x endif ?x,y n=n+1 enddo 找循环体 控制循环 循环变量初值 循环条件 循环变量增值语句 5、设计循环 例计算S=1+2+……+100 s=0 累加和初值 n=1 循环初值 do while n=100 到100后结束 s=s+n 计算累加值 n=n+1 下一个数 enddo ? “S=”, s 输出计算结果 在循环体中执行到LOOP语句时，系统将不再执行LOOP至ENDDO之间的语句，而直接返回到DO WHILE，重新判断给定的逻辑表达式。 在循环体中执行到EXIT语句时，系统将直接跳出循环，执行ENDDO之后的语句，即结束循环。 在循环语句中，LOOP语句和EXIT语句通常与选择结构语句搭配使用，即只有满足给定条件的情况下才能执行这两条语句。 6、 LOOP 和 EXIT 语句 x=0 do while x=10 x=x+2 ?x enddo x=0 do while x=10 x=x+2 if mod(x,4)=0 loop endif ?x enddo 例从右至左每次显示ch中的2个字符 ch= “1234567890” 设置初值 do while len(ch)0 ch的长度0 ? right(ch, 2) 显示ch最右边的2个字符 ch=left(ch,len(ch)-2) 去掉最右边2个字符 enddo 输入一字符串，逆序输出 accept 输入字符串 to ch do while len (ch)0 ?? right (ch, 1) ch=left (ch, len (ch)-1) enddo 逐条显示学生表中性别为“男”的所有记录。 set talk off clear use 学生 do while .not. eof() if 性别=”男” display endif skip enddo use set talk on return SET TALK OFF CLOSE ALL OPEN DATABASE 学生管理 ALTER TABLE 学生 ADD 平均成绩 N(6,2) USE USE 学生 GO TOP DO WHILE .NOT. EOF() xh=学号 SELECT 0 USE 选课 AVERAGE 成绩 TO pjcj FOR 学号=xh USE SELECT 学生 REPLACE 平均成绩 WITH pjcj SKIP ENDDO CLOSE ALL SET TALK ON 根据选课表计算每个学生的平均分，并将结果存入学生表的“平均成绩”字段。 二、FOR-NEXT 循环 语句格式： for 循环变量=初值 to 终值 [step 步长值] 循环体 endfor | next ①FOR计数型循环语句，根据给定的开始值、终止值和步长值确定循环的次数。 ②FOR为循环的开始命令，ENDFOR（或者NEXT）为循环的结束命令，位于FOR命令和ENDFOR命令之间的所有命令称为循环体。 ③在执行FOR命令时，开始值、终止值和步长值必须都能够计算出结果（N型值）。 注意： ④当开始值小于或等于终止值时，步长值取正数；当开始值大于或等于终止值时，步长值取负数。否则，将出现“死循环”现象。 ⑤当步长值为1时，STEP 1可以省略。 ⑥在循环体中，LOOP和EXIT这两个特殊命令的作用同DO WHILE命令。 FOR命令的执行过程 ENDFOR下面的命令 计算开始值、终止值和步长值 循环变量≤终止值 ? 循环变量=开始值 循环体 不满足 满足 (ENDFOR) 循环变量=循环