解析算法的程序实现_第1页
解析算法的程序实现_第2页
解析算法的程序实现_第3页
解析算法的程序实现_第4页
解析算法的程序实现_第5页
已阅读5页，还剩9页未读， 继续免费阅读

下载本文档

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

文档简介

1、解析算法解析算法关键-找出计算公式 解析算法:找出表示问题的前提条件与所求结果之间关系的数学表达式，并通过表达式的计算来实现问题求解。求和问题1s+n*n求和问题21.计算 的值。请将下面划线处的代码填写完整： Private Sub Command1_Click() Dim i As Integer Dim s As Double s = 0 For i = 1 To 50 _(1)_ Next i Text1.Text = Str(s) End Sub s = s + 1 / (2 * i - 1) 设计一个算法，计算并联电阻的总电阻值R。其中，每个电阻的阻值可由键盘输入，输入结束时，单击

2、计算按钮完成计算算法分析 n个并联电阻的总电阻值R的倒数等于参与并联的各个电阻值的倒数之和，即：变量 r：存储从键盘输入的电阻值。 rs：累加器，参与并联的各电阻值的倒数将逐个地累加到这个累加器中。(rs是总电阻值吗？) 程序分析1、子程序Text2_KeyPress2、子程序Command1_Click3、子程序Command2_Click任务：完善子程序Text2_KeyPress从文本框Text2中读取用户输入的电阻值，存入到变量r中；判断如果它是一个有效的电阻值（大于0）时，那么就将它的倒数累加到变量rs中；并把用户输入的这个电阻值添加在列表框List1中；否则输出提示信息“无效电阻，

3、重新输入”打开桌面老师文件夹中的“计算并联电阻程序-s.frm”，完成后运行程序，测试程序是否正确铁丝问题求解使用一根长度为L厘米的铁丝，制作一个面积为S平方厘米的矩形框，要求计算该矩形的宽w和高h。面积宽高长度L L 2 - 16 * s或者L* L - 16 * s(L - Sqr(d) / 4 L/ 4拓展练习11. 计算 的值。 Private Sub Command1_Click() Dim m As Integer, n As Integer Dim s As Double s =0 _(1)_ For n = 1 To 7 m = m * n If _(2)_ Then s = s + 1 / m Next n Text1.Text = Str(s) End Subm = 1 n Mod 2 = 1 拓展练习2 2.计算 的值。 Private Sub Command1_Click() Dim n As Integer, t As Integer, m As Integer Dim s As Integer n = Val(Text2.Text) _(1)_ t = 1 For m = 1 To n s = s + t * m * m _(2)_ Next m Text1.Text = Str(s) En

人人文库> 全部分类> 教育资料 > 中学教育

温馨提示

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

最新文档

评论

0/150

提交评论