用图形计算器学习程序

用图形计算器学习程序框图与算法语句问题1设计“判断整数〃（〃＞2）是否为质数刃程序框图与算法语句.（选自：普通高中课程标准实验教科书数学必修三（人教A版），第6页，第32页）1.程序框图（图3.M）/输出％不是质数：//输出“〃是质数”/(结束j图3・1・12.程序编制?〜N2TWhileMOD(N,I)HOI+—IWhileEndIfIMNThen“YEN”Else“NO”IfEnd“END”学习参考（1）循环语句循环语句的格式有多种，下面介绍的叫做当型循环.当型循环的基本格式是：While条件循环体WhileEnd当计算器执行上述语句时，先判断条件的真假，如果条件得到满足，就执行循环体（由

计算器反复执行的一组语句构成的）.然后再检査条件是否得到满足，如果仍满足条件，则再次执行循环体.这个过程反复进行，直到某一次条件不符合为止.这时，计算器将不再执行循环体，而跳出该循环语句，执行后续语句.其他格式的循环在后面涉及时再介绍.（2）条件语句条件语句的基本格式是：If条件Then语句体1Else语句体2IfEnd当计算器执行上述语句时,判断先If后的条件是否满足.如果满足该条件，那么（Then）执行语句体1,否则（Else）执行语句体2.其中，Else及其后面的语句是可选部分.如果没有这部分，则当条件不符合时，计算器将跳过Then及其后面的语句体1,自动结束条件语句，继续执行IfEnd后的语句.条件语句也可以是下列格式If条件Then语句体IfEnd［操作步骤］（1） 在主菜单（MENU）窗口，按g键，进入程序列表窗口.按6新建一个程序.（2） 如图3.1-2,输入文件名ZHISHU（质数），按1,进入程序编辑状态.（图3.1・3）（3）按L、。（PRGM）,如图3.1-4,出现可供选择的语句等符号.（4）按（4）按r,输入问号.按b键输入箭头入下一行・再输入字母N,按1,完成这一行的编辑进图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（数字），u（下页），r,输入MOD符号.如图3.1-5,编辑成为MOD（N,I）.按d退出.（8）按L、o（PRGM）,再按u（下页），e（相关），w,输入不等号（H）.（图3.1-6）.然后完成这一行的编辑，按1.

