Magic squares of doubly even order: Difference between revisions
m
→{{header|360 Assembly}}: Superfluous blanks suppressed
PatGarrett (talk | contribs) (→{{header|360 Assembly}}: Section added) |
PatGarrett (talk | contribs) m (→{{header|360 Assembly}}: Superfluous blanks suppressed) |
||
Line 38:
=={{header|360 Assembly}}==
{{trans|Java}}
<lang 360asm>* Magic squares of doubly even order 01/03/2017▼
▲* Magic squares of doubly even order 01/03/2017
MAGICSDB CSECT
USING MAGICSDB,R13
Line 101 ⟶ 100:
XDEC DS CL12 temp for xdeco
YREGS
END MAGICSDB</lang>
{{out}}
<pre>
Line 115 ⟶ 113:
magic constant= 260
</pre>
=={{header|AppleScript}}==
| |||