Magic squares of doubly even order: Difference between revisions
m
→{{header|VBScript}}: Superfluous blanks suppressed
PatGarrett (talk | contribs) (→{{header|VBScript}}: Section added) |
PatGarrett (talk | contribs) m (→{{header|VBScript}}: Superfluous blanks suppressed) |
||
Line 1,221:
=={{header|VBScript}}==
{{trans|Java}}
<lang vb>' Magic squares of doubly even order▼
▲' Magic squares of doubly even order
n=8 'multiple of 4
pattern="1001011001101001"
Line 1,239 ⟶ 1,238:
wscript.echo line
Next 'r
wscript.echo "Magic constant=" & (n*n+1)*n/2</lang>
{{out}}
<pre>
Line 1,254 ⟶ 1,252:
Magic constant=260
</pre>
=={{header|zkl}}==
| |||