程序流程的控制（二）

VisualBasic程序設(shè)計(jì)

第十講

第四章程序流程

（二）

2011-7-101

4.4循環(huán)結(jié)構(gòu)

44

For...Next循環(huán)Do...Loop循環(huán)

2011-7-102

4.4循環(huán)結(jié)構(gòu)

循環(huán)結(jié)構(gòu)是算法語(yǔ)言中一種重要的

結(jié)構(gòu)，它的應(yīng)用非常廣泛，把要重復(fù)執(zhí)行

的語(yǔ)句放在循環(huán)結(jié)構(gòu)中，就可避免多次重

復(fù)輸入。在使用循環(huán)結(jié)構(gòu)時(shí)，有些循環(huán)的

次數(shù)事先可以確定，這種循環(huán)稱(chēng)為確定性

循環(huán)。有些循環(huán)的循環(huán)次數(shù)是不能事先確

定，需要根據(jù)條件來(lái)決定是否繼續(xù)循環(huán)，

我們稱(chēng)這種循環(huán)為不確定循環(huán)。

2011-7-103

在VB程序設(shè)計(jì)語(yǔ)句中有二種形

式的循環(huán)結(jié)構(gòu)。

其中For循環(huán)結(jié)構(gòu)用來(lái)設(shè)計(jì)循環(huán)次

數(shù)可以事先確定的循環(huán)結(jié)構(gòu)。即循

環(huán)次數(shù)已知循環(huán)結(jié)構(gòu)。

而Do.??Loop循環(huán)結(jié)構(gòu)一般用來(lái)設(shè)計(jì)

循環(huán)次數(shù)無(wú)法事先確定的循環(huán)結(jié)構(gòu)。

2011-7-104

4.4.1For循環(huán)結(jié)構(gòu)

?For循環(huán)結(jié)構(gòu)的一般形式：

For循環(huán)控制變量=初值To終值［Step步長(zhǎng)］

［語(yǔ)句組1］］

［ExitFor］卜循環(huán)體

［語(yǔ)句組2］

Next［循環(huán)控制變量］

205

For循環(huán)結(jié)構(gòu)一格式

說(shuō)明：

For循環(huán)以For語(yǔ)句開(kāi)始，以Next語(yǔ)句結(jié)束。

循環(huán)變量用來(lái)控制循環(huán)次數(shù)；

初值代表循環(huán)變量的初始被賦的值；

終值代表循環(huán)變量最終能繼續(xù)進(jìn)行循環(huán)的值;

步長(zhǎng)代表每循環(huán)一次循環(huán)變量增長(zhǎng)的值。

For循環(huán)結(jié)構(gòu)

?一循環(huán)次數(shù)的計(jì)算

循環(huán)的次數(shù)可以從循環(huán)初值、終值、和步

長(zhǎng)計(jì)算出來(lái)：

R=INT((終值-初值+步長(zhǎng))/步長(zhǎng))

例如：For1=1To10Step2

循環(huán)次數(shù)R=INT((10-1+2)/2)=INT(5.5)=5

For1=5.0To25.Step0.5

R=INT((25.-5.0+0.5)/0.5)=INT(41.0)=41

2011-7-107

?A?1

For循環(huán)結(jié)構(gòu)-循環(huán)結(jié)構(gòu)的一些規(guī)定

1、循環(huán)變量初值、終值和步長(zhǎng)分別可以是常數(shù)、

變量和表達(dá)式。如果是變量，則它應(yīng)是預(yù)先被賦

值。如果是表達(dá)式，則應(yīng)先計(jì)算表達(dá)式的值。

2、初值、終值和步長(zhǎng)的值可以為正或負(fù)，初值、

終值可以為零。但步長(zhǎng)不能為零。

例如：For1=-1To-3Step-1的循環(huán)次數(shù)為:

R=INT((-3-(-l)+(-l))/-l)=3o

2011-7-108

For循環(huán)結(jié)構(gòu)

一循環(huán)結(jié)構(gòu)的一些規(guī)定

即當(dāng)I的值為T(mén),-2,-3時(shí),執(zhí)行正常

循環(huán)，當(dāng)I的值變成-4時(shí)不再執(zhí)行循環(huán)時(shí)。

3、脫離循環(huán)的條件是：

循環(huán)變量沿變化的方向超過(guò)終值。如

果步長(zhǎng)的值為正，則“超過(guò)”意味著“大

