word版可編輯-典型程序設(shè)計題精心整理(編輯修改稿)
2025-04-20 05:11 本頁面
【文章內(nèi)容簡介】 i%20 and (gw+sw+bw+qw)%25=0s=s+iendifnext? “和：”, nreturn9．求出所有能被17整除且不含重復(fù)數(shù)字的三位數(shù)的和。clears=0for i=100 to 999gw=i%10sw=int(i/10)%10bw=int(i/100)if i%17=0 and gwsw and swbw and bwgws=s+iendifnext? “和：”, nreturn————————————————————————————————————10．求1到500的偶數(shù)立方和與奇數(shù)立方和之差。clears1=0s2=0for i=1 to 500if i%2=0s1=s1+i^3elses2=s2+i^3endifnext? “偶數(shù)立方和與奇數(shù)立方和之差為：”, s1s2return————————————————————————————————————11．求3+9+27+81+243+...這樣的數(shù)之和. 若累加數(shù)大于500時,則結(jié)束累加. clears=0n=1do while .t.s=s+3^nif s500exitendifn=n+1enddo? sreturn12．求1+3+5+7+9+11+..., 則結(jié)束累加。13．計算S=1*5*9*13*...*k，直到累乘數(shù)k=25中止。clears=1n=1do while .t.s=s*nif n=25exitendifn=n+4enddo? sreturn14．求出1到5000之間的能被5整除的前若干個偶數(shù)之和，當(dāng)和大于500時程序退出。————————————————————————————————————15．編寫程序，s=1+1/2+1/3+…+1/99，保留兩位小數(shù)。clears=0for n=1 to 99s=s+1/nnext? sreturn16．編程求S=1*3+2*4+3*5+...+198*200。clears=0for n=1 to 198s=s+n*(n+2)next? sreturn17．設(shè)S=1+1/2+1/3+...+1/N，N為正整數(shù)。編程求使S不超過10的最大的N clears=0n=0do while .t.n=n+1s=s+1/nif s10exitendifenddo? n1return18．求S=8!+9!+10!clears=0for x=8 to 10t=1for y=1 to xt=t*ynexts=s+tnext? sreturn19．編寫程序，求10!20．計算S=3!+5!+7!+...+N!，求直到S=680000為止的奇數(shù)N。clears=0n=3do while .t.t=1
醫(yī)療健康相關(guān)推薦
鄂ICP備17016276號-1