Matrix transposition: Difference between revisions
Content added Content deleted
(Ada example) |
m (Correct source code spacing for Ada) |
||
Line 27: | Line 27: | ||
begin |
begin |
||
for I in Item'range(1) loop |
for I in Item'range(1) loop |
||
for J in Item |
for J in Item'range(2) loop |
||
Put(Item => Item(I,J), Exp => 0, Fore => 5); |
Put(Item => Item(I,J), Exp => 0, Fore => 5); |
||
Put(" "); |
Put(" "); |
||
Line 88: | Line 88: | ||
1.00000 4.00000 9.00000 16.00000 25.00000 |
1.00000 4.00000 9.00000 16.00000 25.00000 |
||
1.00000 8.00000 27.00000 64.00000 125.00000 |
1.00000 8.00000 27.00000 64.00000 125.00000 |
||
1.00000 16.00000 81.00000 256.00000 625.00000 |
1.00000 16.00000 81.00000 256.00000 625.00000 |
||
=={{header|ALGOL 68}}== |
=={{header|ALGOL 68}}== |