于"，如果步長(zhǎng)為負(fù)，則“超過(guò)”意味著

“小于”。

2011-7-109

For循環(huán)結(jié)構(gòu)

一循環(huán)結(jié)構(gòu)的一些規(guī)定

4、如果計(jì)算出循環(huán)次數(shù)R〈0,按R=0處理，

即一次也不執(zhí)行循環(huán)體。

5、如果循環(huán)變量的初值、終值和步長(zhǎng)類(lèi)

型和循環(huán)變量的類(lèi)型不一致，則按賦值的

規(guī)則處理，即先將其類(lèi)型化成循環(huán)變量的

類(lèi)型，然后進(jìn)行處理，即先將初值、終

值和步長(zhǎng)的類(lèi)型化成循環(huán)變量的類(lèi)型，然

后進(jìn)行處理。

For循環(huán)結(jié)構(gòu)

一一循環(huán)結(jié)構(gòu)的執(zhí)行過(guò)程

1、執(zhí)行For循環(huán)語(yǔ)句時(shí)先將初值賦給循環(huán)控制

變量。

2、再利用公式計(jì)算循環(huán)次數(shù)。

計(jì)算循環(huán)次數(shù)的公式：

R=Int（（終值-初值+步長(zhǎng)）/步長(zhǎng)）

2011-7JHII

For循環(huán)結(jié)構(gòu)

—循環(huán)結(jié)構(gòu)的執(zhí)行過(guò)程

3、檢查循環(huán)次數(shù)，若R=0（或RvO）,則跳

出循環(huán)體，執(zhí)行Next語(yǔ)句的下一個(gè)語(yǔ)句，若

R>0,則執(zhí)行循環(huán)體。

4、執(zhí)行Next語(yǔ)句時(shí)，循環(huán)變量增值步長(zhǎng)。

循環(huán)次數(shù)R?L

5、返回前面步驟3,重復(fù)執(zhí)行步驟3,4o

2011-7-1012

For循環(huán)結(jié)構(gòu)

一一循環(huán)結(jié)構(gòu)的執(zhí)行過(guò)程

6、其中ExitFor為在滿(mǎn)足一定條件下退出

For循環(huán)結(jié)構(gòu)。

若For循環(huán)的語(yǔ)句為：

For循環(huán)變量=?1Toe2Stepe3

循環(huán)體

Next循環(huán)變量

則其執(zhí)行過(guò)程可用下頁(yè)的流程圖表示：

2011-7JH13

計(jì)算el,e2,e3的值

?1=>循環(huán)變量/當(dāng)Rv=0時(shí)\

則循環(huán)變量

圖4-15計(jì)算應(yīng)循環(huán)次數(shù)R/的值就超過(guò)A

<1終值，若步

For循廣飛長(zhǎng)為負(fù)值時(shí)，、

環(huán)執(zhí)行超過(guò)終值則U

過(guò)程流\表示小于終!

程圖.執(zhí)行循環(huán)體

循環(huán)次數(shù)R減1

循環(huán)變量增值e3

2011-7JH執(zhí)行Next語(yǔ)句的下一個(gè)語(yǔ)句14

【例4?7】輸入一個(gè)正整數(shù)，利用For循環(huán)來(lái)判

斷是否為素?cái)?shù)。

分析：所謂素?cái)?shù)是指除了1和它本身之外，不

能被其他的數(shù)整除的數(shù)。判斷一個(gè)自然數(shù)n

(>3)是否為素?cái)?shù)的方法是：依次用2?<

數(shù)作除數(shù)去除，如果余數(shù)都不為0,則為素

數(shù)。

工程設(shè)計(jì)步驟如下：

(1)啟動(dòng)VB,選“新建工程”中“標(biāo)準(zhǔn)EXE”

工程。在出現(xiàn)的窗體上添加1個(gè)文本框、兩

個(gè)標(biāo)簽和兩個(gè)命令按鈕。如圖4?16左圖所示。

2011-7-10)15

(2)設(shè)置窗體和控件的屬性如圖4?16右圖所示。

其中標(biāo)簽Label2的Caption屬性開(kāi)始設(shè)置

為“輸出判斷結(jié)果：”在工程運(yùn)行后應(yīng)輸出具

體的判斷結(jié)果。

?判斷素?cái)?shù)程序0]X

請(qǐng)輸入一個(gè)大于等于3的自然數(shù)N

判斷

輸出判斷結(jié)果!

退出

