。
【例8-11】试求 算法分析: 算法分析: 1)奇数项的符号为+,偶数项的符号为-,即: (-1)n+1,n为所在项的序号 2)每项的分母是对应项的序号,分子为1, 即:1/n, n为所在项的序号 3)将上述1)2)每项求和,得到结果
Public Sub WhileWend() Dim i As Integer Dim s As Double i=1 While i <= 100 s = s + (-1) ^ (i + 1) / i i=i+1 Wend Debug.Print "s="; s End Sub18
【例8-12-0】打印如下图形 】 ******* ******* ******* ******* 算法分析: 算法分析: 1)4行(类似 个学院)--外循环 个学院) 外循环 行 类似4个学院 2)7列(类似 个班级)--内循环 个班级) 内循环 列 类似7个班级
Dim row, col As Integer row = 1 col = 1 Do While row <= 4 Do While col <= 7 Debug.Print "*"; col = col + 1 Loop Debug.Print col = 1 row = row + 1 Loop20
【例8-12】打印九九乘法表。 】打印九九乘法表。 算法分析: 算法分析: 1)9行(类似 个学院)--外循环 个学院) 外循环 行 类似9个学院 2)9列(类似 个班级)--内循环 个班级) 内循环 列 类似9个班级
搜索“diyifanwen.net”或“第一范文网”即可找到本站免费阅读全部范文。收藏本站方便下次阅读,第一范文网,提供最新人文社科第08章 VBA结构化程序设计-例题习题(2)全文阅读和word下载服务。
相关推荐: