程序的循環(huán)結(jié)構(gòu)for循環(huán)

FOR循環(huán)語句,輸出1至10之間所有整數(shù)的平方根,PrivateSubCommand1_Click()Form1.ClsPrint1,Sqr(1)Print2,Sqr(2)Print3,Sqr(3)Print4,Sqr(4)Print5,Sqr(5)Print6,Sqr(6)Print7,Sqr(7)Print8,Sqr(8)Print9,Sqr(9)Print10,Sqr(10)EndSub,如果要輸出110000之間所有整數(shù)的平方根，程序要怎么寫？,輸出1至1000之間所有整數(shù)的平方根,PrivateSubCommand1_Click()Form1.ClsPrint1,Sqr(1)Print2,Sqr(2)Print3,Sqr(3)Print4,Sqr(4)Print5,Sqr(5)Print6,Sqr(6)Print7,Sqr(7)Print8,Sqr(8)Print9,Sqr(9)Print10,Sqr(10)EndSub,PrivateSubCommand1_Click()Form1.ClsFori=1to1000step1Printi,Sqr(i)NextiEndSub,FOR循環(huán)的格式,For循環(huán)變量=初值to終值step步長語句組（循環(huán)體）Next循環(huán)變量例如:Fori=1to100step1printiNexti,For循環(huán)的執(zhí)行過程,演示：單步運(yùn)行與監(jiān)視窗口變量值查看,For語句的循環(huán)特點(diǎn),控制循環(huán)體執(zhí)行多次循環(huán)變量在每次循環(huán)執(zhí)行的結(jié)束時(shí)自動(dòng)修改,閱讀程序?qū)懡Y(jié)果,ForA=1to100printANextA,S=1ForA=1to10S=s*ANextA,ForA=100to1step-1s=s+ANextA,ForA=1to10A=A+1printANextA,for循環(huán)解題的關(guān)鍵,找出問題中重復(fù)部分重復(fù)做的事情是什么？,求s=1+2+100的值,S=0S=s+1S=s+2S=s+100,S=0Fori=1to100s=s+INexti,要求24.+100的值，應(yīng)該要如何修改以上程序？,重復(fù)部分,重復(fù)做：把I累加到S。,作業(yè)1,任務(wù)1：輸出1-100之間所有完全平方數(shù)(完全平方數(shù)是這樣一種數(shù)：它可以寫成一個(gè)正整數(shù)的平方。例如，36是66，49是77)。,作業(yè)2,任務(wù)2：編一個(gè)程序，輸入N（N10），求N！12N的值。,求所有水仙花數(shù),如果一個(gè)三位數(shù)，它的每位數(shù)字的立方和等于這個(gè)三位數(shù)，則稱它為水仙花數(shù)。例如：153135333，所以153是一個(gè)水仙花數(shù)。,人工找出水仙花的過程,100是水仙花數(shù)？101是水仙花數(shù)？999是水仙花數(shù)？,求所有水仙花數(shù)算法,開始,I1000?,結(jié)束,是,否,I100,求出I的個(gè)位a,十位b和個(gè)位c,a3+b3+c3=I?,是,輸出I,II+1,循環(huán)結(jié)構(gòu),求水仙花數(shù)的程序,DimIasinteger,aasinteger,basinteger,casintegerFori=100to999a=i100b