在VF语言环境下找出随机产生的m位的偶数所表示为的素数对

白新岭

赵老师好，如果花费那么多的时间，就没有必要计算了。如果我把它以内的素数表传上来，能不能编成程序来统计呢？我想这样花费的时间应该不算太多，因为即是不编程，在Excel软件中，用统计函数来统计，花费的时间也不多（提前划分成200个区域）。

zhaolu48

如果把把104053950缩小到原来的1/10，比如是10405396，那么素数对的个数要减少到原来的1/9，求每个素数对的时间也至少要减少到原来的1/4，那么整个用时也就是原来的1/36左右，那就容易多了。

zhaolu48

我对计算机编程没有任何基础，希望从初级学习。不知需要哪些设备？怎么进行操作？
编程需要的基础知识并不多。96年我因为眼睛花，写一行字，就眼前一片漆黑，不能写教案了。因此学校分配我去看电脑，主要任务是打字和电脑阅卷。这些都是现学的。同年六月份我买了一本《Foxbisc+》，书也就是一百七八十页，我只看了2/3，觉得够用了。
我的英语知识是零，命令都是一个字母一个字母记的。我现在也只不过记住七十多条命令与函数。VF共有命令与函数700多条。
因此我的VF知识很有限。
所谓“程序”，就是连续执行命令的一个文件。
用程序语句把命令组合在一起。程序语句主要就两类五个。
循环语句有三个，我只会用两个即For循环和Do whil循环。
条件语句有两种，一种是
IF
ELSE
ENDIF
另一种是选择条件语句：
DO CASE
CASE
CASE
……
OTHER
ENDCASE
现在书店里专门教编程的书还真不多。也许是我们这里比较偏远的关系。

zhaolu48

[这个贴子最后由zhaolu48在 2010/03/20 10:05am 第 2 次编辑]

以实际例题进行学习。
   1
Σ ──
   n
n = 1，2，……，10000
我有一台微机，打开“附件”点击出计算器，能否用这个计算器编程？
若不能用这个计算器编程，需要购买什么设备？
用计算器是很难完成的，计算器不支持编程。
可在如下网站：
http://zhidao.baidu.com/question/559721.html
下载foxpro8.0及中文补丁。
下载安装后即可使用，
为使用方便，可在“程序”栏内拉到桌面上。
图标是“小狐狸”，点击这个图标即可进入VF8.0语言环境，
其中有命令窗口，在命令窗口中键入“modi comm js”回车，就可编辑程序名称为“js”的程序。
对于你给出的计算可如下编辑：
clea
clea all
set talk off
s=0
for i=1 to 1000
s=s+1/i
endf
?';s=';,s*1.000000000000
set talk on
计算程序其实就四行：
s=0
for i=1 to 1000
s=s+1/i
endf
这个计算用时不到1/10秒，即回车就出结果。
在命令窗口中键入“do js”回车后即出结果：
s=7.485470860550343

pAq

赵老师： 您好！
    s=Σ 5!+10!怎么算？（“!”阶乘）

zhaolu48

s=Σ 5!+10!怎么算？（“!”阶乘）
按Σ5!=1*2!+3!+4!+5!计算。
程序如下：
sa=1
a=1
for i=2 to 5
a=a*i
sa=sa+a
endf
b=1
for i=2 to 10
b=b*i
endf
s=sa+b
?s
计算得s=3628953

zhaolu48

[这个贴子最后由zhaolu48在 2010/03/22 11:13am 第 1 次编辑]

在命令窗口中键入“modi comm js”回车.
这一步怎么进行回车?
在命令窗口中键入“do js”回车后即出结果.
这一步又怎么进行回车?
在命令窗口中键入“modi comm js”，窗口形式如下

显示的7.4854708605503430就是所求结果。
即1+1/2+1/3+…+1/1000≈7.4854708605503430。

pAq

下面引用由zhaolu48在 2010/03/21 06:26pm 发表的内容：
s=Σ 5!+10!怎么算？（“!”阶乘）
按Σ5!=1*2!+3!+4!+5!计算。
程序如下：
sa=1
...

    谢谢赵老师！