Anonymous user
Pascal's triangle: Difference between revisions
no edit summary
No edit summary |
|||
Line 4,367:
;
13 pascalTriangle</lang>
=={{header|Red}}==
<lang Red>Red[]
pascal-triangle: function [
n [ integer! ] "number of rows"
][
row: make vector! [ 1 ]
loop n [
print row
left: copy row
right: copy row
insert left 0
append right 0
row: left + right
]
]</lang>
Output:
<pre>
pascal-triangle 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|REXX}}==
| |||