枚举解析练习.doc_第1页
枚举解析练习.doc_第2页
枚举解析练习.doc_第3页
枚举解析练习.doc_第4页
枚举解析练习.doc_第5页
已阅读5页,还剩2页未读 继续免费阅读

下载本文档

版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领

文档简介

红色字体的是作业,完成在作业本上。【例1】输入直角三角形的两个直角边的边长值a和b,然后用勾股定理计算出斜边的边长值c。l 分析问题: 输入:直角三角形两个直角边的边长a和b。 处理:利用勾股定理公式计算斜边c的值。 输出:直角三角形的斜边长c。l 流程图:lll 程序代码:a=InputBox(请输入第一条直角边的值:)b=InputBox(请输入第二条直角边的值:)c=sqr(a*a+b*b)Print c【例2】输入三角形边长a,b,c,求三角形面积s。l 分析问题: 输入:三角形三个边长a、b、c。 处理:利用海伦公式(其中)计算三角形的面积s。 输出:三角形的的面积s。l 流程图:l 程序代码:a=InputBox(请输入第一条边的值:)b=InputBox(请输入第二条边的值:)c=InputBox(请输入第三条边的值:)p=(a+b+c)/2s=sqr(p*(p-a)*(p-b)*(p-c)Print s【例3】求两个并联电阻的值,公式为:。l 分析问题: 输入:两个电阻的值r1、r2。 处理:利用公式r=1/(1/r1+1/r2)计算并联电阻的值r。 输出并联电阻的值r。l 流程图:l 程序代码:r1=InputBox(请输入第一个电阻的值:)r2=InputBox(请输入第二个电阻的值:)c=1/r1+1/r2r=1/cPrint r【例4】输入一元二次方程ax2+bx+c=0(a0)的系数a、b、c,求方程的解。l 分析问题: 输入:一元二次方程的三个系数a、b、c。 处理: 计算一元二次方程的判别式b2-4ac。 根据判别式的值,判别方程解的情况,如有实数解,则计算方程的解。 输出:方程的解或“无解”。l 程序代码:a=InputBox(请输入系数a的值:)b=InputBox(请输入系数b的值:)c=InputBox(请输入系数c的值:)p=b*b-4*a*cIF p0 THENh1=(-b+Sqr(p)/(2*a)h2=(-b-Sqr(p)/(2*a)Print h1, h2ELSEIF p=0 THENh=-b/(2*a)Print hELSEPrint 无解END IFEND IFl 流程图:百鸡百钱问题:公鸡每只5元,母鸡每只3元,小鸡1元3只,现在用100元钱买100只鸡,求公鸡、母鸡、小鸡各买几只?l 分析问题: 输入:本例没有输入。 处理: 设公鸡买x只,母鸡买y只,小鸡买z只。 数学方法处理时,是列出不定方程:然后通过讨论,得出方程的解。 使用枚举法时,是对可能的公鸡、母鸡、小鸡数一一列举,然后判断是否满足题意。 输出:满足题意的公鸡、母鸡、小鸡数。l 流程图:l 程序代码:x=0DO WHILE x=20 y=0 DO WHILE y=100-x z=100-x-y IF x*5+y*3+z/3=100 THEN Print x, y, z END IF y=y+1 Loop x=x+1Loop求1-1000中,能被3整除的数找出1-1000中所有能被7和11整除的数。(流程图和

温馨提示

  • 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

评论

0/150

提交评论