程序設(shè)計(jì)基ppt課件-資料下載頁(yè)
2025-04-29 04:00本頁(yè)面
【正文】 是一個(gè) FOR循環(huán)嵌套另一個(gè) FOR循環(huán)的一般形式： FOR 循環(huán)變量 =初值 TO 終值 [STEP 步長(zhǎng) ] 語(yǔ)句序列 11 FOR 循環(huán)變量 =初值 TO 終值 [STEP 步長(zhǎng) ] 語(yǔ)句序列 21 ENDFOR|NEXT 語(yǔ)句序列 12 ENDFOR|NEXT 下面是一個(gè) FOR循環(huán)嵌套一個(gè) DO WHILE…ENDDO循環(huán)的一般形式： FOR 循環(huán)變量 =初值 TO 終值 [STEP 步長(zhǎng) ] 語(yǔ)句序列 11 DO WHILE 條件表達(dá)式 2 語(yǔ)句序列 21 ENDDO 語(yǔ)句序列 12 ENDFOR|NEXT 【 例 】 從鍵盤輸入 n個(gè)實(shí)數(shù)，對(duì)它們按從小到大的順序排序，并將排序后的這 n個(gè)數(shù)依次輸出。 冒泡排序演示文件【 例 】 從鍵盤輸入 n個(gè)實(shí)數(shù)，對(duì)它們按從小到大的順序排序，并將排序后的這 n個(gè)數(shù)依次輸出。 ************************************************************* * 本程序使用 冒泡排序法 對(duì)給定的 n個(gè)實(shí)數(shù)進(jìn)行排序 * ************************************************************* SET TALK OFF CLEAR dimension a(100) input “自然數(shù) n=” to n for i=1 to n ?? “實(shí)數(shù) a(“+str(i,3)+”)=“ input “” to a(i) endfor for i=1to n1 amp。amp。 對(duì) n個(gè)數(shù)進(jìn)行 n1 趟排序 for j=1 to ni amp。amp。 處理第 i趟排序 if a(j)a(j+1) amp。amp。 需要交換相鄰的兩個(gè)數(shù) tmp=a(j) amp。amp。 交換相鄰的兩個(gè)數(shù) a(j)=a(j+1) a(j+1)=tmp endif endfor endfor * 下面按從小到大的順序依次輸出各個(gè)數(shù) for i=1 to n ?? a(i),”,” amp。amp。 相鄰的兩個(gè)數(shù)之間用逗號(hào)分隔 endfor SET TALK ON RETURN *************************************************************** * 本程序使用 do while…enddo 循環(huán)實(shí)現(xiàn) 冒泡排序法， * * 對(duì) n個(gè)實(shí)數(shù)進(jìn)行排序 * *************************************************************** SET TALK OFF CLEAR dimension a(100) input “自然數(shù) n=” to n for i=1 to n ?? “實(shí)數(shù) a(“+str(i,3)+”)=“ input “” to a(i) endfor i=1 do while i=n1 amp。amp。 對(duì) n個(gè)數(shù)進(jìn)行 n1 趟排序 j=1 do while j=ni amp。amp。 處理第 i趟排序 if a(j)a(j+1) amp。amp。 需要交換相鄰的兩個(gè)數(shù) tmp=a(j) amp。amp。 交換相鄰的兩個(gè)數(shù) a(j)=a(j+1) a(j+1)=tmp endif j=j+1 enddo i=i+1 enddo * 下面按從小到大的順序依次輸出各個(gè)數(shù) for i=1 to n ?? a(i),”,” amp。amp。 相鄰的兩個(gè)數(shù)之間用逗號(hào)分隔 endfor SET TALK ON RETURN 用多重循環(huán)編程輸出下三角形乘法口訣表 SET TALK OFF CLEAR X=1 DO WHILE X=9 Y=1 DO WHILE Y=X S=X*Y ?? STR(Y,1)+”*”+STR(X, 1)+”=”+STR(S, 2)+” “ Y=Y+1 ENDDO ? X=X+1 ENDDO SET TALK ON RETURN
教學(xué)課件相關(guān)推薦
鄂ICP備17016276號(hào)-1