1邀窃、 求100以內(nèi)的所有素?cái)?shù)。
分析：
1.素?cái)?shù)是只能被1和本身整除的數(shù)假哎，故從2開始取值
2.設(shè)置了兩層循環(huán)瞬捕，一層為遍歷被除數(shù)，一層為遍歷除數(shù)
3.設(shè)被除數(shù)大于除數(shù)舵抹，只要不被整除則是素?cái)?shù)
*100以內(nèi)素?cái)?shù)
DATA:X TYPE I,
Y TYPE I.
X = 2.
WRITE:/ '100以內(nèi)所有素?cái)?shù)有：'.
WHILE X <= 100.
Y = 2.
WHILE Y < X.
IF X MOD Y = 0.
EXIT.
ENDIF.
Y = Y + 1.
ENDWHILE.
IF Y = X.
WRITE:/ X.
ENDIF.
X = X + 1.
ENDWHILE.
- 求使整數(shù)數(shù)列1肪虎，2，3掏父，......笋轨，n的和不大于6000的最大正整數(shù)n.
分析：
1循環(huán)遍歷大于0的所有數(shù)
2.將以上所得的數(shù)累加
3.找出累加結(jié)果大于6000的第一個(gè)數(shù)秆剪，此時(shí)n-1為累加結(jié)果不大于6000的最大整數(shù)
DATA: N TYPE I,
SUM TYPE I.
N = 1.
SUM = 0.
WHILE N > 0.
WRITE:/ 'SUM=',SUM,'+',N.
SUM = SUM + N.
IF SUM > 6000.
N = N - 1.
WRITE:/ N,'是最大整數(shù)N'.
WRITE:/ SUM,'是1,2,3，......爵政，n的和大于6000的第一個(gè)整數(shù)'.
EXIT.
ENDIF.
N = N + 1.
ENDWHILE.
3仅讽、求（100,1000）之間所有的能被3整除的偶數(shù)的和。
分析：
1.設(shè)置變量n為（100,1000）內(nèi)的數(shù)且能被2整除
2.循環(huán)將滿足要求的數(shù)累加
3.得出結(jié)果
DATA: N TYPE I,
SUM TYPE I.
N = 101.
SUM = 0.
WHILE 100 < N AND N < 1000.
IF N MOD 3 = 0.
IF N MOD 2 = 0.
WRITE:/ '此時(shí)偶數(shù)為',N.
SUM = SUM + N.
WRITE:/ '此時(shí)和為',SUM.
ENDIF.
ENDIF.
N = N + 1.
ENDWHILE.
4钾挟、編寫一段程序洁灵，按照升序顯示出小于輸入值的所有正偶數(shù)
分析：
1.設(shè)置兩個(gè)未知數(shù)M,N，N為輸入數(shù)掺出，M為小于輸入數(shù)的數(shù)
2.循環(huán)找出小于輸入數(shù)的所有偶數(shù)
3.輸出結(jié)果
PARAMETERS:N TYPE I.
DATA:M TYPE I.
M = 0.
WHILE M <= N.
M = M + 2.
IF M < N.
WRITE: M.
ENDIF.
ENDWHILE.
5徽千、顯示輸入的整數(shù)值的所有約數(shù)
分析：
1.設(shè)N為輸入數(shù)，M為從1開始小于輸入數(shù)的數(shù)
2.循環(huán)找出小于N且能整除N的約數(shù)
3.輸出結(jié)果
PARAMETERS:N TYPE I.
DATA:M TYPE I.
M = 1.
WHILE M < N.
IF N MOD M = 0.
WRITE: M.
ENDIF.
M = M + 1.
ENDWHILE.
