回 帖 发 新 帖 刷新版面

主题:小菜问题8~!

print 1/7

结果
0.1428751

有没有办法可以其精确度更高,如:0.142857142875142857…………
谢谢先啦~!

回复列表 (共8个回复)

沙发

a# = 1 / 7
PRINT a#

板凳

如果只是 1 / 7
简直太简单了,你要多少位数?

print " 1 / 7 的精确值等于 = 0.142857";
do
  print "142857";
loop until inkey$=chr$(27)

3 楼

1楼:不错,是精确多了,不过还可以精确点吗?
2楼:老毛病又犯了。

4 楼

这只能说明你表达不清
平时需要多注重语言文字的漏洞
否则在经济商务中,你会处处受制的.

你可以先看看[url=http://www.programfan.com/club/showbbs.asp?id=99260]超长数运算[/url]
我还没有加上小数点的处理
如果你有兴趣的话,可以考虑一下添加小数点的移位后的计算.

5 楼

小弟授教了~!

6 楼

什么是“loop until”我觉得只有“loop while”

7 楼

loop while (条件)
   这是表示当条件成立时才循环执行循环体里的程序
           当条件不成立时跳出循环体

loop until (条件)
   这是表示当条件不成立时才循环执行循环体里的程序
           当条件成立时跳出循环体

也有很多教材和高手称之为"当型"或"直到型"
而我对这些字眼吸收不多,难以从字面理解,
所以至于指的是哪一种循环,我搞不清楚,
你自己研究一下吧
听说好像是:
       当......的时候才执行
       直到....的时候才跳出
之类的

8 楼

INPUT "a,b,n="; a, b, n
p = a \ b: a = (a MOD b) * 10: m = 0
k$ = LTRIM$(STR$(p)) + "."
WHILE m < n
p = a \ b
k$ = k$ + LTRIM$(STR$(p))
a = (a MOD b) * 10: m = m + 1
WEND
PRINT "k$="; k$
END
n是代表小数点后,随便输入几位!

我来回复

您尚未登录,请登录后再回复。点此登录或注册