[過去ﾛｸﾞ] プログラミングのお題スレ Part13 (1002ﾚｽ)
上下前次1-新
抽出解除 ﾚｽ栞

---

このｽﾚｯﾄﾞは過去ﾛｸﾞ倉庫に格納されています｡
次ｽﾚ検索 歴削→次ｽﾚ 栞削→次ｽﾚ 過去ﾛｸﾞﾒﾆｭｰ

---

313(14): 2019/02/22(金)19:43 ID:FMSx1nas(1)調 AAS
お題：21の階乗を計算して表示せよ。
https://ideone.com/gQAd37

---

315: 2019/02/22(金)21:26 ID:py41/SAb(1/2)調 AAS
>>313 JavaScript
console.log(Array.from({length: 21}, (v, i) => i + 1).reduce((acc, v) => acc * v));

---

319: 2019/02/22(金)22:05 ID:AX8XyL13(1)調 AAS
>>313　Perl5

use bignum (l=>GMP);

$n = 1;
$n *= $_ for 2..21;

print "$n\n";

実行例
~ $ perl 13_313.pl
51090942171709440000

---

320: 2019/02/22(金)22:26 ID:eQxt3fSm(1)調 AAS
>>313 JavaScript
console.log((f=n=>n?n*f(n-1):1)(21))

---

321(1): 2019/02/23(土)00:16 ID:KCAwaSn8(1)調 AAS
>>313 Smalltalk-76

https://imgur.com/a/a7MClxL

---

322: 2019/02/23(土)00:27 ID:khwKgkQE(1)調 AAS
>>313 python
#階乗1
import math
print('階乗1',math.factorial(21))

#階乗2
def f(n): return f(n - 1)*n if n > 1 else n
print('階乗2',f(21))

#階乗3
print('階乗3',(lambda x:f(21))( globals().update({"f": lambda n: n*f(n - 1) if n > 2 else n })))

---

325: 2019/02/23(土)02:10 ID:9pS68leH(2/2)調 AAS
>>313
bc

n = 2; for (i = 3; i <= 21; i++) n*=i; n

出力
51090942171709440000

---

326(1): 2019/02/23(土)03:31 ID:nkO3lkCA(1)調 AAS
>>313 dc

~$ echo 21 20 19 18 17 16 15 14 13 12 11 10 9 8 7 6 5 4 3 2 1 ********************p | dc

51090942171709440000

---

329: 2019/02/23(土)08:05 ID:xK8/Ze+A(1/2)調 AAS
>>313 Maxima
print(21!);

---

330: 2019/02/23(土)08:20 ID:znXlogg7(1)調 AAS
>>313
;; Common Lisp
(loop for i from 1 to 21 for r = i then (* r i) finally (print r))

---

332: 2019/02/23(土)09:18 ID:IBS/n4EE(1)調 AAS
>>313
Smalltalk (Pharo 7)
21 factorial
==> 51090942171709440000

---

334: 2019/02/23(土)12:26 ID:DQY5g4De(2/3)調 AAS
>>313
Ruby

( 1..21 ).inject( 1, :* )

---

349: 2019/02/23(土)16:01 ID:BD+5EZ0V(1)調 AAS
>>313 Common Lisp
(defun ! (n)
  (apply #'* (loop for i from 1 upto n collect i)))

CL-USER> (! 21)
51090942171709440000
CL-USER> (! 0)
1
CL-USER>

---

356: 2019/02/24(日)01:37 ID:jRfp9b62(1)調 AAS
>>313
Kotlin script

println("%.0f".format((2..21).map { it.toDouble() }.reduce { n1, n2 -> n1 * n2 }))

---

361: 2019/02/24(日)07:40 ID:lq3Vey6S(1/3)調 AAS
>>313
@Mathematica

ライブラリ版
Factorial[21]

非ライブラリ版
Range[21] // Apply[Times, #] &

---

上下前次1-新書関写板覧索設栞歴

---

ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ

---

ぬこの手 ぬこTOP 0.067s