Pascal's triangle: Difference between revisions

=={{header|Quackery}}==

The behaviour of <code>pascal</code> for values less than 1 is the same as its behaviour for 1.

<lang Quackery> [ over size -

space swap of

swap join ] is justify ( $ n --> )

[ witheach

[ number$

5 justify echo$ ]

cr ] is echoline ( [ --> )

[ [] 0 rot 0 join

witheach

[ tuck +

rot join swap ]

drop ] is nextline ( [ --> [ )

[ ' [ 1 ] swap

1 - times

[ dup echoline

nextline ]

echoline ] is pascal ( n --> )

16 pascal</lang>

{{out}}

<pre> 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

1 7 21 35 35 21 7 1

1 8 28 56 70 56 28 8 1

1 9 36 84 126 126 84 36 9 1

1 10 45 120 210 252 210 120 45 10 1

1 11 55 165 330 462 462 330 165 55 11 1

1 12 66 220 495 792 924 792 495 220 66 12 1

1 13 78 286 715 1287 1716 1716 1287 715 286 78 13 1

1 14 91 364 1001 2002 3003 3432 3003 2002 1001 364 91 14 1

1 15 105 455 1365 3003 5005 6435 6435 5005 3003 1365 455 105 15 1

</pre>