圖446判斷素?cái)?shù)工程設(shè)計(jì)界面和屬性設(shè)置

2011-7-1016

在文本框中輸入一個(gè)自然數(shù)n

j=",i=2

圖417

判斷自然數(shù)n

是否為素?cái)?shù)的

程序流程

2011-7-107

(3)編寫(xiě)代碼

編寫(xiě)單擊Commandl命令按鈕“判斷”所

執(zhí)行的代碼

PrivateSubCommandl_Click()

DimiAsLong,jAsLong,nAsLong

n=Val(Textl.Text)

j=Clng(Sqr(n))

Debug.Printj

2011-7-10>118

rFori=2Toj

，IfnModi=0ThenExitFor

Nexti

Debug.Printi

rIfi>jThen

Labell.Caption=Textl.Text&"為素?cái)?shù)"

YElse

Labell.Caption=Textl.Text&"為非素?cái)?shù)”

^EndIf

EndSub

2011-7-1019

編寫(xiě)單擊Command2命令按鈕“退出”所

執(zhí)行的代碼

PrivateSubCommand2_Click()

UnloadMe

EndSub

編寫(xiě)Form_Activate()事件發(fā)生時(shí)所執(zhí)行的

代碼一

PrivateSubForm_Activate()

Textl.SetFocus

EndSub

2011-7-1020

(4)運(yùn)行結(jié)果。按F5鍵運(yùn)行工程，當(dāng)出

現(xiàn)運(yùn)行畫(huà)面時(shí)在提示的文本框中輸入1個(gè)

自然數(shù)例如137,然后單擊“判斷”按鈕,

就會(huì)在標(biāo)簽2中顯示“137為非素?cái)?shù)”的

信息。如圖4-16所示。

圖4?16判斷素?cái)?shù)工程運(yùn)行結(jié)果

2011-7-1021

442多重循環(huán)

通常把循環(huán)體內(nèi)不含有循環(huán)語(yǔ)句的

循環(huán)稱(chēng)為單層循環(huán)，而把循環(huán)體內(nèi)含有

循環(huán)語(yǔ)句的循環(huán)稱(chēng)為多重環(huán)。例如在一

個(gè)循環(huán)體內(nèi)含有一個(gè)循環(huán)語(yǔ)句的稱(chēng)為二

重循環(huán)。多重循環(huán)又稱(chēng)為多層循環(huán)和循

環(huán)的嵌套。下面通過(guò)例題來(lái)講解多重循

環(huán)的應(yīng)用。

2011-7-1022

【例4?8】我國(guó)古代數(shù)學(xué)家張丘建在“算經(jīng)”

里提出一個(gè)世界數(shù)學(xué)史上有名的百雞問(wèn)

題：雞翁一、值錢(qián)五、雞母一、值錢(qián)三,

雞雛三、值錢(qián)一，百錢(qián)買(mǎi)百雞，問(wèn)雞翁、

母、雛各幾何？

分析：若公雞x只，母雞y只，小雞z只，

依題意可以列出以下方程組：

x+y+z=100

<x

5x+3y——=100

3

2011-7-1023

在上面的兩個(gè)方程中，有3個(gè)未知

數(shù)，屬于不定方程，無(wú)法直接求解。下

面我們用“窮舉法”求解。窮舉法是將

各種可能的組合全部一一測(cè)試，將符合

條件的組合輸出。這里使用二層循環(huán)結(jié)

構(gòu)。即將公雞數(shù)從1變化到100,母雞數(shù)

也從1變化到100,對(duì)于每一組公雞和母

雞數(shù)，從100中減去公雞和母雞數(shù)就得到

小雞的個(gè)數(shù)，然后再計(jì)算買(mǎi)三種雞的總

錢(qián)數(shù)是否為100元。若是就得到一組解，

然后再繼續(xù)。

2011-7-1024

再仔細(xì)分析一下，若100元錢(qián)全部都買(mǎi)公雞

最多買(mǎi)20只，如果全部買(mǎi)母雞最多買(mǎi)33只，

所以窮舉法外循環(huán)中公雞數(shù)可從1變到19,

內(nèi)循環(huán)中母雞數(shù)可從1變化到33,小雞個(gè)數(shù)

應(yīng)100中減去公雞數(shù)和母雞數(shù)得到。

工程設(shè)計(jì)步驟如下：

(1)新建“標(biāo)準(zhǔn)EXE”工程，在出現(xiàn)的窗體

