6-2018第六章-循环结构程序设计

cp41c实程实算下列实和的近似实入求和精度实106106者实用逗分隔
上机实验4：循环结构程序设计 循环结构程序设计
1.《级数求和》 《级数求和》 ( filename: cp41.c ) 编程，计算下列级数和的近似值，x的值从键盘输 入，求和精度为10-6 ，输出达到精度要求的最小n与 级数和，两者间用逗号分隔。例如, 调试数据： 输入：0.523599 输出：4,0.500000 ⑴ 左例 输入：-1 输出：5,-0.841471 ⑵ 4 输入：6.283185 输出：13,0.000000
提示： 提示： 可模拟人工除法求小数的每一位(设 可模拟人工除法求小数的每一位 设 a=1, b=素数)： ： 商的整数部分： ⑴ 商的整数部分：a/b 输出( .)。 可用 printf("%d.", a/b); 输出(即0.)。 .) 余数： 余数： a=a%b ； ⑵ 商的小数部分： 商的小数部分： 每位商： 每位余数： 每位商：a*10/b 每位余数：a=a*10%b ； ⑶ 从余数判断循环节是一种简便的方法
结
束
4. 《求符合要求的自然数对》 ( filen数对：它们的和为 667，它们的最小公倍数除以最大公约数的商为120。 输出格式为每对一行，小数在前，大数在后，两数间 用逗号分隔，多对则按每对中小数的大小升序排列先 后。
5.《大于正整数a的n个素数》 《大于正整数 的 个素数》 个素数 编程, 输出大于并最接近正整数a的n个素数,每行 打印8个,a 和 n 从键盘输入。例如： 输入： 100 17 输出： 101 103 107 109 113 127 131 137 139 149 151 157 163 167 173 179 181 ( filename: cp45.c )

语句
3 while语句
例1：输出1～200中所有能被4整除的整数。
i=1 i<=200
i % 4==0 T 输出 i i++ F
#include <stdio.h> void main() { int i=1; while(i<=200) { if( i%4==0) printf(“%d,”,i); i++;
2 循环结构算法设计
例1：输出1～200中所有能被4整除的整数。
i=1 i<=200
i % 4==0 T 输出 i i++ F
2 循环结构算法设计
直到型循环结构设计 （1）赋初值 （2）执行循环操作的语句序列 （3）判断循环条件是否为真，是则转（2） 否则转（4） （4）结束循环
2 循环结构算法设计
执行语句 语句 执行表达式3
循环体
for语句等价于下列语句： 语句等价于下列语句： 语句等价于下列语句 表达式1； 表达式 ； while （表达式 ） 表达式2） { 语句； 语句； 表达式3； 表达式 ； }
执行for循环之后的语句
5 for语句
for语句使用最多的情况：
for(循环变量赋初值；循环条件；循环变量增量) 语句； 例如：for( i=1;i<100;i++ ) for( sum+=i; 注意：for语句后边括号中的三个表达式可以省略， 可是括号中的两个分号不能省略
5 for语句
3.省略表达式3 for(i=0;i<10; ) i的值不变，也是 sum+=i; 死循环
5 for语句
例2：求4的10次方 …… int a=1,b=4,i; for(i=0;i<10;i++ ) a=a*b; ……

AA:
SUB MOV MOV HLT
BX,AX DI, 2800H [DI],BX
16
改: CLC CMP JC SUB MOV MOV HLT AA: SUB MOV MOV HLT BX,AX DI, 2800H [DI],BX
17
AX,BX AA AX,BX DI, 2800H [DI],AX
CMP JZ CMP JZ MOV JMP NEXT: DONE: MOV HLT AL, 'y ' ;比较AL与小写字母y NEXT ;相等,转移到NEXT AL, 'Y ' ;不是小写字母y,是大写字母Y ? NEXT AH,-1 ;相等,转移NEXT ;不是大Y ,令AH=-1 Y AH 1
DONE ;无条件转移DONE AH,0 ;是Y或Y,令AH=0
AL,BL , AL,0 , STOR AL,80H , MINUS AL, 1 , STOR AL,0FFH , BH,AL ,
;取X ;X=0,Y=X , ;X<0 < ;X>0,Y=+1 > , X<0,Y= -1 < , ;保存Y 保存
MINUS: : STOR: :
MOV MOV HLT
例4,判断是否为字母 .若AL中是字母Y(含大小写),则令AH ,判断是否为字母Y. =0,否则令AH=-1
为奇数, ;否则AX为奇数,加1 否则 为奇数 ;AX←AX÷2 ÷
12
法2:将最低位用移位指令移至进位标志,判断进位标志 :将最低位用移位指令移至进位标志, 就是偶数; 是0,AX就是偶数;否则,为奇数 , 就是偶数 否则,
MOV SHR JNC ADD E1: SHR

End Sub
Do Until i = 100
例6-3：求 1+22+32+……n2大于1000的最小值。
选Do … Loop语句： 不知道要加到第几项，但知道累加和大于 1000，并且，第一次超过1000时就不再累 加了，所以选Do … Loop语句。
求项数（计数i）: i=0(初值) ，i=i+1(重复执行)
例: 利用随机函数10个产生[20,90]的整数, 求其平均值.
界面设计: 单击窗体, 显
示结果如图.
例: 利用随机函数10个产生[20,90]的整数, 求其平均值.
分析: 产生数X 求和s
求平均a
产生一个X: X=Int(Rnd*71+20)
显示产生的值: Print x
计算和: s=s+x
重复10次 求得这10 个数的和s
Private Sub Form_Click( ) Dim i As Integer i=0 Do While i < 100 i=i+1 Print i； If i Mod 10 = 0 Then Print Loop
End Sub
用Do Until … Loop循环来编制 例6-2的程序
Private Sub Form_Click() Dim i As Integer i=0 Do While i < 100 i=i+1 Print i; If i Mod 10 = 0 Then Print Loop
If Max <= x Then Max = x Next i Print Print “最大值为:”; Max End Sub
6.4 循环嵌套
循环嵌套：在一个循环语句的循环体中又包含有另一 循环语句。 VB的三种循环可以自身嵌套与相互嵌套 要求：内层结构一定包含在外层结构中，不能交叉