Floyd's triangle: Difference between revisions

no edit summary
No edit summary
Line 60:
79 80 81 82 83 84 85 86 87 88 89 90 91
92 93 94 95 96 97 98 99 100 101 102 103 104 105
</pre>
 
=={{header|360 Assembly}}==
REPORT zmbr_test.
 
PARAMETERS: p_row TYPE i.
 
START-OF-SELECTION.
 
DATA(lv_column) = 0.
DATA(lv_number) = 0.
 
DO p_row TIMES.
 
lv_column += 1.
 
DO lv_column TIMES.
 
lv_number += 1.
 
WRITE: lv_number.
 
ENDDO.
 
WRITE:/ space.
 
ENDDO.
{{out}}
<pre>
1
2 3
4 5 6
7 8 9 10
11 12 13 14 15
</pre>
{{out}}
<pre>
1
2 3
4 5 6
7 8 9 10
11 12 13 14 15
16 17 18 19 20 21
22 23 24 25 26 27 28
29 30 31 32 33 34 35 36
37 38 39 40 41 42 43 44 45
46 47 48 49 50 51 52 53 54 55
</pre>