7 lines
147 B
Text
7 lines
147 B
Text
|
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
|