RosettaCodeData/Task/Pascals-triangle/Octave/pascals-triangle.octave

14 lines
216 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
function pascaltriangle(h)
for i = 0:h-1
for k = 0:h-i
printf(" ");
endfor
for j = 0:i
printf("%3d ", bincoeff(i, j));
endfor
printf("\n");
endfor
endfunction
pascaltriangle(4);