一、实验目的
1. 掌握循环语句的应用。
2. 熟练掌握循环程序设计的基本方法。
3. 掌握程序设计调试的方法与技巧，能对操作过程中的程序所出现的错误进行处理。
二、实验内容及上机步骤
【上机题一】
编写程序，要求程序计算出500以内的所有素数之和并输出结果。
【上机步骤】
本题的知识点是FOR循环语句的嵌套使用，程序代码如下：
SET TALK OFF
CLEAR
sum1=0
FOR i=2 TO 500
Prime=.T.
FOR j=2 TO i－1
IF MOD(i，j)=0
Prime=.F.
EXIT
ENDIF
ENDFOR
IF prime
sum1=sum1＋i
ENDIF
ENDFOR
?”500以内素数之和为：”,sum1
RETU
【上机题二】
编写程序，程序功能为：求指定自然数的阶乘。
【上机步骤】
本题的知识点是循环结构程序设计方法，程序代码如下：
CLEAR
INPUT ‘输入一个自然数’ TO n
fac＝1
FOR i＝1 TO n
fac＝fac*i
ENDFOR
? n,’的阶乘是：’,fac
RETURN
【上机题三】
编写程序，程序功能为打印由’*’组成的图形，图形如下：
*
***
*****
*******
*****
***
*
【上机步骤】
输入以下程序并运行。
CLEAR
num_count＝1
row＝3
col＝40
FOR i＝1 TO 9
@row，col SAY REPLICATE(‘*’,num_count)
row＝row＋1
IF row－2<6
col＝col－1
num_count＝num_count＋2
ELSE
num_count＝num_count-2
ENDIF
ENDFOR