資源簡介

第二章 信息的編程處理
學習程序設計有助于了解計算機的工作原理，有利于培養創新意識和實踐能力。因此，在學習中應把介紹的高級語言作為載體來學習計算機解決問題的基本方法和程序設計的一般步驟，而不是簡單地學幾條語句。教學中注重問題分析、程序設計思想和方法。
程序設計實踐性強，要多上機實習，掌握程序的輸入、運行、調試、修改、存取的一般方法。
第一節 程序和程序設計
一、學習目標
1．了解機器語言和高級語言各自的特點。
2．了解什么是計算機程序。
3．了解程序設計的基本步驟。
二、內容提要
1．機器語言和高級語言各自的主要特點
機器語言：與計算機內部結構有關，不通用，其程序不需“翻譯”可直接執行。
高級語言：與計算機內部結構無關，通用，其程序需要“翻譯”后才可執行。
2．計算機程序
用計算機語言描述的解決問題的程序。
3．程序設計的基本步驟
(1)問題分析：對問題詳細分析，弄清輸入(已知)條件和要求輸出的結果，明確解決問題的關鍵和途徑。
(2)算法設計：根據分析結果，確定解決問題的方法和步驟，并描述出來。
(3)程序實現：根據描述的算法編寫程序并上機通過。
三、應用實例
1．判斷下列說法的正誤
(1)機器語言是硬件而高級語言是軟件。
(2)各種計算機語言編寫的程序計算機都可直接執行。
解：
(1)說法錯誤。
分析：計算機語言都屬軟件，故機器語言和高級語言都是軟件。
(2)說法錯誤。
分析：只有機器語言編寫的程序計算機可直接執行，而各種高級語言和匯編語言編寫的程序都要先“翻譯”成機器語言程序后執行。
2．房租收費標準為，住房面積在40m2及其以下的0．8元／m2；超過40m2的部分為2元／m2。寫出收房租的算法
解：設住房面積為x，房租為y，那么

