Registriert seit: 1. Jun 2007
Ort: Markdorf
17 Beiträge
Delphi 2007 Professional
|
Re: 2 Integerwerte in einem Integerwert reversibel speichern
10. Aug 2007, 18:36
Hallo !
Ich hab auch noch eine Idee, allerdings eher mathematisch und ich weiß nicht genau ob es funktioniert.
Man hat also seine 2 Zahlen, welche ganzzahlig sind und positiv sein müssen.
Jetzt nimmt man eine Primzahlen-Liste und nummeriert die Primzahlen (Im Programm könnte man das z.B. durch einen Array lösen).
Die zu den beiden Zahlen dazugehörigen Primzahlen werden miteinander multipliziert und man erhält eine Zahl.
Da ich denke, dass es etwas schlecht erklärt ist gibt's hier ein kleines Beispiel:
Die beiden Zahlen seien 4 und 6.
Primzahl-Liste:
Nr 1 -> 2
Nr 2 -> 3
Nr 3 -> 5
Nr 4 -> 7
Nr 5 -> 11
Nr 6 -> 13
Daraus folgt, dass man 7 und 13 miteinander multiplizieren muss. Das Ergebnis: 91
Die 91 wäre dann die Zahl, welche ausgegeben wird.
Und über Primfaktorzerlegung müsste man die ursprünglichen Primzahlen wieder herausfinden, welche dann anhand der Liste wieder in die Ausgangszahlen umgewandelt werden können.
Ich bin mir nur nicht sicher ob das Ergebnis eindeutig ist, oder ob es noch eine zweite Möglichkeit gibt...
Mit freundlichen Grüßen, Michael
|