資源描述：
《for循環(huán)scan循環(huán)程序設(shè)計》由會員上傳分享，免費在線閱讀，更多相關(guān)內(nèi)容在教育資源-天天文庫。
1、For循環(huán)與scan循環(huán)程序設(shè)計上機1.根據(jù)成績表中“總分”分成績類別，并填入表中的“類別”字段*根據(jù)總分分成績類別，t41Use成績&&修改表結(jié)構(gòu)，增“類別”C6字段ListGotopFork=1torecc()&&用記錄條數(shù)recc()控制循環(huán)次數(shù)docase&&根據(jù)“總分”給Dj賦值Case總分>=260Dj=[優(yōu)秀]Case總分>=240Dj=[良好]Case總分>=230Dj=[及格]otheDj=[不及格]endcaserepl類別withdj&&替換當前記錄的“類別”字段skip&&記錄指針移下一條endforlistreturn變通：用scan循環(huán)實現(xiàn)以上程序的
2、for循環(huán)2、for循環(huán)設(shè)計(1)求和*計算s=1+2+3+…+n,t42Input[請輸入正整數(shù)n:]tonS=0Fork=1tonS=s+kendfor?sreturn運行程序，n=2011,s=n=201105,s=以上結(jié)果與條件循環(huán)所得結(jié)果比較。（2）變通：求s=1+22+32+…+n2,t43運行程序，n=2011,s=n=201105,s=（3）變通：求s=1+1/2+1/3+…+1/n,t44運行程序，n=2011,s=n=201105,s=（4）變通：求s=1+3+5+…+(2n-1),t45運行程序，n=2011,s=n=201105,s=(5)變通：求1*2
3、*3*…*n,t46運行程序，n=11,s=n=15,s=(6)變通：求1*2*3*…*n>2011的第一個值,t47以上結(jié)果與條件循環(huán)所得結(jié)果比較。（7）逐條顯示“成績”表中“總分”大于240分的所有記錄。解：應(yīng)用scan循環(huán)分條顯示總分>240的記錄，直到表尾為止。程序設(shè)計如下：*t48use成績scanfor總分>240dispwaitendsreturn(8)求1～1000之間全部奇數(shù)的平方根之和*在程序中控制奇數(shù)設(shè)計,t49settalkoffy=0forx=1to1000step2y=y+sqrt(x)endfor?"0～1000之間的奇數(shù)之平方根之和為:",y
4、settalkonreturn運行這2個程序，得0～1000之間的奇數(shù)之平方根之和為:10541.01兩思考題(應(yīng)用FOR循環(huán)設(shè)計):*輸入一個數(shù)后逆序輸出，skt1input"請輸入一個整數(shù)："ton?"逆序輸出:"M=len(ltrim(str(n)))Fork=1tom??str(n%10,1)n=int(n/10)endforreturn*輸入一個數(shù)（字符串）后逆序輸出，sktaacce"請輸入一個整數(shù)或字符串："ton?"逆序輸出:"m=len(n)fork=1tom??subs(n,m+1-k,1)endforreturn變通：*輸入一個數(shù)（字符串）后逆序輸出，sk
5、tbacce"請輸入一個整數(shù)或字符串："ton?"逆序輸出:"m=len(n)fork=mto1step-1??subs(n,k,1)endforreturn
