- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
循环结构(又称重复结构)
循环结构(又称为重复结构);条件;A框;;计算12个实验数据的平均值 ;开始;一、用For-----Next语句实现循环结构 ;;FOR ---NEXT语句的执行过程是:;计算1+2+3+…10的值;t = 0For i = 1 To 10t = t + iNext iPrint t=; t;计算1+3+5+7+9的值;t = 0For i = 1 To 10 Step 2 t = t + iNext iPrint t;计算2+4+6+8+10的值;t = 0For i = 2 To 10 Step 2t = t + iNext iPrint t;计算1+3+5+7+…前20项的值;t = 0For i = 1 To 40 Step 2t = t + iNext iPrint t;计算10+9+8+…1的值;s = 0For i = 10 To 1 Step -1s = s + iNext iPrint s;计算1+1/2+1/3+…1/10的值;s = 0For i = 1 To 10s = s + 1 / iNext iPrint s;计算1/2+1/22+1/23…1/2100的值;s = 0For i = 1 To 100 s = s + 1 / 2 ^ iNext iPrint s;;s = 0M = 1For I = 1 To 100 M = M / 2 s = s + MNext I;计算12个输入数据的平均值;;画圆形Circle (500, 800), 100, RGB(255, 0, 0)题目:画10个同心圆;For i = 100 To 1000 Step 100Circle (1800, 1500), i, RGB(255, 0, 0)Next i;计算s=1*2*3*4*…1010!;s = 1
For i = 1 To 10
s = s * i
Next i
Print s;输入数字n,计算n!;Input n
s = 1
For i = 1 To n
s = s * i
Next i
print s;计算s=1-2+3-4+5-6+7-8+9-10;s = 0t = 1For i = 1 To 10s = s + t * i—————Next iPrint s;s = 0t = 1For i = 1 To 10s = s + t * it = -tNext iPrint s;求1-1/21+1/31-1/41+…….+1/91-1/101;s = ___t = 1For i = 21 To 101 Step 10_____t = -ts = s + t * aNext iPrint s;s = 1t = 1For i = 21 To 101 Step 10a = 1 / it = -ts = s + t * aNext iPrint s;填数;For i = 1 To 9If (30 + i) * 8256 = (i * 10 + 3) * 6528 Then Print iEnd IfNext i;统计200以内37的倍数有几个?并把符合要求的数字输出。;c = 0For i = 1 To 200 If i Mod 37 = 0 Then c = c + 1 Print i End IfNext iPrint c;若一个三位数x=100a+10b+c(a,b,c都是个为数),满足a^3+b^3+c^3=x,则x称为水仙花数,找出所有的水仙花数。;For n = 100 To 999a = Int(n / 100)b = Int((n - 100 * a) / 10)c = n Mod 10If a ^ 3 + b ^ 3 + c ^ 3 = n Then Print nNext n;有一个五位数字组成的编号1_ _47,千位和百位不知,但是这个五位数是57或67的倍数,输出所有满足这些条件的五位数,并统计这样数的个数。;分析;c = 0For j = 0 To 99 n = 10047 + j * 100 If n Mod 57 = 0 Or n Mod 67 = 0 Then c = c + 1 Print n End If Next j Print c;用10元和50元两种纸币组成240元,共有哪几种组合方式?;分析;For i = 0 To 4 x = (240 - 50 * i) / 10Pr
文档评论(0)