■ZHISHU皋?今火2■ZHISHU皋?今火2讥eWhileM0D(N,1)*01卫丨〉< | 2w国:. ~~ZHISHU~|?TN€2->1^WhileM0D(N,1)*0^I+2IeWhileEnd^Ifl2NeIfiThenlElseHfEn(图3.1-6 图3.1-7提示：按L,4(CATALOG),可以输入函数、不等号等各种符号.(MOD也可在此输入・)这是一个终极解决办法，但是，有时比较费时间.(9)如图3.1-7,图3丄8所示，接着输入，直至完成・图3.1-8 图3.1-9输入完成后按d,退出程序编辑状态.(图3.1・9)按5执行程序.输入一个大于2的正整数.如图3.1-10,输入13,按:L.显示“YES”，表示该正整数是质数.若显示“NO”，则表示该正整数不是质数.ORSiTn05JO2HISHUss3E?1Y图3.1-10各种符号输入方法参考：(1)在图3.1・3状态下，按u(字符)，进入字符选择窗口.(图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,还可以输入其他符号.在程序编辑状态下，按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状态，按w（控制），如图3.1-15,这里有各种用于控制的语句•按d回到上页.图3.1-15在图3.1J3状态，按e（转移），如图3.1-16,这里有各种用于转移的语句.按d回到上页.HZHISHUIfI>N^Then"YES跟Else"NCTeIfEndo"END*Lbl^Ertol=»IszIDsziMenuS3.1-16在图3・1・13状态，按u,进入下页.a‘―——_ZHISHU:IfI>N^Then,,YES,,<J IElse"NO'yIfEnd?"ENDW图3.1-17如图3.1・17所示，按q（消除）.如图3.1-18,这里有各种用于淸除的语句.（按q会显示ClrText,此功能是清除程序结果显示框中之前显示的文本・）按d回到上一窗口.

n_F2HI^HU IIfIANc IThen”YES*Else”NO*IfEnd毛"END"e[TextlGraphlList]Mat图3.1-18在图3.1・17状态，按w(显示)，如图3.1-19,这里有各种用于显示的语句.按d回到上一窗口.I跌鮭3HI跌鮭3 ZHISHUIfI2N&Then”YES*Else”NOWIfEnd^[StatIGraph]Dyna[功能表[StatIGraph]Dyna[功能表在图3.1・17状态，按e(相关人如图3.1-20,这里有各种联结量与量之间相关的各种符< 2S号.按d回到上一窗口•< 2SIfIANeThen"YES%Else"NOWIfEnde"END’y图3.1-20在图3.1J7状态，按r(I/O),如图3.1-21,这里有接收.发送等各种用于交换的符号.11 乙nionu——If"NeThen”YES'VElse"NO*IFEnde”ENDWILocateiGetkeylSendIReceive^H1t>输入提示：输入的字母要大写.即每次输入字母前要按下a键，然后按字母键相应所在的键.文件名只可使用下列字符：A至Z,r,0,空格，［,},，,”，〜，0至9,+>—>X,4-.文件名的长度不能超过8个字符.引号输入的方法是，按a,6输入“？”的作用是接受用户输入变量的值.按键盘上的b输入“〜”符号(赋值语句).”即将输入的值赋给“f”后的变S.“：”是多语句命令.其作用是连接两个语句，不间断地依序执行.多语句命令可以用于连接两个计算表达式或者两个命令.也可以按下1,即回车，用其替代多语句命令.(8)输入符号(输出)的方法是，按L,。(PRGM),y.问题2任意给定三个正实数，判断以这3个正实数为三条边边长的三角形是否存在.画出程序框图，并编制程序.(选自：普通高中课程标准实验教科书数学必修三(人教A版)，第10页)1.程序框图(图3.1-22).2.程序编制?〜A?〜B?CIfA+B>CAndB+C>AAndC+A>BThen“YEN”Else“NO”IfEnd“END”［操作步骤］在主菜单(MENU)窗口，按g键，进入程序列表窗口.按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所示.输入完成后反复按①退出程序编辑状态，直到出现“程序列表少窗口.

图3.1-23: SANJIAO「 三图3.1-23dC+A>B«JThen”YES*Else”NOyIfEndo”END*图3.1-24（11） 按q（注意SANJIAO这个程序要处于选中状态），执行程序.（12） 输入3个实数•如图3.1-25,分别输入3,4,8,每次输入后都按1.1=1Q®冋SANJIAO(Radi[Norn-J0&lBe3|SAHJIAO?39・4?8DON3?4?8NE（13）显示"NO”,则表示这3个正实数不能作为一个三角形的三条边边长•若显示"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程序框图，并编制程序.（选自：普通高中课程标准实验教科书数学必修三（人教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键，进入程序列表窗口.按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,输入.输入完成后反复按d,退出程序编辑状态，直到出现“程序列表”窗口.按q(注意QIUJIE这个程序要处于选中状态)，执行程序.输入3个实数.如图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个实数1,-4,4,如图3.1-33,输出X=2.［探究与发现］在问题3中去掉“一元二次方程”这个限制，改为画出解方程处2+bx+c=0的程序框图，并编制程序.(供有兴趣的同学探究)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键，进入程序列表窗口.如图3.1-35,选中QIUJIE(求解)这个文件，u(下页)，w(更名).如图3.1-36,把文件名改为QIUJIE02(求解02),按1.以便在之前的解一元二次方程的程序基础上作修改.语句输入如图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输入完成后反复按①退出程序编辑状态，直到出现“程序列表”窗口.按q(注意QIUJIE02这个程序要处于选中状态)，执行程序.分别输入1,-3,-4,每次输入后都按:L.如图3.1-42,显示Xl=4,X2=-l.

H . QITOIE02 1Then ：P,Else&W=”：P+Q,"X2二”：P_Q,IfEndeIfEndeI疋毎葫1■甑AoaI庄H . QITOIE02 1Then ：P,Else&W=”：P+Q,"X2二”：P_Q,IfEndeIfEndeI疋毎葫1■甑AoaI庄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留严UTION.0SHS31QIUJIEO2图3.1-43 图3.1-44」LLN圍o?o?oAEHHQIUJIE02REAL.(10)分别输入0,0,0,每次输入后都按1.如图」LLN圍o?o?oAEHHQIUJIE02REAL.图3.1・45以上的多次执行程序未出差错，也验证了程序编制是准确无误的.学习参考在这个程序中运用了多重语句嵌套•条件语句的基本格式是：If条件Then语句体1Else语句体2IfEnd值得注意的是，这里的语句体1、语句体2都可以又是一个完整的条件结构.比如If条件ThenIf条件Then语句体3Else语句体4IfEndElseIf条件Then语句体5Else语句体6IfEndIfEnd这里的语句体3、语句体4都可以是一个完整的条件结构，等等.灵活运用结构嵌套可以解决较为复杂的条件问题.问题4画出计算1+2+3+・“+”的程序框图，并编制程序.（其中〃由用户给出）（选自：普通高中课程标准实验教科书（人教A版）数学必修三，第13・15页）•当型循环1.程序框图（图3.1-46）图3.1-462.程序编制（程序名为QIUHE,即求和・）?-N（接受用户输入正整数〃）1-*1 （记步）0-S （记和）WhileIWNS+I-SI+1—IWhileEndSJ （显示和S）

［操作步骤］在主菜单(MENU)窗口，按g键，进入程序列表窗口.按e,新建一个程序.输入文件名QIUHE(求和)，按1,进入程序编辑状态.依图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,退出程序编辑状态.按q,执行程序.如图3.1-49,输入100,按1.显示结果为5050.eg?l両eg?l両Id/cIlReallQIUHE5050-Disp-图3.1-49•直到型循环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 （进入循环体）S+I-SI+lflLpWhileIWN （指出控制条件）SJ［操作步骤］（1） 在主菜单（MENU）窗口，按g键，进入程序列表窗口.按e,新建一个程序.（2） 输入文件名QIUHE02（求和），按1,进入程序编辑状态.图3.1-51编制程序.图3.1-52图3.1-51编制程序.图3.1-52［探究与发现］1.用直到型循环编制求等差数列前〃项的和.程序如下.“Al=”：?〜A“D=”：?—D“N=”：?—N1->I0~SDo （进入循环体）S+AfSA+DfAI+1TLpWhileIWN（指出控制条件）SJ2.Foi•型循环.在循环语句中还有一种叫做“For型循环”.其一般格式是：For把起始值赋给变量To变量终值Step变量变化步长语句体Next （结束语句）

例用“For型循环”语句编制计算1+2+3+…+〃的程序.程序编制（程序名为QIUHE03,即求和03.）?-*N（输M）0-S （记和）For1-1ToN（把变量啲起始值1赋给ITo终值N.步长为1可以省略）S+I—SNext （结束语句）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 （结束语句）SJ“END”［操作步骤］（1） 在主菜单（MENU）窗口，按g键，进入程序列表窗口.按s新建一个程序.（2） 输入文件名QIUHE04（求和），按1,进入程序编辑状态.（3） 依图3.1-54,图3.1・55所示，输入语句，编制程序.图3.1-54 图3.1-55（4） 输入完成后按d,退出程序编辑状态.（5） 按q,执行程序.（6） 如图3.1-56,依次输入15,2,按1.显示结果为64.即1+3+5+・・・+15=64.

Q嗣IFM1fd7cllReai]QIUHE04is64-Disp-图3.1-56更一般地，变量起始值也可以由用户输入.比如?A（输入起始值A）?—N（输入终值N）?fK（输入步长K）0S（记和）ForAfIToNSetpKS+I—SNext （结束语句）SJ“END”问题5编写程序，使任意输入的3个整数按从大到小的顺序输出.（选自：普通高中课程标准实验教科书（人教A版）数学必修三，第27页）1.程序框图（图3.1-57）图3.1-572.程序编制（程序名为PAIXU,即排序.）?fA?fB?fCIfB>A（A,B交换，但与C无关）987987ThenA-*TB—ATfBIfEndIfC>A（A,C•交换，但与〃无关）ThenA~TCfAT—CIfEndIfC>B（C,B交换，但与A无关）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）执行程序.如图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）.（根据普通高中课程标准实验教科书（人教A版）数学必修一，第92页，习题3.1,A组，第4题，以及必修三，第18页稍有改编）1.程序框图（图3.1-64）图3.1-64图3.1-642.程序编制（程序名为ERFENFA,即二分法・）ClrGraph （消除绘图窗口其他存在的图形）（绘制函数图象）（给出区间左端点值）（给出区间右端点值）（给出区间精确度）111B+2）<0Viewwindow—（绘制函数图象）（给出区间左端点值）（给出区间右端点值）（给出区间精确度）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