據上分析，收房租的算法為：
(1)輸入x
(2)判斷是否x<=40
是則)y←0．8x，否則y←0．8 ×40+2(x一40)
(3)輸出x，y
(4)結束
四、練習實踐
1．單項選擇題
(1)無須了解計算機內部結構就可以使用的計算機語言是( )。
A．機器語言 B．匯編語言 C．高級語言
(2)( )是計算機硬件。
A．機器語言程序 B．CPU C．操作系統
(3)BASIC語言是屬于( )。
A．機器語言 B．高級語言 c．匯編語言
2．寫出解決下列問題的算法
(1)輸入底半徑R、高H，求圓錐體的底面積S和體積V。
(2)解一元二次方程ax2+bx+c=0(設d=b2—4ac，二實根為x1、x2；要求如果d<0，那么輸出“N”，表示無實根，否則求出二實根并輸出)。
第二節 順序結構程序設計
一、學習目標
1．掌握進入BASIC環境的方法和輸入、編輯、運行程序的方法。
2．初步掌握BASIC中的基本概念：常量、變量、函數、表達式。
3．初步掌握輸出、賦值、輸入語句的格式和功能。
4．初步掌握簡單順序結構程序的設計方法。
5．理解程序的順序結構的概念。
二、學習指導
1．BASIC中的科學記數法類似數學中的科學記數法
例如：-3．14156E+3 —— -3.14156×103
2．56E-2 一 2．56×10-2
其中E表示冪底數10，E后跟的整數為冪指數。
2．常見標準函數
ABS(x) 求x的絕對值，即|x|
SQR(x) 求x的算術平方根，即。
SIN(x) 求x的正弦值C角x的單位必須是弧度，l°≈3．14159／180)。
COS(x) 求x的余弦值(規定同上)。
INT(x) 求不大于x的最大整數。
注意：x為負數時，其值不是去掉小數，例INT(一5．99)≠一5。
INT(X)用處很多：
(1)對正數x四舍五入保留N位小數的表達式：
INT(X*10^N+0．5)／1O^N
例如：對正數x四舍五入保留兩位小數的表達式：
INT(X*100+0．5)／100
(2)判斷整數A能被整數B整除的條件關系式：
INT(A／B)=A／B
(3)求整數A除以B的余數的表達式：
A—INT(A／B)*B．
RND(x) 產生一個O到1之間的隨機小數
生成(A，B)內的隨機整數的表達式：INT(RND(1)*(B—A)+A)
例如：二位隨機整數的表達式：
INT(RND(1)*90+10)
3．數學式和BASIC表達式的對應表示
應根據運算順序，正確使用圓括號，且將所有符號寫在同一行上。注意乘、除、乘方運算和絕對值、算術平方根等函數在數學上與BASIC上表示的區別。
例如：
一(-b+SQR(b*b一4*a*c))／(2*a)
4．輸出語句和輸入語句
(1)輸出語句。
格式：PRINT(輸出內容)
功能：
當輸出內容是數時，直接輸出該數；
當輸出內容是數值表達式時，先計算表達式的值，然后輸出該數值；
當輸出內容是字符串時，直接輸出該字符串。
(2)賦值語句。
格式：LET變量=表達式
功能：把“=”右邊表達式的值賦給左邊的變量。
(3)鍵盤輸入語句
格式：INPUT變量，變量，…，變量。
功能：程序運行到該句時，屏幕出現一個“ ”號，等待用鍵盤輸入數據INPUT后面的變量或變量組。
5．賦值(LET)語句功能強大，用處很多，常用于構造以下
計數器 例如：LET I=I+1(一般變量初值為0，即LET I=0)
累加器 例如：LET s=s+x(一般變量初值為O，即LET I=0)
累乘器 例如：LET T=T*x(一般變量初值為l，即LET T=1)
交換器 例如：A、B存儲的內容交換
LET C=A
LET A=B
LET B=C
6．兩種提供數據的語句對比表
表5—2—1兩種提供數據的語句對比表
語句 LET語句 INPUT語句
變量數 一個LET語句只能給一個變量賦值 一個INPUT語句可以給一個或一組變量賦值
賦值方式 在程序中賦值 在程序執行過程中，從鍵盤輸入賦值
賦值內容 數據，變量和表達式 只有具體數據
運算功能 有運算功能 無運算功能
占機時間 運行后，立即出結果，占機時間少 運行后，等待從鍵盤輸入數據，占機時間多
適合類型 ①需要賦值變量少②需要運算 參數靈活變化
7．程序的順序結構
程序各語句的執行順序是從前到后依次執行的，程序執行過程中沒有分又，也沒有
重復，這種結構的程序就叫順序結構程序。
圖形方式表示如下圖5—2一l：
圖5—2—1
圖中S1、S2、…、Sn分別表示一段具體的操作內容，用一個語句或一段程序完成。
8．順序結構的程序設計關鍵是把握好解決問題步驟的先后順序，不要把依賴于上一步完成后才能進行的后一步操作前移
例如：求半徑為15的圓周長和面積。
程序1 LET L=2*3．14*R
LET S=3．14*R*R
LET R=15
PRINT R，L，S
END
運行結果：15 O 0
程序2 LET R=15
LET L=2*3．14*R
LET S=3．14*R*R
PRINT R，L，S
END
運行結果：15 94．2 706．5
程序2和程序l語句條數和內容相同，但順序不同，結果不同，程序2正確。
三、應用實例
1．寫出下列程序的運行結果
LET X=1
LET Y=2
LET X=X+Y
LET Y=X+Y
PRINT “X”,“Y”
PRINT X,Y
END
解：可列變量值的變化表來確定結果。
X Y
l 2
3(1+2) 5(3+2)
由上分析，可得運行結果：
X Y
3 5
2．雞兔同籠問題
已知雞兔總頭數為H，總腳數為F，問雞兔各有多少只
解：設雞兔各有x、Y只，則有
X+Y=H (1)
2X+4y=F (2)
由(1)、(2)可得：
X=(4H—F)／2
Y=(F一2H)／2
算法：1．輸入H，F
2．X←(4*H—F)／2
3．Y←(4—2H)／2
4．輸出x，Y
5．結束
程序：INPUT H，F
LET x=(4*H—F)／2
LET Y=(F一2*H)／2
PRINT“X=”；X，“Y=”；Y
END
運行結果如下：
60，176
X=32 Y=28
四、練習實踐
1．填空題
(1)2．745E-3化為日常計數法的數是
(2)SQR(49)+ABS(一5)的值是
(3)INT(RND(50)+20)的值是
(4)數學式對應的BASIC表達式是
(5)數學式x7+對應的BASIC表達式是
2．判斷題
(1)X3Y、x(1)、sinx、7c都是正確的BASIC變量。( )
(2)語句INPUT A；B；c是正確的。( )
(3)語句LET M=3，N=5是正確的。( )
(4)語句INPUT A=5是正確的。( )
(5)語句LET x=x+l是錯誤的。( )
(6)LET語句是BASIC中惟一能進行計算的語句。( )
(7)下面程序運行后，顯示結果是A=7，說明此時變量A的值是7。( )
LET A=4
PRINT “A=”；7
END
3．單選題
(1)BASIC中100000表示為( )。
A．1E+5 B．E+5 C．5E D．1E一5
(2)PRINT INT(10*RND(1)+1)結果是( )。
A．[1，11]范圍內的隨機整數 B．[1，10)范圍內的隨機整數
c．[0，10]范圍內的隨機整數 D．[1，11]范圍內的隨機整數
(3)表達式A—B／3^C的運算順序是( )。
A．①一②+③／ B．①一②^③／
C．①一②／③^ D．①^②／③一
(4)PRINT INT(3．236*100+0．5)/100的結果是
A．3．23 B．3．236 C.3.24 D.324
(5)程序運行的結果是( )。
LET M=3
LET N=0
LET S=M*N
LET N=2
PRINT S
END
A．0 B．3 C.6 D.2
(6)程序運行的結果是( )。
LET A=5
PRINT “A=”；A+1,A
END
A．A=6 6 B．A=6 5
C．A=A+l A D．A=6 A
4．寫出下列程序的運行的結果
(1)LET X=5
LET Y=3
LET S=(X+Y)／2
PRINT “S=”；S
LET S=X+Y/2
PRINT “S=”；S
END
(2)LET X=999
LET X=ABS(X—1000)
PRINT “SQR(X)=”；SQR(X)
END
(3)LET A=1
LET B=7
LET A=A+B
LET B=A+B
PRINT A,B
END
(4)INPUT A，B，X
LET A=A+X
LET B=X—B
LET S=A+B+X
PRINT S
END
①輸入1，2，3 ②輸入3，2，1
5．編程解一元一次方程ax+b=c(a≠0)
(提示:a,b,c為已知量,用INPUT a,b,c輸入,x為待求量,應用已知量表示即:x=(c-b)/a)
6．編寫一個計算年息、年終節余的程序
要求輸入存款數、年利率，輸出存款數、年息和年終節余(保留二位小數)。
解:設存款數為x、年利率為a，年息為y,年終節余為z.
程序如下:
INPUT x,a
LET y=x*a
LET z=x+y
LET z=INT(z*100+0.5)/100
PRINT x,y,z
END
第三節 分支結構程序設計
一、學習目的
1．初步掌握條件關系式的表示。
2．初步掌握分支語句的兩種格式和功能。
3．初步掌握簡單分支結構程序的設計方法。
4．理解程序的分支結構的概念。
二、學習指導
1.分支問題中的條件，在BASCI中關系式來表示
(1)關系式格式。
<表達式><關系符><表達式>
在QBASIC中，有六個關系符，它們是：
關系運算符 數學運算符
<> ≠
> >
< <
>= ≥
<= ≤
注意：關系符與數學運算符的區別。
(2)常用條件關系式。
整數A能被整數B整除的條件：INT(A／B)=A／B
整數x為偶數的條件：INT(X／2)=X／2
整數x為奇數的條件：INT(X／2)<>X／2
x為整數的條件：INT(x)=x
2．分支語句的格式和功能
格式：(1)IF 條件 THEN
語句組
END IF
(2)IF 條件 THEN
語句組1
ELSE
語句組2
END IF
功能：如果條件成立(為真)，那么執行THEN后的語句組，否則(即條件不成立，為假)格式(1)執行下一語句，格式(2)執行ELSE后的語句組2。
3．程序的分支結構
首先對給定的條件進行判斷，并按判斷后的不同結果作不同的選擇處理，這種程序
的結構就是分支結構。
程序的分支結構圖形表示如下圖5—3—1
(圖5—3一1)
4．分支結構程序設計方法步驟
(1)分析問題，弄清分支的條件和各分支要完成的工作；
(2)用關系式正確表示條件；
(3)用分支語句寫出程序。
三、應用實例
l.房租收費標準為：住房面積在80m2及其以下的，單價為1．2元／m2；超過80m2的，其超過部分單價1．8元／m2。要求先給出算法再編寫出程序
解：設住房面積為x，房租為Y，則房租的計算方法如下：
如果x<=80那么Y=1．2*x 否則Y=1．2*80+1．8*(x-80)
算法：(1)輸入x
(2)判斷條件x<=80是否成立
是則Y←1．2*X，否則Y←1．2*80+1．8(x-80)
(3)輸出x，Y
(4)結束
程序：INPUT x
IF X<=80 THEN
LET Y=1．2*X
ELSE
Y=1．2*80+1．8*(X-80)
END IF
PRINT X,Y
END
運行結果如下：
50
50 60
100
100 132
2．寫出下列程序對應的分段函數式
INPUT X
IF X<0 THEN
LET Y=-1
END IF
IF X=0 THEN
LET Y=0
ENDIF
IF X>0 THEN
LET Y=1
PRINT X,Y
END
解：顯然x為自變量，Y為函數名。第一個IF語句功能是x<0時，Y=-1；第二個IF語句功能是x=0時，Y=0否則(即x>0)Y=l。
程序對應的函數式是：
四、練習實踐
1．單選題
(1)錯誤的語句是( )。
A．IF OPRINT X LET X=0
END IF END IF
C．LET T=1／T D.INPUT M，M$
(2)下列程序運行的結果是( )
LET X=-5
IF X<0 THEN
LET Y=2*X
ELSE
LET Y=X*X
END IF
PRINT Y
END
A．25 B．10 C.-25 D.-10
2．寫出下列程序的運行結果
(1)INPUT X
IF X<0 THEN
LET Y=-X
ELSE
LET Y=X
END IF
PRINT “ABS(X)=”；Y
END
①輸入99 ②輸入一77
結果為： 結果為：
(2)LET A=7
LET B=8
INPUT K$
IF K$=“+”THEN
PRINT A+B
ELSE
PRINT A-B
END IF
END
①輸入“+” ②輸入“-”
結果為： 結果為：
(3)LET M=0
LET X=5
IF INT(X*X／10)<3 THEN
LET M=1
END IF
PRINT M
END
(4)INPUT A，B
PRINT A；
IF A>B THEN
PRINT“>”；
ELSE
PRINT“<”；
END IF
PRINT B
END
①輸入l，4 ②輸入4，l
結果為： 結果為：
(5)輸入一個數，如果這個數不等于零，那么輸出他的倒數，否則不顯示。
INPUT X
IF X______0 THEN
Y=1/X
PRINT Y
END IF
END
(6)請設計一個判斷某數是偶數的程序，要求若是偶數則打印出“YES”，否則直接打印出這個數的值。
INPUT X
IF X/2=_______THEN
PRINT "YES"
ELSE
PRINT X
ENDIF
END
(7)鐵路為旅客隨身攜帶行李的計算標準為：10公斤以內（包含10公斤）免收行李費；若超過10公斤，超過10公斤的部分按0.2元/公斤標準收費。
INPUT X
IF ________THEN
Y=0
ELSE
Y=(X-10)*0.2
END IF
PRINT Y
END
3．編程序，求Y
4．判斷學生成績是否達標，達標的標準是語文、數學和外語三科的總分不低于270分。輸入學生的學號和三科成績，打印學號、總分和是(Y)否(N)達標
5．編程求解二元一次方程組
要求：當a1b2-a2b1=0時，輸出“N”，否則求出其解。
第四節 循環結構程序設計
一、學習目的
1．初步掌握計數循環、條件循環兩種語句的格式和功能。
2．初步掌握簡單循環結構程序的設計方法。
3．理解程序的循環結構的概念。
二、學習指導
1．計數循環語句
(1)格式：FOR 循環變量=初值 TO 終值 STEP 步長
語句組(循環體)
NEXT循環變量
FOR語句為循環說明語句，NEXT語句為循環終端語句。
FOR和NEXT后面的循環變量必須相同。
初值、終值和步長都是數值表達式。
步長為1時，STEP可省略不寫。
(2)功能：根據FOR語句說明設定的循環次數重復執行循環體。其具體執行過程可用圖5-4-l表示。
圖 5—4—1
其中循環變量超過終值的規則是：
步長為正，大于終值；步長為負，小于終值。
一般地循環次數可用下列公式計算：
循環次數=INT((終值一初值)／步長)+1
2．條件循環語句
(1)格式：DO WHILE條件
語句組(循環體)
LOOP
(2)功能：當條件成立(即為真)時，執行DO和LOOP之間的語句組(循環體)，否則終止循環，轉到LOOP語句的下一句執行。
3．計數循環程序設計關鍵是確定循環的次數和重復循環的操作；條件循環程序設計的關鍵是確定循環的條件和重復循環的操作
三、應用實例
1．編程求1+2+4+8+16+……+2n(n<64)的值
解：
(1)此題的計算公式是一個和式，加數為2的乘方，可考慮用累加求和的方法來計算。設累加變量為s，加數為2K，K=O…n。構造一個關于K的循環，重復執行s←s+2^K，即可算出和式的值。
根據分析，可編程序如下：
INPUT N
LET S=0
FOR K=O TO N
LET S=S+2^K
NEXT K
PRINT“S=”：S
END
運行結果如下：
63
S=1．844674E19
(2)數列各項為2的0、l、2……n次乘方，即乘數始終為2的累乘積，可構造一個n次循環，用卜T*2累乘(T的初值為1)依次生成數列各項，用S←s+T依次累加各項。循環結束，其累加和s的值即所求和式的值。
根據分析，可編程序如下：
INPUT N
LET T=1
LET S=T
FOR K=l TO N
LET T=T*2
LET S=S+T
NEXT K
PRINT“S=”；S
END
運行結果如下：
63
S=1．844674E19
四、練習實踐
1．寫出下列程序的運行結果
(1)FOR A=1 T0 5
PRINT A，A*A，2^A
NEXT A
END
(2)LET M=1
INPUT A，B，C
FOR I=A To B STEP C
LET M=M*I
NEXT I
PRINT M
END
①輸入l，5，1 ②輸入50，-l，-1
結果為： 結果為：
(3)LET T=1
LET A=0
FOR K=l T0 5
LET A=A+T*K
T=-T
NEXT K
PRINT A
END
結果為：
(4)LET M=0
FOR X=1 TO 10
IF INT(X／2)=x／2 THEN
LET M=M+X
END IF
NEXT X
PRINT M
END
結果為：
(5)LET S=O
LET X=2
DO WHILE S<30
LET S=S+X*X
LOOP
PRINT S
END
(6)LET A=l
LET B=l
D0 WHILE B<20
PRINT A，B
LET A=A+B
LET B=A+B
LOOP
END
2．根據題意，把程序填寫完整
(1)求1／2+2／3+3／4+…+99／100的值。
LET S=0
FOR I=l TO
LET S=
NEXT I
PRINT S
END
(2)把輸入的6個數中絕對值大于5的數打印出來，并統計這樣的數的個數。
LET T=0
FOR J=1 T0 6
INPUT X
IF THEN
PRINT X,
END IF
NEXT J
PRINT “T=”；T
END
高一(下)QBASIC程序設計復習

