Mehrere Strings mit gleichem MD5 Wert

[brechi]

nehmen wir an du hast nen string "ABCDEFG" dann addiert du alle ordinalwerte von den ascizeichen zusammen

Delphi-Quellcode:

var i, qs: integer;
begin
  qs := 0;
  for i := 1 to lenght(s) do qs := qs+ord(s[i]);
end;

dann muss halt qs immer z.b. 1360 sein

oder du nimmst ne zahl und prüfst ob die durch ne primzahl dividiert werden kann

Delphi-Quellcode:

var i: integer;
begin
  i := strtointdef(edit1.text,0);
  if i <> 0 then
  begin
    if i mod 1337 = 0 then //gültig
  end;
end;