Pascal's triangle: Difference between revisions
Added Wren
m (→{{header|REXX}}: added/changed comments and whitespace, simplified the code, changed wording in the REXX section header.) |
(Added Wren) |
||
Line 5,354:
1 18 153 816 3060 8568 18564 31824 43758 48620 43758 31824 18564 8568 3060 816 153 18 1
1 19 171 969 3876 11628 27132 50388 75582 92378 92378 75582 50388 27132 11628 3876 969 171 19 1</pre>
=={{header|Wren}}==
{{libheader|Wren-fmt}}
{{libheader|wren-math}}
<lang ecmascript>import "/fmt" for Fmt
import "/math" for Int
var binomial = Fn.new { |n, k|
if (n == k) return 1
var prod = 1
var i = n - k + 1
while (i <= n) {
prod = prod * i
i = i + 1
}
return prod / Int.factorial(k)
}
var pascalTriangle = Fn.new { |n|
if (n <= 0) return
for (i in 0...n) {
System.write(" " * (n-i-1))
for (j in 0..i) {
Fmt.write("$3d ", binomial.call(i, j))
}
System.print()
}
}
pascalTriangle.call(13)</lang>
{{out}}
<pre>
1
1 1
1 2 1
1 3 3 1
1 4 6 4 1
1 5 10 10 5 1
1 6 15 20 15 6 1
1 7 21 35 35 21 7 1
1 8 28 56 70 56 28 8 1
1 9 36 84 126 126 84 36 9 1
1 10 45 120 210 252 210 120 45 10 1
1 11 55 165 330 462 462 330 165 55 11 1
1 12 66 220 495 792 924 792 495 220 66 12 1
</pre>
=={{header|X86 Assembly}}==
| |||