上添加四個(gè)標(biāo)簽、一個(gè)列表框、一個(gè)框架和

兩個(gè)命令按鈕。其中標(biāo)簽1是放在框架內(nèi)。

2011-7-1025

(2)標(biāo)簽1的Caption屬性設(shè)為“公雞五元、

母雞三元、小雞一元錢(qián)三只。100元錢(qián)買(mǎi)

100只雞。問(wèn)公雞、母雞、小雞各多少

只？”標(biāo)簽2■標(biāo)簽4的Caption屬性分別設(shè)

置為“公雞”、“母雞”、“小雞”。

如下圖所示。

?百錢(qián)買(mǎi)百雞

公雞母雞：小雞

計(jì)算

公雞每只五元、母雞每月三

兀、小雞三只一兀；100兀錢(qián)

買(mǎi)100只雞，問(wèn)公雞、母雞、退出

小雞各多少只？

2011-7-1026

(3)代碼編寫(xiě)如下：

編寫(xiě)單擊命令按鈕“計(jì)算”所執(zhí)行的代碼如下。

PrivateSubCommandl_Click()

Listl.ClearFormat

是格式化

Forx=1To19，外循環(huán)求公雞數(shù)二個(gè)表達(dá)

Fory=1To33，內(nèi)循環(huán)求母雞數(shù)工IO

z=100-x-y，小雞數(shù)

If5*x+y*3+z/3=100Then

p=Format(x,n@@@n)&Format(y,_

"@@@@@@")&Format(z,

2011-7-1027

Rem把滿(mǎn)足條件的一種情況添加到列表框中。

Listl.Additempk

EndIf在列表框中

使用、

NextyAdditem方

Nextx法添加項(xiàng)目

EndSub

編寫(xiě)單擊命令按鈕“退出”所執(zhí)行的代碼如下。

PrivateSubCommand2_Click()

End

EndSub

2011-7-1028

(4)運(yùn)行結(jié)果。按F5鍵運(yùn)行工程出現(xiàn)運(yùn)

行界面后按“計(jì)算”按鈕后，得到結(jié)果

如下圖所示。

0Jx

公雞母雞小雞

41878

81181

I12484

公雞每只五元、母雞每兄三

兀、小雞三只一兀；100兀錢(qián)

買(mǎi)100只雞，問(wèn)公雞、母雞、退出

小雞各多少只？

圖4?17百錢(qián)買(mǎi)百雞問(wèn)題的運(yùn)行結(jié)果

2011-7-1029

［例4?10］在窗體上輸出下列圖案

-Forml

<1?“■■/a^?

?丫??丫??[??丫?,丫??],?丫?.丫?rj??T?

行?4,，丫?

■[■?Tw?T,??1?*T?■[?*T■*T??[■■]-

■].“■■[■■[■■]■■[■4].d]■

4,?磨rj??[■?[■?丫?<rj.?[■■]■,7?

?丫??丫.■Y'B

■[■.Te?^w.丫..丫.?Tw■1??[??]?

〃?0】?q.q.“■”■.卜“■

?小

〃??LB

,丫??T、?丫?,T'?磨

yik^B■妖.L

?丫?,]■?yww^irjw

??I?一???????????《?…?.]

4]■“■^L?.[■■],4]，

:輸出圖案:q.*p?*],■，丫?*T*'T*.T.?T?

2011-7-1030

問(wèn)題分析：

該圖案共有十行，每行有十個(gè)星號(hào)。要

想輸出該圖案應(yīng)使用For循環(huán)結(jié)構(gòu)，可以先用

變量a存放這十個(gè)星號(hào)。使用語(yǔ)句：

a=***********”

由于要輸出的是一個(gè)平行四邊形，每一

行的起始位置比上一行位置多2列。因此要使

用Tab函數(shù)來(lái)確定每一行輸出的起始位置。

語(yǔ)句PrintTab(2*i);表示從第2*i列開(kāi)

始輸出內(nèi)容。編寫(xiě)代碼如下：

2011-7-1031

OptionExplicit

PrivateSubCommandl_Click()

DimaAsString,iAsInteger,jAsInteger

a=，，**********，，

Forml.FontSize=14

Fori=1To10

PrintTab(2*i);表示從每

Printa一行的第

Nexti2*i列開(kāi)

始輸出變

EndSub量a的值。

2011-7-10

［例4?11］在窗體上輸出下列圖案

