易码技术论坛

 找回密码
 加入易码
搜索
查看: 128638|回复: 5

[原创]SUPER-PI(小数化成分数)惊喜发布!

[复制链接]
发表于 2006-2-19 13:12:00 | 显示全部楼层
注意:本程序分成2个部分,中间并无关联!

由WQX1原创!

[em02]

建议:在计算时如果要精确请用1号自动推算法!
发表于 2006-2-26 13:08:00 | 显示全部楼层
 楼主| 发表于 2006-2-27 21:44:00 | 显示全部楼层
终于有人支持了![em02]
IT神话 该用户已被删除
发表于 2006-6-30 00:07:00 | 显示全部楼层
提示: 作者被禁止或删除 内容自动屏蔽
 楼主| 发表于 2006-6-30 13:43:00 | 显示全部楼层
计算方程吗!?

求出真正的话是不可能的,文曲星的计算方面有误差...


 楼主| 发表于 2006-2-19 13:10:13 | 显示全部楼层 |阅读模式
SUPER-PI

支持机型:所有带有GVBASIC或GVBASIC+的星星均可使用

本程序有2种小数化分数程序

1.自动推算法(让数字不断接近分数),像PI之类的近似值可以很快求出,并且不断计算

当电脑认为得数相同后如果还要计算(出现结果问是否继续?),按Y可以强制继续计算!

本程序可以修改,只要将10行的NUMA=0的值改成1,可以使用快速模式(如果长时间不出结果电脑会自动加几倍,像PI到了355/113的分数后很长时间不出结果都可以自动增加,速度快!(但有时候也会漏掉一些^_^)将NUMB=0改成1就可以返回上次运算,输入值(分子的值在第3行)就可以继续运算

本部分可以看出当前分数与所输的值的相差多少

在第2行会出现当前分数值(最接近的)

第3行是分子的值(不断增加的)

第4行是最接近的分数(会自动变换的)

2.快速推算法

可以很快地将小数化成分数,只要几步就可得出结果!

(将6010行的Q的值是分子最大上限,可以修改)

本程序是我为了计算PI的近似值时制作的一个BASIC程序,如有BUG还请多多指教!

文件在这里!



您需要登录后才可以回帖 登录 | 加入易码

本版积分规则

Archiver|手机版|小黑屋|EMAX Studio

GMT+8, 2025-8-24 15:09 , Processed in 0.013651 second(s), 19 queries .

Powered by Discuz! X3.4

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表