Zitat von
DelphiNerd91:
.. ich habe nie in delphi aufgepasst. Und jetzt geht es leider fast um die versetzung, durch informatik :)..
.. dumm gelaufen ..
Magisches Quadrat
Dort steht geschrieben:
Zitat:
Die Anzahl magischer Quadrate Es gibt ein (triviales) magisches Quadrat mit Kantenlänge 1, jedoch keines mit Kantenlänge 2. Abgesehen von Symmetrieoperationen (d.h. in der Frénicle-Standardform) gibt es auch nur ein einziges magisches Quadrat mit Kantenlänge 3 (siehe unter Lo-Shu). Alle 880 magischen Quadrate mit Kantenlänge 4 wurden bereits 1693 von Frénicle de Bessy gefunden. Mit Kantenlänge 5 gibt es 275.305.224 magische Quadrate; darüber hinaus sind keine genauen Zahlen bekannt, es gibt jedoch bis etwa n = 20 relativ verlässliche Abschätzungen. Die weitest reichenden Berechnungen wurden von Walter Trump durchgeführt[1]. Auch die Anzahl symmetrischer, pandiagonaler und ultramagischer Quadrate für kleinere n ist bekannt, beispielsweise gibt es 48 symmetrische magische Quadrate mit Kantenlänge 4 und 16 ultramagische Quadrate mit Kantenlänge 5.
Zur Darstellung würde ich ein StringGrid nehmen.
3 Spalten und 3 Zeilen.
Zur Datenhaltung ein zweidimensionales Array.
.. und dann mal anfangen ..
Grüße
Klaus