Pascal's triangle: Difference between revisions
Added Bracmat
(→{{header|Pascal}}: add example) |
(Added Bracmat) |
||
Line 184:
1 8 28 56 70 56 28 8 1
1 9 36 84 126 126 84 36 9 1</pre>
=={{header|Bracmat}}==
<lang bracmat>( out$"Number of rows? "
& get':?R
& -1:?I
& whl
' ( 1+!I:<!R:?I
& 1:?C
& -1:?K
& !R+-1*!I:?tabs
& whl'(!tabs+-1:>0:?tabs&put$\t)
& whl
' ( 1+!K:~>!I:?K
& put$(!C \t\t)
& !C*(!I+-1*!K)*(!K+1)^-1:?C
)
& put$\n
)
&
)</lang>
Output:
<pre>Number of rows?
7
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</pre>
=={{header|C}}==
| |||