遼師大版信息技術九年循環結構程序設計1(專業版)

　　

【正文】 是閏年 ELSE PRINT y。 m, n L = m * n r = m MOD n WHILE r 0 m = n n = r r = m MOD n WEND L =L / n PRINT “最大公約數 =。“產值為 :； p END 二 、 先執行循環 ， 再判斷條件的DO…LOOP循環語句 格式： DO [循環體 ] [EXIT DO] LOOP [ WHILE | UNTIL 條件 ] 功能： 先執行一次 循環體 ， 然后再判斷條件 。s 作業 S=1+22+333+4444+…+666666 FOR i=1 to 6 t=0 FOR j=1 TO I t=t+i*10^(j1) NEXT j s=s+t NEXI i 例 6． 打印一個由 “ *” 組成的直角三角形 。m, FOR i=1 TO 3 FOR j=2 TO 3 k=i*j : PRINT k, NEXT j, i 程序 ： CLS FOR i= 1 TO 9 FOR j = 1 TO 9 m=i*j PRINT i。 表達式 語 句 假 (0) 真 (非 0） (2) WHILE和 WEND必須成對使用。 分析： 用 FOR語句編程 ， 將執行輸入輸出的語句作為循環體 ， 設置一個可以執行 30次的循環 。 如： sum=0 FOR i= 1 TO 30 sum=sum+i*i IF sum =100 THEN EXIT FOR NEXT i PRINT sum END 運行結果為： 140 問：該程序輸出的是何結果 ？ 循環 。 (注 :1m3小麥約 108) i=1 ： s=1 WHILE WEND v=s/+8 PRINT “粒數 s=“。 NEXT j PRINT NEXT i * END ** *** **** ***** 作業 : 上機題 （ 下冊 ） ： P15 4 、 19 答疑時間：每周三， 9， 10節 答疑地點： 210層，信管教研室。 例 1． 觀察下列程序的運行結果 。 DO循環有 當型 和 直到型 兩種 . DO … ….LOOP [while|until]必先執行一次循環 ， 再判斷條件 。 程序中 flag為標志位 ， 初值為 0。cs。“不 是素數 ” : goto 10 NEXT i% PRINT n。 WHIIE循環語句的用法比較單一 。 (2)循環可以嵌套 ， 其規則與 FOR…NEXT循環相同 。 ’SPACE$(5i)。n END s=0： n=0:i=1 WHILE i = 100 IF I MOD 2=0 THEN s=s+i i=i+1 n=n+1 WEND print “s=“。n PRINT “x=“。v END INPUT “姓名 ,成績 :。 如： 求 s=1+2+3…+100 s=0： i=1 WHILE i = 100 s=s+i i=i+1 WEND print “s=“。j。 第一個 *的位置： 第二個 *的位置： *的位置與行數 I的關系 : 5 4=62 k=6i 5=61 程 序： CLS FOR i = 1 TO 5 PRINT TAB(6i)。 說明 ： 與前面 DO WHLIE| UNTIL 語句的不同點是 先執行一次循環 ,再判斷條件 . 例 5． 用鍵盤輸入字符 ， 并對輸入字符輸出并計數 。 L END FOR I=1 TO n IF m MOD I=0 and n MOD I=0 THEN k=I NEXT I : PRINT “最大公約數 =。 分析： 1。 閏年的條件是 ： 能被 4整除但不能被 100整除 ， 或者能被 400整除 。 ③ 最后一次的 n 就是最大公約數 。 分析：設增長率為 r,基值設為 P0. 第一年 : P=P0*(1+r) 第二年 : P0=P: P=P0*(1+r) …… 一直到某年產值達