2011-7-1033

問(wèn)題分析：

該圖案共有十行，每行有不同的星號(hào)。

第一行有一個(gè)“*”，第二行有三個(gè)“*”，

第三行有五個(gè)……，要想輸出該圖案

應(yīng)使m雙層For循環(huán)結(jié)構(gòu),外層彳后環(huán)決定輸出

的行數(shù)，內(nèi)層循環(huán)決定每行輸出的星號(hào)數(shù)。

可以先用變量a存放一個(gè)星號(hào)。使用語(yǔ)句：

由于要輸出的是一個(gè)等腰三角形，每一

行的起始位置比上一行位置少一列。因此要

使用Tab函數(shù)來(lái)確定每一行的起始位置。

語(yǔ)句PrintTab(18-i);表示從第18-i列開(kāi)始

輸出內(nèi)容。編寫(xiě)代碼如下：

2011-7-1034

編寫(xiě)代碼如下:

OptionExplicit

PrivateSubForm_Click()

DimaAsString

DimiAsInteger,jAsInteger

a=

Forml.FontSize=14

2011-7-1035

Fori=1To10

2011-7-1036

［例4?12］在窗體上輸出乘法九九表

Forml

乘法九九表

*1逑456789

11

224

3369

4481216

5510152025

661218243036

77142128354249

8816243240485664

991827364554637281

2011-7-1037

OptionExplicit

PrivateSubForm_Click()

DimiAsInteger,jAsInteger,kAsInteger

DimmAsInteger

FontSize=12

PrintTab(25);“乘法九九表“

Print:Print輸

出

n

Print;表

Fori=1To9頭

PrintTab(i*6);i;

Nexti

2011-7-10

Print

h

l

'Forj=lTo9內(nèi)

外r

循循

環(huán)Printj;"環(huán)

決決

定Fork=1Toj定

?*

?

J

<PrintTab(k輸

a

6)

共y

輸出

乘

出Nextk

幾積

及

行Print

個(gè)

INextj數(shù)

EndSub

39

2011-7-10

［例4?13］打印下列圖案

■Forml□1x1

****

****

*****

********

********

******

****

*

分析：上面的圖案可分成兩個(gè)等腰三角形。

上面的三角形有5行第1行為一個(gè)…，第

2行為三個(gè)“*”，第3行為五個(gè)……第5行

意2*5”個(gè)…。代碼編寫(xiě)如下頁(yè)所示。,0

OptionExplicit

PrivateSubForm_Click()

DimiAsInteger,jAsInteger

DimaAsString

Fori=1To5、

PrintTab(20-i);輸

Forj=lTo2^i-l出

PrintI上

三

Nextj角

形

Print

Nextij

2011-7-10,

Fori=4To1Step-1

PrintTab(20-i);

Forj=lTo2^i-l

輸

Print出

下

Nextj三

Print角

形

NextiJ

EndSub

2011-7-1042

443DoLoop循環(huán)結(jié)構(gòu)

Do…Loop循環(huán)結(jié)構(gòu)也是常用的循

環(huán)結(jié)構(gòu)。對(duì)于一些無(wú)法事先確定循環(huán)次數(shù)

的程序，可用Do……Loop型循環(huán)結(jié)構(gòu)。

1.它的格式有兩種：

格式L先測(cè)型

Do[While|Until]v條件〉

[V語(yǔ)句組1>]

[ExitDo]

[V語(yǔ)句組2>]

2M99P43

格式2：后測(cè)型

Do

[v語(yǔ)句組1>]

[ExitDo]

[V語(yǔ)句組2>]

Loop[While|Until]v條件〉

2011-7-1044

2.說(shuō)明：

(1)格式1中“DoWhilev條件

>……Loop語(yǔ)句”，是先測(cè)型當(dāng)型

循環(huán)。即先判斷While后面的條件

是否為“真”，如果為“真”則執(zhí)

行循環(huán)體里面的各語(yǔ)句，如果為

“假”，則退出循環(huán)，循環(huán)直到條

件為“假”終止。

2011-7-1045

(2)格式2中“D。...LoopWhilev條

件》語(yǔ)句”是后測(cè)型當(dāng)型循環(huán)。與前

者的區(qū)別在于，它不管條件的真假，

都會(huì)先執(zhí)行“Do”后面的語(yǔ)句，也就是

循環(huán)體，當(dāng)執(zhí)行到LoopWhilev條件〉

