Pascal's triangle: Difference between revisions
Content added Content deleted
(→{{header|Forth}}: Added more efficient code) |
|||
Line 386: | Line 386: | ||
dup init 1 .line |
dup init 1 .line |
||
1 ?do i next i 1+ .line loop ;</lang> |
1 ?do i next i 1+ .line loop ;</lang> |
||
This is a bit more efficient |
This is a bit more efficient. |
||
{{trans|C}} |
|||
<lang forth>: PascTriangle |
<lang forth>: PascTriangle |
||
cr dup 0 |
cr dup 0 |