Anonymous user
Pascal's triangle: Difference between revisions
→{{header|Perl}}: ++ octave
(add Tcl) |
(→{{header|Perl}}: ++ octave) |
||
Line 517:
else row :: loop (i+1) (next_row row)
in loop 0 [1]</lang>
=={{header|Octave}}==
<lang octave>function pascaltriangle(h)
for i = 0:h-1
for k = 0:h-i
printf(" ");
endfor
for j = 0:i
printf("%d ", bincoeff(i, j));
endfor
printf("\n");
endfor
endfunction
pascaltriangle(4);</lang>
=={{header|Perl}}==
|