Sum of elements below main diagonal of matrix: Difference between revisions

add RPL
(add RPL)
Line 1,497:
69
done...
</pre>
 
=={{header|RPL}}==
≪ → m
≪ 0 2 m SIZE 1 GET '''FOR''' r 1 r 1 - '''FOR''' c
m r c 2 →LIST GET + '''NEXT NEXT'''
≫ ≫ '<span style="color:blue">∑BELOW</span>' STO
 
[[1 3 7 8 10]
[2 4 16 14 4]
[3 1 9 18 11]
[12 14 17 18 20]
[7 1 3 9 5]] <span style="color:blue">∑BELOW</span>
{{out}}
<pre>
1: 69
</pre>
 
1,150

edits