Magic squares of doubly even order: Difference between revisions

Content added Content deleted
m (→‎{{header|Java}}: small change)
m (→‎{{header|Perl 6}}: Update example)
Line 81: Line 81:


=={{header|Perl 6}}==
=={{header|Perl 6}}==
See [[Magic_squares/Perl_6|Magic squares/Perl 6]]
See [[Magic_squares/Perl_6|Magic squares/Perl 6]] for a general magic square generator. Note that it produces '''a''' magic square, not '''the''' magic square. The output is different each time.
{{out}}
{{out}}
With a parameter of 8:
With a parameter of 8:
<pre> 1 2 62 61 60 59 7 8
<pre>54 16 53 52 10 9 15 51
9 10 54 53 52 51 15 16
27 33 28 29 39 40 34 30
48 47 19 20 21 22 42 41
19 41 20 21 47 48 42 22
40 39 27 28 29 30 34 33
35 25 36 37 31 32 26 38
32 31 35 36 37 38 26 25
62 8 61 60 2 1 7 59
24 23 43 44 45 46 18 17
6 64 5 4 58 57 63 3
49 50 14 13 12 11 55 56
43 17 44 45 23 24 18 46
57 58 6 5 4 3 63 64
14 56 13 12 50 49 55 11


The magic number is 260</pre>
The magic number is 260</pre>
With a parameter of 12:
<pre> 36 27 116 26 117 113 112 34 115 114 35 25
144 135 8 134 9 5 4 142 7 6 143 133
85 94 53 95 52 56 57 87 54 55 86 96
61 70 77 71 76 80 81 63 78 79 62 72
24 15 128 14 129 125 124 22 127 126 23 13
120 111 32 110 33 29 28 118 31 30 119 109
37 46 101 47 100 104 105 39 102 103 38 48
132 123 20 122 21 17 16 130 19 18 131 121
97 106 41 107 40 44 45 99 42 43 98 108
12 3 140 2 141 137 136 10 139 138 11 1
73 82 65 83 64 68 69 75 66 67 74 84
49 58 89 59 88 92 93 51 90 91 50 60

The magic number is 870

</pre>


=={{header|REXX}}==
=={{header|REXX}}==
Retrieved from "https://rosettacode.org/wiki/Magic_squares_of_doubly_even_order"