[過去ﾛｸﾞ]
プログラミングのお題スレ Part13 (1002ﾚｽ)
プログラミングのお題スレ Part13 http://mevius.5ch.net/test/read.cgi/tech/1549160513/
上
下
前次
1-
新
通常表示
512ﾊﾞｲﾄ分割
ﾚｽ栞
抽出解除
ﾚｽ栞
このｽﾚｯﾄﾞは過去ﾛｸﾞ倉庫に格納されています｡
次ｽﾚ検索
歴削→次ｽﾚ
栞削→次ｽﾚ
過去ﾛｸﾞﾒﾆｭｰ
ﾘﾛｰﾄﾞ規制
です｡10分ほどで解除するので､
他のﾌﾞﾗｳｻﾞ
へ避難してください｡
673: デフォルトの名無しさん [sage] 2019/03/14(木) 18:58:38 ID:dvZ8z+Z0 お題：フィボナッチ数列を最初の10個表示せよ ruby https://ideone.com/ewyP50 perl6 https://ideone.com/O3tVZj http://mevius.5ch.net/test/read.cgi/tech/1549160513/673
689: デフォルトの名無しさん [sage] 2019/03/15(金) 00:10:49 ID:27sSd34q >>673 Perl5 @f = (0, 1); push @f, $f[-2] + $f[-1] while @f < 10; print "@f\n"; 実行結果 ~ $ perl 13_673_fib10.pl 0 1 1 2 3 5 8 13 21 34 Prel6、いいな… http://mevius.5ch.net/test/read.cgi/tech/1549160513/689
694: デフォルトの名無しさん [sage] 2019/03/15(金) 01:15:34 ID:T0clmjRI >>673 Squeak Smalltalk | fibGen | fibGen := [:a :b | Generator on: [:g | [g yield: a. b := a + b. a := b - a] repeat]]. (fibGen value: 0 value: 1) next: 10. "=> an OrderedCollection(0 1 1 2 3 5 8 13 21 34) " http://mevius.5ch.net/test/read.cgi/tech/1549160513/694
696: デフォルトの名無しさん [sage] 2019/03/15(金) 01:51:53 ID:Fj/79Ht+ >>673 javascript const take = n => function*(iterable) { const iterator = iterable[Symbol.iterator](); for (let i = 0; i < n; i++) { const {value, done} = iterator.next(); if (done) break; yield value; } }; const fibo = function*() { const memo = [0n, 1n]; const fib = n => n in memo ? memo[n] : memo[n] = fib(n - 2) + fib(n - 1); for(let i = 0; ; i++) yield fib(i); }(); console.log([...take(10)(fibo)]); 結果： [0n, 1n, 1n, 2n, 3n, 5n, 8n, 13n, 21n, 34n] http://mevius.5ch.net/test/read.cgi/tech/1549160513/696
697: デフォルトの名無しさん [] 2019/03/15(金) 08:40:18 ID:VdqhZ9XO >>673 Common Lisp https://ideone.com/fbbBbx http://mevius.5ch.net/test/read.cgi/tech/1549160513/697
700: デフォルトの名無しさん [] 2019/03/15(金) 10:54:07 ID:EVqxIhVf >>673 Haskell main = (print.take 10) fibs where fibs = 0:1:zipWith (+) fibs (tail fibs) http://mevius.5ch.net/test/read.cgi/tech/1549160513/700
708: 673 [sage] 2019/03/15(金) 19:08:00 ID:3zDqFokC >>673 java https://ideone.com/vNVR4y >>673 c https://ideone.com/P6eqTd http://mevius.5ch.net/test/read.cgi/tech/1549160513/708
ﾒﾓ帳
(0/65535文字)
上
下
前次
1-
新
書
関
写
板
覧
索
設
栞
歴
ｽﾚ情報
赤ﾚｽ抽出
画像ﾚｽ抽出
歴の未読ｽﾚ
AAｻﾑﾈｲﾙ
Google検索
Wikipedia
ぬこの手
ぬこTOP
0.039s