| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 3018 人关注过本帖
标题:[原创]阶乘计算器改进版
只看楼主 加入收藏
卧龙孔明
Rank: 9Rank: 9Rank: 9
等 级:贵宾
威 望:59
帖 子:3872
专家分:684
注 册:2006-10-13
结帖率:100%
收藏
 问题点数:0 回复次数:8 
[原创]阶乘计算器改进版
只要你有内存和空间,该程序可无限扩展
默认设置最大计算100000!可精确到每一位
这是以前我做的程序的改进版,速度提升了1/3


/*SK-CHINA 阶乘计算器*/
/*本程序可以准确计算十万以内的阶乘*/
/*结果输出为out.txt*/
#include "stdio.h"
long s[500000]={0L}; /*存储数据*/
long h=499999L; /*数据位置*/
int cheng(long num) {
long t=499999L;
while(s[h]==0) h++;
if(num>=100000L) h--;
if(num>=10000L) h--;
if(num>=1000L) h--;
if(num>=100L) h--;
if(num>=10L) h--;
h--;
while(t!=h) {
s[t]=s[t]*num;
t--;
} t=499999L;
h=h-5L;
while(t!=h) {
s[t-1]+=s[t]/10;
s[t]=s[t]%10;
t--;
}
h=h+5L;
}
int main(void) {
int i;
long x;
FILE *output;
s[499999]=1L;
output=fopen("out.txt","w");
scanf("%ld",&x); /*输入数据*/
for(i=1;i<=x;i++) cheng(i);
for(i=0;i<500000L;i++) {
if(i%500==0) fprintf(output,"\n");
fprintf(output,"%ld",s[i]);
}
return 0;
}
搜索更多相关主题的帖子: 计算器 阶乘 内存 num 改进 
2007-01-27 11:12
卧龙孔明
Rank: 9Rank: 9Rank: 9
等 级:贵宾
威 望:59
帖 子:3872
专家分:684
注 册:2006-10-13
收藏
得分:0 

完整版:
速度较上面的稍慢,但较为友好
/*SK-CHINA 阶乘计算器*/
/*本程序可以准确计算十万以内的阶乘*/
/*结果输出为out.txt*/
#include "stdio.h"
long s[500000]={0L}; /*存储数据*/
long h=499999L; /*数据位置*/
int cheng(long num) {
long t=499999L;
while(s[h]==0) h++;
if(num>=100000L) h--;
if(num>=10000L) h--;
if(num>=1000L) h--;
if(num>=100L) h--;
if(num>=10L) h--;
h--;
while(t!=h) {
s[t]=s[t]*num;
t--;
} t=499999L;
h=h-5L;
while(t!=h) {
s[t-1]+=s[t]/10;
s[t]=s[t]%10;
t--;
}
h=h+5L;
}
int main(void) {
int i;
long x;
FILE *output;
s[499999]=1L;
output=fopen("out.txt","w");
printf("SK-CHINA 阶乘计算器\n请输入数据:");
scanf("%ld",&x); /*输入数据*/
for(i=1;i<=x;i++) { cheng(i); printf("\r当前已计算至%ld!",i); }
printf("\n计算结束,现在程序正在将结果保存到out.txt\n");
for(i=0;i<500000L;i++) {
if(i%500==0) fprintf(output,"\n");
fprintf(output,"%ld",s[i]);
}
printf("写入结束!按任意键退出");
getch();
return 0;
}


My Blog: www.aiexp.info
虽然我的路是从这里开始的,但是这里不再是乐土.感谢曾经影响过,引导过,帮助过我的董凯,飞燕,leeco,starwing,Rockcarry,soft_wind等等等等.别了,BCCN.
2007-01-27 11:37
卧龙孔明
Rank: 9Rank: 9Rank: 9
等 级:贵宾
威 望:59
帖 子:3872
专家分:684
注 册:2006-10-13
收藏
得分:0 
在DEV-CPP下编译调试通过

My Blog: www.aiexp.info
虽然我的路是从这里开始的,但是这里不再是乐土.感谢曾经影响过,引导过,帮助过我的董凯,飞燕,leeco,starwing,Rockcarry,soft_wind等等等等.别了,BCCN.
2007-01-27 11:37
烟雨平生
Rank: 1
等 级:新手上路
帖 子:253
专家分:0
注 册:2005-11-20
收藏
得分:0 
革命尚未成功,同志需当努力

君子之道,五日一御
2007-01-28 12:52
autosun
Rank: 1
来 自:辽宁沈阳
等 级:新手上路
帖 子:107
专家分:0
注 册:2007-1-21
收藏
得分:0 
顶一下,不过我没有试

2007-01-28 13:39
子夜狂人
Rank: 1
等 级:新手上路
帖 子:27
专家分:0
注 册:2007-1-25
收藏
得分:0 
里面的“100L”“1000L”是什么意思啊?
谁能指导一下呢?
2007-01-28 15:04
xwhssq
Rank: 1
等 级:新手上路
帖 子:12
专家分:0
注 册:2007-4-1
收藏
得分:0 

L表示长整形数据吧!在哪里看过,现在也说不清了!
只是,我编译怎么通不过呢?
不是砸你的牌子啊!

2007-04-03 20:20
fangfangff
Rank: 1
等 级:新手上路
威 望:2
帖 子:479
专家分:0
注 册:2006-12-22
收藏
得分:0 
很好的东西,顶一个!!!!!!!!!!!

千里冰封---My Love 尽管相隔千里 , 依然拥有冰封
2007-06-10 12:40
tyeken8
Rank: 1
等 级:新手上路
帖 子:2
专家分:0
注 册:2006-10-10
收藏
得分:0 
int main(){
int i;
long x;
s[499999]=1L;
freopen("out.txt","w",stdout);
scanf("%ld",&x); /*输入数据*/
for(i=1;i<=x;i++) cheng(i);
for(i=0;s[i]==0;i++);
for(;i<500000L;printf("%ld",s[i++]));
return 0;
}

输出改成这样比较好,保证不输出前面一串0

看了一下,感觉前面乘法也写得比较臃肿,改一下,见笑。

int cheng(long num){
    long t=499999,i;
    while(!s[h]) h++;
    for(i=100000;i>=1;i/=10) if(num>=i) h--;
    while(t-h) s[t--]*=num;
    t=499999;
    while(t-h+5){
        s[t-1]+=s[t]/10;
        s[t--]%=10;
    }
}
2008-11-06 21:53
快速回复:[原创]阶乘计算器改进版
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.027624 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved