中国DOS联盟
-- 联合DOS 推动DOS 发展DOS --联盟域名：www.cn-dos.net 论坛域名：www.cn-dos.net/forum
|
中国DOS联盟-- 联合DOS 推动DOS 发展DOS --联盟域名：www.cn-dos.net 论坛域名：www.cn-dos.net/forum |
| 游客 | 登录 | 注册 | 会员 | 搜索 | 中国DOS联盟 |
|
中国DOS联盟论坛 现在时间是 2026-09-14 23:11 |
共 47,812 主题排行 / 349,917 发帖 / 今日 0 篇 / 48,268 会员排行 |
| DOS开发编程 & 发展交流 （开发室） » QB程序问题 |
| 可打印版本 1,533 / 7 |
| 第1楼 jo | 发表于 2002-11-22 00:00 |
| 初级用户 发帖 22 积分 172 | |
|
QB程序问题 可以问有关QB的问题吗？
|
|
| 第2楼 MYS | 发表于 2002-11-22 00:00 |
| 元老会员 发帖 1,637 积分 5,170 来自 广东佛山 | |
|
可以，是QBASIC吧。
|
|
| 第3楼 jo | 发表于 2002-11-22 00:00 |
| 初级用户 发帖 22 积分 172 | |
|
请问一个问题：“2/1,3/2,5/3,5/8,13/8,21/13....求出这个数列前20项之和”应该如何编？
cls a=1:b=1:m=0 for i= 1 to 20 a=a+b m=m+a/b b=a next i print m 输出的是40也，错在哪里呢？ |
|
| 第4楼 MYS | 发表于 2002-11-22 00:00 |
| 元老会员 发帖 1,637 积分 5,170 来自 广东佛山 | |
|
你的程序错了，我算了一下，当i=1时，式子是正确的，
a=a+b=2 ;m=m+2/1 但当i=2时就不对了。因前面b=a，所以b=2,这时该项的a+b=4， m=m+4/2了。 你算算看 |
|
| 第5楼 MYS | 发表于 2002-11-22 00:00 |
| 元老会员 发帖 1,637 积分 5,170 来自 广东佛山 | |
|
试试这样编：
cls a=2:b=1:m=0 for i= 1 to 20 m=m+a/b t=a+b b=a a=t next i print m |
|
| 第6楼 jo | 发表于 2002-11-22 00:00 |
| 初级用户 发帖 22 积分 172 | |
|
可以麻烦呢写出正确的吗？我已想呢很久了～呜呜呜
|
|
| 第7楼 MYS | 发表于 2002-11-23 00:00 |
| 元老会员 发帖 1,637 积分 5,170 来自 广东佛山 | |
|
我给出的程序不就是正确的吗？
|
|
| 第8楼 jo | 发表于 2002-11-23 00:00 |
| 初级用户 发帖 22 积分 172 | |
|
实在是太感谢了～
|
|
|
[ 联系联盟系统管理团队 -
中国DOS联盟 -
标准版 ] Sponsored by ifanr Inc | © 2001–2023 |