4.5 Do 循环 ①.直到型循环(前置条件) 形式: Do Until 条件 语句块 Loop ②.直到型循环(后置条件) 形式: Do 语句块 Loop Until 条件 区别:当循环控制条件满足时,后置条件型至少执行一次。 循环体 条件 Y N 循环体 条件 N Y * 例①: 打印如下图形 * * * * * 4.6 循环嵌套 (多重循环) For I=1 TO 5 Print *; Next I For I=1 TO 5 Print *; Next I For J=1 TO 3 Next J 象例②这种结构形式就称为多重循环, 本题属于双重循环。 ②打印如下图形 * * * * * * * * * * * * * * * Print * 1.找出100~200之间的全部素数。 判断一个整数N是否是素数的程序,前面我们已经给出过。 DIM F%, I%, K%,N N= Val(InputBox(“输入一个整数”)) F=0:I=2 : K=Int(Sqr(N)) While I= K and F=0 If N mod I =0 Then F=1 I=I+1 Wend If F=0 Then Print N 4.6 循环嵌套 现在需要判断100~200之间的整数哪些是素数,只需依次对100~200之间的各数进行测试即可。 * F=0:I=2 : K=Int(Sqr(N)) While I= K and F=0 If N mod I =0 Then F=1 I=I+1 Wend If F=0 Then Print N, 4.6 循环嵌套 DIM F%, I%, K%,N For N=100 TO 200 Next N For N=101 TO 199 Step 2 N= Val(InputBox(“输入一个整数”) ) * 4.6 循环嵌套 一.多重循环(循环的嵌套) 2. 在窗体上印出九九表 思路: 设变量B(被乘数),A(乘数),C(积) C= B*A 1*9=9 2*9=18 3*9=27 4*9=36 5*9=45 6*9=54 7*9=63 8*9=72 9*9=81 Dim a%,b%,c% a = 9 For b =1 to 9 c= b * a print b ; *; a; =; c; Next b * 4.6 循环嵌套 一.多重循环(循环的嵌套) 2. 在窗体上印出九九表 思路: 设变量B(被乘数),A(乘数),C(积) C= B*A 1*1=1 1*2=2 2*2=4 1*3=3 2*3=6 3*3=9 1*4=4 2*4=8 3*4=12 4*4=16 1*5=5 2*5=10 3*5=15 4*5=20 5*5=25 1*6=6 2*6=12 3*6=18 4*6=24 5*6=30 6*6=36 1*7=7 2*7=14 3*7=21 4*7=28 5*7=35 6*7=42 7*7=49 1*8=8 2*8=16 3*8=24 4*8=32 5*8=40 6*8=48 7*8=56 8*8=64 1*9=9 2*9=18 3*9=27 4*9=36 5*9=45 6*9=54 7*9=63 8*9=72 9*9=81 * 程序: For B=1 To C= B * A Print B;”*”; A;”=”C; Next B 4.6 循环嵌套
您可能关注的文档
最近下载
- 学前儿童科学教育与活动指导第一版课件.pptx VIP
- 部编版一下语文吃水不忘挖井人教案.doc VIP
- 一年级语文下册写字表笔画笔顺组词造句(打印版).pdf VIP
- 北师大版七年级下册生物导学案.pdf VIP
- 部编版语文五年级下册教学计划及进度表.doc VIP
- oracleebsopm标准功能培训opm成本v10.pdf VIP
- 新教材高中政治选择性必修2《法律与生活》全册同步课时练习题含答案解析.pdf VIP
- 2025年及未来5年中国风机叶轮动平衡机市场现状数据分析及数据监测报告.docx
- 高中数学预备知识教学研究.pptx VIP
- 【基恩士】SR-2000_1000 系列 × 三菱电机 iQ-F FX5 系列 连接指南 Ethernet PLC链接通信_Ethernet 端口内置CPU.pdf VIP
原创力文档

文档评论(0)