用圖形計算器學(xué)習(xí)程序

用圖形計算器學(xué)習(xí)程序框圖與算法語句問題1設(shè)計“判斷整數(shù)〃（〃＞2）是否為質(zhì)數(shù)刃程序框圖與算法語句.（選自：普通高中課程標(biāo)準(zhǔn)實驗教科書數(shù)學(xué)必修三（人教A版），第6頁，第32頁）1.程序框圖（圖3.M）/輸出％不是質(zhì)數(shù)：//輸出“〃是質(zhì)數(shù)”/(結(jié)束j圖3?1?12.程序編制??N2TWhileMOD(N,I)HOI+—IWhileEndIfIMNThen“YEN”Else“NO”IfEnd“END”學(xué)習(xí)參考（1）循環(huán)語句循環(huán)語句的格式有多種，下面介紹的叫做當(dāng)型循環(huán).當(dāng)型循環(huán)的基本格式是：While條件循環(huán)體WhileEnd當(dāng)計算器執(zhí)行上述語句時，先判斷條件的真假，如果條件得到滿足，就執(zhí)行循環(huán)體（由

計算器反復(fù)執(zhí)行的一組語句構(gòu)成的）.然后再檢査條件是否得到滿足，如果仍滿足條件，則再次執(zhí)行循環(huán)體.這個過程反復(fù)進(jìn)行，直到某一次條件不符合為止.這時，計算器將不再執(zhí)行循環(huán)體，而跳出該循環(huán)語句，執(zhí)行后續(xù)語句.其他格式的循環(huán)在后面涉及時再介紹.（2）條件語句條件語句的基本格式是：If條件Then語句體1Else語句體2IfEnd當(dāng)計算器執(zhí)行上述語句時,判斷先If后的條件是否滿足.如果滿足該條件，那么（Then）執(zhí)行語句體1,否則（Else）執(zhí)行語句體2.其中，Else及其后面的語句是可選部分.如果沒有這部分，則當(dāng)條件不符合時，計算器將跳過Then及其后面的語句體1,自動結(jié)束條件語句，繼續(xù)執(zhí)行IfEnd后的語句.條件語句也可以是下列格式If條件Then語句體IfEnd［操作步驟］（1） 在主菜單（MENU）窗口，按g鍵，進(jìn)入程序列表窗口.按6新建一個程序.（2） 如圖3.1-2,輸入文件名ZHISHU（質(zhì)數(shù)），按1,進(jìn)入程序編輯狀態(tài).（圖3.1?3）（3）按L、。（PRGM）,如圖3.1-4,出現(xiàn)可供選擇的語句等符號.（4）按（4）按r,輸入問號.按b鍵輸入箭頭入下一行?再輸入字母N,按1,完成這一行的編輯進(jìn)圖3.1-3圖3.1-2（5）同法輸入圖3.1-3圖3.1-2（5）同法輸入2-1,按1.: ZHISHU，三filZHISHU2T2WhileMOD(N,I)圖3.1-4 圖3.1-5（6） 按q（命令）、U（下頁），U（下頁），再按q,輸入While.（WhileEnd也在此輸入）（7） 按i,u（下頁），r（數(shù)字），u（下頁），r,輸入MOD符號.如圖3.1-5,編輯成為MOD（N,I）.按d退出.（8）按L、o（PRGM）,再按u（下頁），e（相關(guān)），w,輸入不等號（H）.（圖3.1-6）.然后完成這一行的編輯，按1.

