Pascal's triangle: Difference between revisions
m
→{{header|EasyLang}}
Line 2,038:
<syntaxhighlight>
numfmt 0 4
proc pascal n . .
r[] = [ 1 ]
for i to n
rn[] = [ ]
l = 0
for j to n - len r[]
write " "
.▼
for r in r[]▼
write r▼
rn[] &= l + r▼
l = r▼
.
print ""▼
rn[] &= l▼
swap r[] rn[]▼
.
▲ for r in r[]
▲ write r
▲ rn[] &= l + r
▲ l = r
▲ .
▲ print ""
▲ rn[] &= l
▲ swap r[] rn[]
.
pascal 13
</syntaxhighlight>
|