Anonymous user
Pascal's triangle: Difference between revisions
no edit summary
No edit summary |
No edit summary |
||
Line 4,359:
PRINT
NEXT row</lang>
=={{header|Retro}}==▼
<lang Retro>2 elements i j▼
: pascalTriangle▼
cr dup▼
[ dup !j 1 swap 1+ [ !i dup putn space @j @i - * @i 1+ / ] iter cr drop ] iter drop▼
;▼
13 pascalTriangle</lang>▼
=={{header|Red}}==
Line 4,394 ⟶ 4,386:
1 6 15 20 15 6 1
</pre>
▲=={{header|Retro}}==
▲<lang Retro>2 elements i j
▲: pascalTriangle
▲ cr dup
▲ [ dup !j 1 swap 1+ [ !i dup putn space @j @i - * @i 1+ / ] iter cr drop ] iter drop
▲;
▲13 pascalTriangle</lang>
=={{header|REXX}}==
| |||