5 lines
83 B
Forth
5 lines
83 B
Forth
: triangle ( n -- )
|
|
1+ 1 do
|
|
cr i 0 do [char] * emit loop
|
|
loop ;
|
|
5 triangle
|