Anonymous user
Pascal's triangle: Difference between revisions
Added PicoLisp
(Undo revision 81369 by 97.107.67.5 (Talk) — random nonsense) |
(Added PicoLisp) |
||
Line 858:
1 10 45 120 210 252 210 120 45 10 1
</lang>
=={{header|PicoLisp}}==
{{trans|C}}
<lang PicoLisp>(de pascalTriangle (N)
(for I N
(space (* 2 (- N I)))
(let C 1
(for K I
(prin (align 3 C) " ")
(setq C (*/ C (- I K) K)) ) )
(prinl) ) )</lang>
=={{header|PureBasic}}==
| |||