■ZHISHU皋?今火2■ZHISHU皋?今火2譏eWhileM0D(N,1)*01衛(wèi)丨〉< | 2w國:. ~~ZHISHU~|?TN€2->1^WhileM0D(N,1)*0^I+2IeWhileEnd^Ifl2NeIfiThenlElseHfEn(圖3.1-6 圖3.1-7提示：按L,4(CATALOG),可以輸入函數(shù)、不等號等各種符號.(MOD也可在此輸入?)這是一個終極解決辦法，但是，有時比較費時間.(9)如圖3.1-7,圖3丄8所示，接著輸入，直至完成?圖3.1-8 圖3.1-9輸入完成后按d,退出程序編輯狀態(tài).(圖3.1?9)按5執(zhí)行程序.輸入一個大于2的正整數(shù).如圖3.1-10,輸入13,按:L.顯示“YES”，表示該正整數(shù)是質(zhì)數(shù).若顯示“NO”，則表示該正整數(shù)不是質(zhì)數(shù).ORSiTn05JO2HISHUss3E?1Y圖3.1-10各種符號輸入方法參考：(1)在圖3.1?3狀態(tài)下，按u(字符)，進(jìn)入字符選擇窗口.(圖3.1-11)血-x”*/"<>4-士殆a《?ieE7ioor/2n；jJ^aoi23456789-1+-0120123A56789-i+-xn3xy^p^Z°°rEemcmunungpy左QD0omi_V人丄三 IIH"▽????.?'l壬隼選擇. r0￡n￥§??aQ-nx?[jjQSHHg目GT個尺刁宙0? ?t>彖[]xoenao^^s??①②③⑥⑤⑥⑦???圖3.1-11 圖3.1-12按w(符號)，如圖3.1-12,還可以輸入其他符號.在程序編輯狀態(tài)下，按L、o(PRGM).圖3.1-13,這里有編制程序所需要的語句符號.(按U,下頁還有)圍- iiZHISHUIfIAN。Then”YES*Else"NOWIfEnde"END%圖3.1J3按q（命令），如圖3.1-14,這里有If,Then,Else等各種語句符號.H一一'ZHISHUIfI>N^Then"YESWElse"NOWIfEnde"END"eI[f[ThenElseHfEnd]圖3.1?14提示：“If”是一個完整的符號，不是分開單獨輸入的兩個字符.按d回到上頁.在圖3.1?13狀態(tài)，按w（控制），如圖3.1-15,這里有各種用于控制的語句?按d回到上頁.圖3.1-15在圖3.1J3狀態(tài)，按e（轉(zhuǎn)移），如圖3.1-16,這里有各種用于轉(zhuǎn)移的語句.按d回到上頁.HZHISHUIfI>N^Then"YES跟Else"NCTeIfEndo"END*Lbl^Ertol=?IszIDsziMenuS3.1-16在圖3?1?13狀態(tài)，按u,進(jìn)入下頁.a‘―——_ZHISHU:IfI>N^Then,,YES,,<J IElse"NO'yIfEnd?"ENDW圖3.1-17如圖3.1?17所示，按q（消除）.如圖3.1-18,這里有各種用于淸除的語句.（按q會顯示ClrText,此功能是清除程序結(jié)果顯示框中之前顯示的文本?）按d回到上一窗口.

n_F2HI^HU IIfIANc IThen”YES*Else”NO*IfEnd毛"END"e[TextlGraphlList]Mat圖3.1-18在圖3.1?17狀態(tài)，按w(顯示)，如圖3.1-19,這里有各種用于顯示的語句.按d回到上一窗口.I跌鮭3HI跌鮭3 ZHISHUIfI2N&Then”YES*Else”NOWIfEnd^[StatIGraph]Dyna[功能表[StatIGraph]Dyna[功能表在圖3.1?17狀態(tài)，按e(相關(guān)人如圖3.1-20,這里有各種聯(lián)結(jié)量與量之間相關(guān)的各種符< 2S號.按d回到上一窗口?< 2SIfIANeThen"YES%Else"NOWIfEnde"END’y圖3.1-20在圖3.1J7狀態(tài)，按r(I/O),如圖3.1-21,這里有接收.發(fā)送等各種用于交換的符號.11 乙nionu——If"NeThen”YES'VElse"NO*IFEnde”ENDWILocateiGetkeylSendIReceive^H1t>輸入提示：輸入的字母要大寫.即每次輸入字母前要按下a鍵，然后按字母鍵相應(yīng)所在的鍵.文件名只可使用下列字符：A至Z,r,0,空格，［,},，,”，?，0至9,+>—>X,4-.文件名的長度不能超過8個字符.引號輸入的方法是，按a,6輸入“？”的作用是接受用戶輸入變量的值.按鍵盤上的b輸入“?”符號(賦值語句).”即將輸入的值賦給“f”后的變S.“：”是多語句命令.其作用是連接兩個語句，不間斷地依序執(zhí)行.多語句命令可以用于連接兩個計算表達(dá)式或者兩個命令.也可以按下1,即回車，用其替代多語句命令.(8)輸入符號(輸出)的方法是，按L,。(PRGM),y.問題2任意給定三個正實數(shù)，判斷以這3個正實數(shù)為三條邊邊長的三角形是否存在.畫出程序框圖，并編制程序.(選自：普通高中課程標(biāo)準(zhǔn)實驗教科書數(shù)學(xué)必修三(人教A版)，第10頁)1.程序框圖(圖3.1-22).2.程序編制??A??B?CIfA+B>CAndB+C>AAndC+A>BThen“YEN”Else“NO”IfEnd“END”［操作步驟］在主菜單(MENU)窗口，按g鍵，進(jìn)入程序列表窗口.按e,新建一個程序.輸入文件名SANJIAO(三角)，按1.輸入？-A,?-B,?fC,每次完成后按1.按L、o(PRGM),按q(命令)、q,輸入If.提示：Then,Else,IfEnd都在此輸入.編輯成IfA+B>CAndB+C>AAndC+A>B.最后按1.提示：其中And的輸入方法是，按i,U(下頁)，U(下頁)，r(邏輯符)，q(And).如圖3.1-23至圖3.1?24所示.輸入完成后反復(fù)按①退出程序編輯狀態(tài)，直到出現(xiàn)“程序列表少窗口.

圖3.1-23: SANJIAO「 三圖3.1-23dC+A>B?JThen”YES*Else”NOyIfEndo”END*圖3.1-24（11） 按q（注意SANJIAO這個程序要處于選中狀態(tài)），執(zhí)行程序.（12） 輸入3個實數(shù)?如圖3.1-25,分別輸入3,4,8,每次輸入后都按1.1=1Q?冋SANJIAO(Radi[Norn-J0&lBe3|SAHJIAO?39?4?8DON3?4?8NE（13）顯示"NO”,則表示這3個正實數(shù)不能作為一個三角形的三條邊邊長?若顯示"YES”,1=1Q?冋SANJIAO(Radi[Norn-J0&lBe3|SAHJIAO?39?4?8DON3?4?8NE圖3.1-26圖圖3.1-26問題3畫出求解一元二次方程ax2+bx+c=0程序框圖，并編制程序.（選自：普通高中課程標(biāo)準(zhǔn)實驗教科書數(shù)學(xué)必修三（人教A版），第12頁，第27頁）1-程序框圖（見下頁，圖3.1-27）2.程序編制?fA?—B??CBA2-4AC-SIfS<0Then“NOREALSOLUTION.”Else-B4-(2XA)~P-V(S)-r(2XA)fQIfS=OThenPJElse“Xl=”：P+QJ“X2=SP-QJIfEndIfEnd“END”

圖3.1-27［操作步驟］在主菜單(MENU)窗口，按g鍵，進(jìn)入程序列表窗口.按e,新建一個程序.輸入文件名QIU.JIE(求解)，按1.語句輸入如圖3.1-28至圖3.1-30所示.圖3.1-30圖3.1-31圖3.1-30圖3.1-31S1ilQIUJ1E 耳 QIUJIE Then"NOREALSOLUTIO?TB它N.WElse&Bzs2-4xAxC->S?j?B￥(2xa)tp&IfSCO乞J(S2(2xA)9QeThen"NOREALSOLUTIOIfS=0^1戲叭|［底祁］■涎■■涎立1Ana圖3.1-28 圖3.1-29

提示：圖3.1-30中的目號可以按L,o,u(下頁)，y,輸入.輸入完成后反復(fù)按d,退出程序編輯狀態(tài)，直到出現(xiàn)“程序列表”窗口.按q(注意QIUJIE這個程序要處于選中狀態(tài))，執(zhí)行程序.輸入3個實數(shù).如圖3.1-31,分別輸入1,一3,-4,每次輸入后都按1.如圖3.1-32,顯示Xl=4,X2=-l.啟 1心01百麗J)(3?刁【R/QIUJIEg |5葉1|匝)畫QIUJIE9-4■4Xl=9?44X2=X=-12一Disp一一Disp-圖3.1-32 圖3.1-33輸入3個實數(shù)1,-4,4,如圖3.1-33,輸出X=2.［探究與發(fā)現(xiàn)］在問題3中去掉“一元二次方程”這個限制，改為畫出解方程處2+bx+c=0的程序框圖，并編制程序.(供有興趣的同學(xué)探究)h程序框圖程序框圖的前半部分如圖3.1?34所示，“/=0?”下面的部分請參考圖3.1-27.圖3.1-342.程序編制IfAHOThenBA2-4AC->SIfS<0Then“NOREALSOLUTION.”Else-B十(2XA)fP

—J(S)十(2XA)~QIfS=OThenPJElse“Xl=”：P+QJ“X2=SP-QJIfEndIfEndElseIfBHOThen“X=”：-C/B^ElseIfCHOThen“NOSOLUTION.”Else“ALLREAL.”IfEndIfEndIfEnd“END”［操作步驟］在主菜單(MENU)窗口，按g鍵，進(jìn)入程序列表窗口.如圖3.1-35,選中QIUJIE(求解)這個文件，u(下頁)，w(更名).如圖3.1-36,把文件名改為QIUJIE02(求解02),按1.以便在之前的解一元二次方程的程序基礎(chǔ)上作修改.語句輸入如圖3.1-37至圖3.1-41所示.IUJIEj^ANJIAOo248筒UJIE02]Uzhishu242989LAw圖3.1-36圖3.1-35Then”翻SOLUTIolIfA*0^IUJIEj^ANJIAOo248筒UJIE02]Uzhishu242989LAw圖3.1-36圖3.1-35Then”翻SOLUTIolIfA*0^ThenB/^2-4xAxC^S<JIfS<0^Else乞-B-r(2xA)^P?J/(S)v(2xA)^Q<JIfS=0e圖3.1-38圖圖3.1-38輸入完成后反復(fù)按①退出程序編輯狀態(tài)，直到出現(xiàn)“程序列表”窗口.按q(注意QIUJIE02這個程序要處于選中狀態(tài))，執(zhí)行程序.分別輸入1,-3,-4,每次輸入后都按:L.如圖3.1-42,顯示Xl=4,X2=-l.

H . QITOIE02 1Then ：P,Else&W=”：P+Q,"X2二”：P_Q,IfEndeIfEndeI疋毎葫1■甑A(chǔ)oaI莊H . QITOIE02 1Then ：P,Else&W=”：P+Q,"X2二”：P_Q,IfEndeIfEndeI疋毎葫1■甑A(chǔ)oaI莊3屐?■ .~ :QIUJIE02一臺E1se&IfB#0eThen"X—C-B,ElseeIf00?Then"NOSOLUTION.I頂瓠IT底獷Audi圖3.1-39IB ■：QIUJIE02^^^^Else"ALLREAL?WIfEndeIfEndeIfEnde"ENDWI頂部『底芮■滋鼻嚶整■gaI話3圖3.1-42圖3.1-40iId/cIlReallQIUJIE■4Xl=4X2=-1一Disp一圖3.1-41分別輸入()，0,1,每次輸入后都按1.如圖3.1-44,顯示無解.匪畫QIUJIE02=匪畫QIUJIE02=?2?lx9■090SHS31QIUJIEO2留嚴(yán)UTION.0SHS31QIUJIEO2圖3.1-43 圖3.1-44」LLN圍o?o?oAEHHQIUJIE02REAL.(10)分別輸入0,0,0,每次輸入后都按1.如圖」LLN圍o?o?oAEHHQIUJIE02REAL.圖3.1?45以上的多次執(zhí)行程序未出差錯，也驗證了程序編制是準(zhǔn)確無誤的.學(xué)習(xí)參考在這個程序中運用了多重語句嵌套?條件語句的基本格式是：If條件Then語句體1Else語句體2IfEnd值得注意的是，這里的語句體1、語句體2都可以又是一個完整的條件結(jié)構(gòu).比如If條件ThenIf條件Then語句體3Else語句體4IfEndElseIf條件Then語句體5Else語句體6IfEndIfEnd這里的語句體3、語句體4都可以是一個完整的條件結(jié)構(gòu)，等等.靈活運用結(jié)構(gòu)嵌套可以解決較為復(fù)雜的條件問題.問題4畫出計算1+2+3+?“+”的程序框圖，并編制程序.（其中〃由用戶給出）（選自：普通高中課程標(biāo)準(zhǔn)實驗教科書（人教A版）數(shù)學(xué)必修三，第13?15頁）?當(dāng)型循環(huán)1.程序框圖（圖3.1-46）圖3.1-462.程序編制（程序名為QIUHE,即求和?）?-N（接受用戶輸入正整數(shù)〃）1-*1 （記步）0-S （記和）WhileIWNS+I-SI+1—IWhileEndSJ （顯示和S）

［操作步驟］在主菜單(MENU)窗口，按g鍵，進(jìn)入程序列表窗口.按e,新建一個程序.輸入文件名QIUHE(求和)，按1,進(jìn)入程序編輯狀態(tài).依圖3.1-47,圖3丄48所示，輸入語句，編制程序.[D?TNG1TIGO—SeWhileI<N^S+ZSe[D?TNG1TIGO—SeWhileI<N^S+ZSeI+1T2QIUHE檢翕」菜單； 一QIUHEWhileIWNeS+I-SeI+lTicWhileEnd^S’圖3.1-47 圖3.1-48輸入完成后按d,退出程序編輯狀態(tài).按q,執(zhí)行程序.如圖3.1-49,輸入100,按1.顯示結(jié)果為5050.eg?l両eg?l両Id/cIlReallQIUHE5050-Disp-圖3.1-49?直到型循環(huán)1.程序框圖(圖3.1-50)③始J/輸!/s=s+z7=7+1圖3.1-50

③始J/輸!/s=s+z7=7+1圖3.1-502.程序編制（程序名為QIUHE02.）??N（IS1->IDo （進(jìn)入循環(huán)體）S+I-SI+lflLpWhileIWN （指出控制條件）SJ［操作步驟］（1） 在主菜單（MENU）窗口，按g鍵，進(jìn)入程序列表窗口.按e,新建一個程序.（2） 輸入文件名QIUHE02（求和），按1,進(jìn)入程序編輯狀態(tài).圖3.1-51編制程序.圖3.1-52圖3.1-51編制程序.圖3.1-52［探究與發(fā)現(xiàn)］1.用直到型循環(huán)編制求等差數(shù)列前〃項的和.程序如下.“Al=”：??A“D=”：?—D“N=”：?—N1->I0~SDo （進(jìn)入循環(huán)體）S+AfSA+DfAI+1TLpWhileIWN（指出控制條件）SJ2.Foi?型循環(huán).在循環(huán)語句中還有一種叫做“For型循環(huán)”.其一般格式是：For把起始值賦給變量To變量終值Step變量變化步長語句體Next （結(jié)束語句）

例用“For型循環(huán)”語句編制計算1+2+3+…+〃的程序.程序編制（程序名為QIUHE03,即求和03.）?-*N（輸M）0-S （記和）For1-1ToN（把變量啲起始值1賦給ITo終值N.步長為1可以省略）S+I—SNext （結(jié)束語句）SJ提示：在圖3.1?53中，因為步長為1,所以被省略.1~QIUHE032NGForWIToNeS+2SeNexteForIToIStepINextS,ForIToIStepINext圖3.1-53卜面是求l+3+5+“?+（2//—1）的程序：?-*N（輸入〃）?-K（輸入步長）0-*S （記和）Forl-IToNSetpK（注意這個的輸入格式）S+I-SNext （結(jié)束語句）SJ“END”［操作步驟］（1） 在主菜單（MENU）窗口，按g鍵，進(jìn)入程序列表窗口.按s新建一個程序.（2） 輸入文件名QIUHE04（求和），按1,進(jìn)入程序編輯狀態(tài).（3） 依圖3.1-54,圖3.1?55所示，輸入語句，編制程序.圖3.1-54 圖3.1-55（4） 輸入完成后按d,退出程序編輯狀態(tài).（5） 按q,執(zhí)行程序.（6） 如圖3.1-56,依次輸入15,2,按1.顯示結(jié)果為64.即1+3+5+???+15=64.

Q嗣IFM1fd7cllReai]QIUHE04is64-Disp-圖3.1-56更一般地，變量起始值也可以由用戶輸入.比如?A（輸入起始值A(chǔ)）?—N（輸入終值N）?fK（輸入步長K）0S（記和）ForAfIToNSetpKS+I—SNext （結(jié)束語句）SJ“END”問題5編寫程序，使任意輸入的3個整數(shù)按從大到小的順序輸出.（選自：普通高中課程標(biāo)準(zhǔn)實驗教科書（人教A版）數(shù)學(xué)必修三，第27頁）1.程序框圖（圖3.1-57）圖3.1-572.程序編制（程序名為PAIXU,即排序.）?fA?fB?fCIfB>A（A,B交換，但與C無關(guān)）987987ThenA-*TB—ATfBIfEndIfC>A（A,C?交換，但與〃無關(guān)）ThenA~TCfAT—CIfEndIfC>B（C,B交換，但與A無關(guān)）ThenB~TC-BTfCIfEndAJCA“END”［操作步驟］(1)程序編制.(圖3.1-58至圖3.1-61)?TA&IfB>A《ThenA?TeB->A^PAIXU圖3.1-58?PAIXUT?BeIfEndeIfC>ACThenA->T^SAe?TA&IfB>A《ThenA?TeB->A^PAIXU圖3.1-58?PAIXUT?BeIfEndeIfC>ACThenA->T^SAePAIXU:T^CeI及笳［壓飛門■羅*圖3.1-59: -PAIXUIfEndeIfC>BGThenB?TeSBeIfEnde[頂笳in^J/JEABC”?'底部頂圖3.1-60（2）執(zhí)行程序.如圖3.1-62,輸入7,&10,輸出12,lb10.圖3.1-619,輸出9,8,7.圖3.1-63,輸入11,12,IKWBJ03畫PAIXUIKWBJ03畫PAIXU8?9[UkdlSomllH/cIReatPAIXUI3F?10121110一Disp一圖3.1-63圖圖3.1-63問題6借助計算器或計算機，用二分法求方程0?8*—1眥+2=0根的近似解（精確度為0.0001）.（根據(jù)普通高中課程標(biāo)準(zhǔn)實驗教科書（人教A版）數(shù)學(xué)必修一，第92頁，習(xí)題3.1,A組，第4題，以及必修三，第18頁稍有改編）1.程序框圖（圖3.1-64）圖3.1-64圖3.1-642.程序編制（程序名為ERFENFA,即二分法?）ClrGraph （消除繪圖窗口其他存在的圖形）（繪制函數(shù)圖象）（給出區(qū)間左端點值）（給出區(qū)間右端點值）（給出區(qū)間精確度）111B+2）<0Viewwindow—（繪制函數(shù)圖象）（給出區(qū)間左端點值）（給出區(qū)間右端點值）（給出區(qū)間精確度）111B+2）<0GraphY=0.8x—liix+2“ZUO,A=w：?—A“YOU,B=”：??B“JINGDU,D=”：?~DIf(0?8八一lnA+2)X(0.8〃ThenWhileabs(A-B)>D(A+B)/2~MIf0?87iiM+2=0ThenMfAEndlfIf(0.8A/-ln;Vf+2)X(0.84-1114+2)<0

ThenM—BElseAEndlfEndWhileEndlfMJ“END”［操作步驟］（1）程序編制.（圖3.1?65至圖3丄69）-ERFENFA^^^^-ERFENFA^^^^ClrGraph^ViewWindow,4,leGraphY=0<8"x-lnx+2e"ZUO,A="：?TAQ"YOU,B="：?tBca: 主ERFENFA— 2"JINGDUIf(0.8八A-lnA+2)x(0?8^B-lnB+2)<0eTheneWhileAbs(A-B)>M(A+B)于2?MeI代祁||~B甫1?躍莎艮141A^a圖3.1-65圖3.1-65圖3.1-66S ERFENFAIf0.8^M-lnM+2=0eT