Collect and sort square numbers in ascending order from three lists: Difference between revisions
Collect and sort square numbers in ascending order from three lists (view source)
Revision as of 17:30, 22 December 2021
, 2 years ago→{{header|ooRexx}}: show duplicates
Walterpachl (talk | contribs) m (→{{header|REXX}}: show duplicates) |
Walterpachl (talk | contribs) m (→{{header|ooRexx}}: show duplicates) |
||
Line 189:
store:
do i=1 To st.0
/*
If st.i=e Then
Return
*/
If st.i>e Then Do
Do j=st.0 To i By -1
Line 214 ⟶ 216:
{{out}}
<pre>REXX-ooRexx_5.0.0(MT)_64-bit 6.05 8 Sep 2020
Ordered squares: 4 9 16 25 36 36 49 81 121 144 169</pre>
=={{header|Perl}}==
| |||