[表示 : 全て 最新50 1-99 101- 201- 301- 401- 501- 601- 701- 801- 901- 1001- 2ch.scのread.cgiへ]
Update time : 04/29 05:19 / Filesize : 347 KB / Number-of Response : 1039
[このスレッドの書き込みを削除する]
[+板 最近立ったスレ&熱いスレ一覧 : +板 最近立ったスレ/記者別一覧] [類似スレッド一覧]


↑キャッシュ検索、類似スレ動作を修正しました、ご迷惑をお掛けしました



157 名前:Hx.net mailto: >>151
スレチかもしれないけど最小限の環境(小型マイコン)で計算してみた
言語はC

$ cat fact.c

#include<stdio.h>
#include<math.h>
int main() {
long N,n,i[10]={0,0,0,0,0,0,0,0,0,0};
double lfac=0,mn;
scanf("%ld",&N);
for(n=1;n<=N;n++){
lfac+=log(n);
for(mn=floor(lfac/log(2)+1+1e-12);mn>=10;mn/=10);
i[(int)mn]++;
}
for(n=1;n<=9;n++)printf("%ld %ld\n",i[n],n);
return 0;
}

$ gcc -O2 -Wall fact.c -lm -o fact
$ echo 2024 | ./fact | sort -g
115 9
117 8
119 7
120 6
124 5
128 4
131 3
140 2
1030 1

さらに1から1000000までの結果
$ echo 1000000 | ./fact | sort -g
59655 9
60133 8
60685 7
61325 6
62090 5
63037 4
64260 3
65987 2
502828 1
[]
[ここ壊れてます]






[ 続きを読む ] / [ 携帯版 ]

全部読む 前100 次100 最新50 [ このスレをブックマーク! 携帯に送る ] 2chのread.cgiへ
[+板 最近立ったスレ&熱いスレ一覧 : +板 最近立ったスレ/記者別一覧](;´∀`)<347KB

read.cgi ver5.27 [feat.BBS2 +1.6] / e.0.2 (02/09/03) / eucaly.net products.
担当:undef