在QBASIC程序設計中，任何一個程序設計的思路都差不多，包括四部分：輸入部分（已知條件）、處理部分（計算、判斷、重復）、輸出部分、結束部分。
在這四部分中，各部分的語句為：
輸入部分：LET（輸入常量）INPUT（輸入變量） FOR ……TO……STEP（輸入等差數列）
處理部分：順序結構中：主要用LET語句實現計算,可能有多個LET語句。
分支結構中：有一分支和二分支之分（詳細語句見后）
循環結構中：有計數循環和條件循環兩種（詳細語句見后）
輸出語句：在三種結構中都是用PRINT語句。具體用法見各種結構。
結束語句：在三種結構中都是用END語句，標志程序的結束。
三種結構語句
一、順序結構
(一)．語句列表
語句功能 英文 例句
輸入語句 LET ① LET x=5 ②x=5:y=6
INPUT ① INPUT x ②INPUT A,B,C
計算語句 LET ① LET X=X+1 ②Y=X^3
輸出語句 PRINT ① PRINT x,y,z ②PRINT “S=”:S
結束語句 END END
（二）易錯題
. 1.寫出下列程序的運行的結果
LET X=5
LET Y=3
LET S=INT(X+Y/2)
PRINT “S=”；S
END
運行結果:_______
答案:S=6
說明：
2.寫出下列程序的運行的結果
LET X=999
LET X=ABS(X-1000)
PRINT “SQR(X)”;“=”;SQR(X)
END
運行的結果:_______
答案:SQR(X)=1
說明：
3.寫出下列程序的運行的結果
LET A=1
LET B=7
LET A=A+B
LET B=A+B
PRINT A,B
END
運行的結果:______
答案:8 15
說明:變量的特點是喜新厭舊,當賦予它新值時,舊值將自動消失
4.寫出下列程序的運行的結果
INPUT A,B,X
LET A=A+X
LET B=X-B
LET S=A+B+X
PRINT S
END
①輸入1，2，3
運行的結果:_______
答案:8
說明：
5. LET　M＝3
LET　N＝0
LET　S＝M*N
LET　N＝2
PRINT　S
END
程序的運行結果是______。
答案:0
說明：
6.a=1
b=2
c=3
a=b
b=c
c=a
PRINT a;b;c
END
程序運行結果是2 3 _______
答案:2
說明：
7.LET A$=”HELLO”
LET B$=”OK”
C$=A$
A$=B$
B$=C$
PRINT A$
END
程序運行的結果是_______
答案:OK
說明：
二、分支結構程序設計
(一)．語句列表
語句功能 英文 例句
輸入語句 LET ①LET x=5 ②x=5:y=6
INPUT ①INPUT x ②INPUT A,B,C
處理語句 一分支 IF 條件 THEN 語句組END IF IF X>=0 THEN LET Y=1/XEND IF
二分支 IF 條件 THEN 語句組1ELSE 語句組2END IF IF X<0 THEN Y=XELSE Y=-XEND IF
計算 LET ①LET X=X+1 ②Y=X^3
輸出語句 PRINT ①PRINT x,y,z ②PRINT “S=”:S
結束語句 END END
（二）易錯題
1. LET A=7
LET B=8
INPUT K$
IF K$=”＋” THEN
PRINT A＋B
ELSE
PRINT A－B
END IF
END
運行后輸入“＋”
結果顯示:______
答案:15
說明：
2．輸入一個數，如果這個數不等于零，那么輸出他的倒數，否則不顯示。
INPUT X
IF X______0 THEN
Y=1/X
PRINT Y
END IF
END
答案:<>
說明：
3.請設計一個判斷某數是偶數的程序，要求若是偶數則打印出“YES”，否則直接打印出這個數的值。
INPUT X
IF X/2=_______THEN
PRINT "YES"
ELSE
PRINT X
ENDIF
END
答案:INT(X/2)
說明：
4.鐵路為旅客隨身攜帶行李的計算標準為：10公斤以內（包含10公斤）免收行李費；若超過10公斤，超過10公斤的部分按0.2元/公斤標準收費。
INPUT X
IF ________THEN
Y=0
ELSE
Y=(X-10)*0.2
END IF
PRINT Y
END
答案：X<=10
說明：
5.INPUT X
IF X<0 THEN
LET Y=-X
ELSE
LET Y=X
END IF
PRIN“ABS(X)=”；Y
END
①輸入99
結果為：_______
答案:ABS(X)=99
說明：
6.請設計一個程序，將鍵盤上任意輸入的兩個數中最大的那個選出來。
INPUT A,B
IF A>B THEN
MAX=_______
ELSE
MAX=B
ENDIF
PRINT “MAX=”;MAX
END
答案:A
三、計數循環
（一）語句列表
語句功能 英文 例句
輸入語句 LET LET S=0（一般用于給變量賦初值）
FOR 循環變量=初值 TO 終值 STEP 步長值 循環體NEXT循環變量 FOR X=1 TO 100 STEP 2S=S+xNEXT X
處理語句 LET （N=N+1）(S=S+I) (T=T*X) LET N=N+1
輸出語句 PRINT PRINT “S=”:S
結束語句 END END
注意：
1． FOR語句兼有計數和輸入等差數列功能。
2． 循環體中可能會出現以下語句：
S=S+I （I為循環變量,S為和，該語句功能是將I的所有取值累加起來）
T=T*X [X為循環變量,T為積，該語句功能是將X的所有取值累乘起來（求階乘）]
N=N+1 （N為次數，該語句是求循環次數）
可以用公式：循環次數=INT（（終值-初值）/步長）+1
(二)易錯題
1. 求循環次數
S=0
FOR X=10 TO 2 STEP -4
LET S=S+X
NEXT X
PRINT S/X
END
程序循環的了_________次。
答案：3
進一步思考：如果是寫運行結果呢？運行結果為：____________
說明：
2. 求：1+1/2+1/3+1/4+…+1/100的值
LET　S＝0
FOR　I＝1　TO　______
LET　S＝____________
NEXT　I
PRINT　S
END
答案:100 S+1/I
說明：
3. 求積M=1*2*3*…*10
M=____
FOR A=1 TO 10
M=________
NEXT A
PRINT "M="；M
END
答案:1 M*A
說明：
4. 寫出下列程序運行結果。
T=0
FOR K=1 TO 5
T=T+K
NEXT K
PRINT T/K
END
程序運行結果是________
答案:2.5
說明：

附常見的標準函數：
常見的標準函數
函數名 功能 用法
ABS(X) 求X的絕對值 ABS(-5.1)=5.1
SQR(X) 求X的算術平方根 SQR(49)=7
INT(X) 求不大于X的最大整數 INT(2.5)=2 INT(-2.5)=-3
RND(X) 產生一個（0，1）內的隨機數 RND(100)
QBASIC練習題
1. LET　M＝3
LET　N＝0
LET　S＝M*N
LET　N＝2
PRINT　S
END
程序的運行結果是______。
2. LET S=0
LET X=20
LET S=S+X
LET X=30
LET S=S+X
PRINT S
END
程序運行的結果是________________
3. LET X=ABS（-7）
LET Y=SQR(81)
LET Z=X
LET X=Y
LET Y=Z
PRINT Y
END
程序運行的結果是____
4. 寫出下列程序的運行結果
INPUT X
IF X<0 THEN
LET Y=-X
ELSE
LET Y=X
END IF
PRIN“ABS(X)=”；Y
END
①輸入99 ② 輸入一77
結果為：_______ 結果為：_______
5. 請設計一個程序，將鍵盤上任意輸入的兩個數中最大的那個選出來。
INPUT A,B
IF A>B THEN
MAX=_______
ELSE
MAX=B
ENDIF
PRINT “MAX=”;MAX
END
6. 完善程序。對輸入的任意二個數，輸出其中的大數。
INPUT A,B
IF A>B THEN
PRINT_______
ELSE
PRINT B
END
7. 寫出下列程序的運行的結果
LET A=7
LET B=8
INPUT K$
IF K$=“+”THEN
PRINT A+B
ELSE
PRINT A-B
END IF
END
①輸入“+”
結果為：_______
8 寫出下列程序的運行的結果
LET M=0
LET X=5
IF INT(X*X/10)<3 THEN
LET M=1
END IF
PRINT M
END
運行的結果:_______
9. 寫出下列程序運行結果。
FOR I=1 TO 5
PRINT I，
NEXT I
END
運行結果為:1 2 3 4 _______
10. 寫出下列程序的運行結果
FOR A=1 T0 5
LET S=S+A
NEXT A
PRINT S
END
運行的結果:_______
11. 寫出下列程序的運行結果。
N=0
FOR X=3 TO 10 STEP 3
N=N+1
NEXT X
PRINT N
END
運行結果為:_______
12. 求1/2+2/3+3/4+…+99/100的值。
LET S=0
FOR I=l TO _______
LET S=_______+I/（I+1）
NEXT I
PRINT S
END
13. 寫出下列程序的運行的結果
LET M=1
INPUT A，B，C
FOR I=A To B STEP C
LET M=M*I
NEXT I
PRINT M
END
①輸入l，5，1
結果為：________

展開更多......

收起↑