阅读下面的程序，用DO WHILE……ENDDO结构改写此程序。

你这题也太多了，帮你一下吧！

4、程序prog2.prg

x=pi()/3

y=1+2*sin(x)

?"y=",y

5、程序prog5.PRG

input "输入通猜郑话时间" to x

if x<=3

y=0.22

else

y=0.22+(x-3)*0.1

endif

?"应付话费：",y

6、程序prog6.PRG

input "输入球的半径:" to R

if R>=0

v=4/3*pi()*R^3)

?"半径为"+alltrim(str(R))+"的球的体积是",v

else

?”半径小于零,无体积”

endif

7、程序prog7.prg

for n=5 to 1 step -1

?space(n-5),replicate("*",2*n-1)

endfor

8、假设表手知中的四科为语文、数学、英语、计算机

程序prog8.PRG

use 学生成绩

do while not eof()

if 语文+数学+英语+计算机>=80*4

replace 总分 with 语文+数学+英语+计算机

endif

skip

enddo

use

9、对"学生成绩"表,给其添加一个字段等级C(6),如果其计算机成绩<60分,等毕兆消级字段填充'不合格',如果在60到70之间(不包括70分),填充'合格',如果在70到85之间(不包括85分),填充'良好',填充'良好',如果在85分到100分之间(包括100分),填充'优秀'.

程序prog9.PRG

use 学生成绩

do while not eof()

do case

case 计算机<60

replace 等级 with "不合格"

case 计算机<70

replace 等级 with "合格"

case 计算机<85

replace 等级 with "良好"

case 计算机<=100

replace 等级 with “优秀”

endcase

skip

enddo

use

do while 后陵清面接条件表达式，如果条件表达式为真则循环，否则退出循环

如求1+2+3+...+100的程序如下：

i=1

s=0

do while i<=100 ‘条件i<=100实际上是通过循环体中的语句i=i+1修改循环尺亩前变量的

s=s+i

i=i+1

end do

一般来说，在循环体中对耐仔循环变量进行修改，否则可能发生死循环。特殊情况下也有可能循环条件中的循环变量可能在外部被修改。

do while {条件表达式，当条件成立则进行循环}……｛进入循环后运行｝｛回到前面的do while，如果条件成立则再次循环，不成立则退出循环｝enddo｛察好结束while｝|||详细： do while语句的执行过程是：首先计算条件的值，若是真（.t.），就执行循环体，再计算条件的值再判断。若是假，就结束循环，执行“enddo”语句后面的语句 。败毁铅 do while语句的执行过程用图表示如下余渣：例题：求1*2*3*…*n的积小于500的最大的n值。程序代码如下： set talk offclear **清屏 n=0 **想一下，n为什么赋值0，n=1可以吗？ s=1 **s为积，赋初值为1 do while shttp://www.17xie.com/read-31118.html</A>可能会有d出广告。

---