数学中国

 找回密码
 注册
搜索
热搜: 活动 交友 discuz
楼主: 白新岭

[原创]请教vfbpgyfk先生一个编程问题

  [复制链接]
发表于 2022-12-4 22:22 | 显示全部楼层
截止2022年12月03日周六21:35分浏览量81193,回复1861,热度116度
截止2022年12月04日周日22:22分浏览量81251,回复1864,热度116度
回复 支持 反对

使用道具 举报

发表于 2022-12-5 14:01 | 显示全部楼层
截止2022年12月04日周日22:22分浏览量81251,回复1864,热度116度
截止2022年12月05日周一14:02分浏览量81264,回复1865,热度116度
回复 支持 反对

使用道具 举报

发表于 2022-12-5 22:11 | 显示全部楼层
截止2022年12月04日周日22:22分浏览量81251,回复1864,热度116度
截止2022年12月05日周一22:05分浏览量81277,回复1866,热度116度
回复 支持 反对

使用道具 举报

 楼主| 发表于 2022-12-6 20:44 | 显示全部楼层
截止2022年12月05日周一22:05分浏览量81277,回复1866,热度116度
截止2022年12月06日周二20:46分浏览量81352,回复1867,热度116度
回复 支持 反对

使用道具 举报

发表于 2022-12-6 22:16 | 显示全部楼层
SELECT 1
USE H:\素数式系数\素数表十亿.dbf ALIAS 素数表
kssj=SECONDS()  &&取出开始时间
s=36.317460317460317460
SELECT 1
  GO 7
  A=素数
  s=s*A*(A-10)/(A-4)/(A-6)
  SKIP 1
        FOR  j=1 TO 50876310
        SELECT 1
        B=素数
        s=s*B*(B-10)/(B-4)/(B-6)
        SELECT 1  
        SKIP
        ENDFOR

?s
=MESSAGEBOX("运行时间:"+LTRIM(STR(INT((SECONDS()-kssj)/60)))+"分"+LTRIM(STR(MOD(SECONDS()-kssj,60),5,2))+"秒",64,"运行时间提示")
回复 支持 反对

使用道具 举报

发表于 2022-12-6 22:58 | 显示全部楼层
截止2022年12月05日周一22:05分浏览量81277,回复1866,热度116度
截止2022年12月06日周二23:00分浏览量81361,回复1869,热度117
回复 支持 反对

使用道具 举报

 楼主| 发表于 2022-12-7 14:20 | 显示全部楼层
截止2022年12月06日周二23:00分浏览量81361,回复1869,热度117度
截止2022年12月07日周三14:20分浏览量81392,回复1870,热度117度
回复 支持 反对

使用道具 举报

发表于 2022-12-7 22:26 | 显示全部楼层
截止2022年12月06日周二23:00分浏览量81361,回复1869,热度117度
截止2022年12月07日周三22:26分浏览量81445,回复1871,热度117度
回复 支持 反对

使用道具 举报

 楼主| 发表于 2022-12-8 19:04 | 显示全部楼层
截止2022年12月07日周三22:26分浏览量81445,回复1871,热度117度
截止2022年12月08日周四19:04分浏览量81525,回复1872,热度117度
回复 支持 反对

使用道具 举报

 楼主| 发表于 2022-12-8 19:20 | 显示全部楼层
SELECT 1
USE H:\素数式系数\素数表十亿.dbf ALIAS 素数表
kssj=SECONDS()  &&取出开始时间
s=9.023437500000000000
SELECT 1
  GO 6
  A=素数
  s=s*A*(A-10)/(A-3)/(A-7)
  SKIP 1
        FOR  j=1 TO 50876310
        SELECT 1
        B=素数
        s=s*B*(B-10)/(B-3)/(B-7)
        SELECT 1  
        SKIP
        ENDFOR

?s
=MESSAGEBOX("运行时间:"+LTRIM(STR(INT((SECONDS()-kssj)/60)))+"分"+LTRIM(STR(MOD(SECONDS()-kssj,60),5,2))+"秒",64,"运行时间提示")
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

Archiver|手机版|小黑屋|数学中国 ( 京ICP备05040119号 )

GMT+8, 2025-7-18 21:07 , Processed in 0.086514 second(s), 15 queries .

Powered by Discuz! X3.4

Copyright © 2001-2020, Tencent Cloud.

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