Anonymous user
Pascal's triangle: Difference between revisions
→{{header|Perl 6}}
Line 741:
say .perl for pascal 10;</lang>
=={{header|PL/I}}==
<lang PL/I>
declare (t, u)(40) fixed binary;
declare (i, n) fixed binary;
t,u = 0;
do n = 1 to 11;
u(1) = 1;
do i = 1 to n;
u(i+1) = t(i) + t(i+1);
end;
put skip edit ((u(i) do i = 1 to n)) (col(40-2*n), (n+1) f(4));
t = u;
end;
</lang>
<lang>
1
1 1
1 2 1
1 3 3 1
1 4 6 4 1
1 5 10 10 5 1
1 6 15 20 15 6 1
1 7 21 35 35 21 7 1
1 8 28 56 70 56 28 8 1
1 9 36 84 126 126 84 36 9 1
1 10 45 120 210 252 210 120 45 10 1
</lang>
=={{header|Python}}==
| |||