語(yǔ)句時(shí)，再判斷＜條件＞的真假，如果

為“真”則返回執(zhí)行循環(huán)體里面的各

語(yǔ)句，如果為“假”，則退出循環(huán)，

循環(huán)直到條件為“假”終止。也就是

說(shuō)，它至少執(zhí)行循環(huán)體一次。

2011-7-1046

在兩種格式中While語(yǔ)句都可以用Until

語(yǔ)句代替，它是直到條件為真時(shí)則終止循

環(huán)。注意While語(yǔ)句后面的條件和Until語(yǔ)

句的條件正好互補(bǔ)。

例如：求5!

如果使用當(dāng)型循環(huán)則While后的條件

是(Nv=5)o

而如果用Until語(yǔ)句，則后面的條件為

(N>5)o為了避免混淆，所以我們建議只

用DoWhile循環(huán)即可。

2011-7-1047

(3)格式中［ExitDo］為可選項(xiàng)，在上面兩種Do

循環(huán)結(jié)構(gòu)中，可以有一個(gè)或多個(gè)ExitDo語(yǔ)句，

以便在滿(mǎn)足一定的條件下，隨時(shí)退出循環(huán)體。

下頁(yè)中分別給出前測(cè)型DoWhile...Loop和

DoUntil...Loop循環(huán)結(jié)構(gòu)的邏輯框圖。同學(xué)們

可自己畫(huà)出后測(cè)型的兩種邏輯框圖。

2011-7-1048

DoUntiL?.Loop循環(huán)邏輯框圖

Do...Loop循環(huán)舉例

【例4-14】任意輸入一個(gè)自然數(shù)，編

程輸出其各個(gè)因子。工程設(shè)計(jì)步驟

如下:

(1)新建“標(biāo)準(zhǔn)EXE”工程，在出現(xiàn)

的界面上添加三個(gè)標(biāo)簽、一個(gè)文本

框、和兩個(gè)命令按鈕如圖4?18所示。

2011-7-10M喝?>1

(2)設(shè)置窗體及控件的屬性。標(biāo)簽1

的Caption屬性為“請(qǐng)輸入一個(gè)自然

數(shù)”；標(biāo)簽2的Caption屬性為“N的

因子是：”；標(biāo)簽3的Caption屬性為

空，在運(yùn)行時(shí)賦值。另外標(biāo)簽3的

Autosize屬性為T(mén)rue,以便在運(yùn)行時(shí)

賦值能根據(jù)實(shí)際內(nèi)容自動(dòng)適應(yīng)。其

他屬性如下頁(yè)圖4-18所示。

2011-7-10)51

圖4?18求自然數(shù)因子的工程界面及屬性設(shè)置

2011-7-1052

圖4?19輸出某個(gè)自然數(shù)y的所有因子流程圖

2011-7-1053

(3)編寫(xiě)代碼如下：

編寫(xiě)單擊命令按鈕“計(jì)算”所執(zhí)行的代碼

PrivateSubCommandl_Click()

DimxAsString,yAsSingle

y=Val(Textl.Text)

i=2

x=，，，，

2011-7-10>154

DoWhiley<>l

IfyModi=0Then

x=x&"*"&Str(i)&Chr(13)

y=y\i

Elseo

i=i+1

EndIf

Loop

LabeB.Caption=x

Labell.Caption=Textl.Text&”的因子是:“

EndSub

2011-7-1055

（4）運(yùn)行結(jié)果。按F5執(zhí)行工程，當(dāng)

出現(xiàn)運(yùn)行界面時(shí)，從文本中輸入一

個(gè)自然數(shù)，然后單擊命令按鈕“計(jì)

算”就會(huì)得到如圖4?20所示的結(jié)果。

即在標(biāo)簽3中輸出了自然數(shù)的各個(gè)因

子相乘的結(jié)果；另外，標(biāo)簽2的內(nèi)容

也根據(jù)輸入的數(shù)自動(dòng)改變?nèi)鐖D4?20

所示。

2011-7-1056

圖4?20求自然數(shù)因子的運(yùn)行結(jié)果

2011-7-10

【例4-15】用牛頓迭代法求方程的根。所求的方程

為:

ex—x=0

分析：用牛頓迭代法求方程。化）=0在瓦附近的實(shí)

根的方法如下。

（1）選一個(gè)接近己的真實(shí)根。；

（2）通過(guò)J求出（X亂）。在幾何中就是作己=