Forum: Programmieren allgemein
by jaenicke,
6. Apr 2009
Bei Max kommt aber das falsche heraus, denn Max(12, 10) ist z.B. nicht wie gewünscht 10...
Wegen Trunc: Ja, hab ich nicht drauf geachtet als ich das so gelassen habe. :oops:
Forum: Programmieren allgemein
by jaenicke,
6. Apr 2009
Insgesamt wäre es mit Funktionen mit Parametern jedenfalls sinnvoller. Was bei der Berechnung passiert ist wegen der globalen Variablen auf den ersten Blick nicht zu sehen, deshalb schreibe ich dazu lieber nix...function TForm1.Wertzuordnen(Number: Integer): Integer;
begin
Result := Number mod 13;
if Result > 10 then
Result := 10;
end;
function TForm1.ZufallszahlErstellen():...
Forum: Programmieren allgemein
by jaenicke,
6. Apr 2009
Was hast du denn gegen Modulo? Mit mod 13 kannst du dir das case sparen. ;-)
Forum: Programmieren allgemein
by jaenicke,
6. Apr 2009
Durch die globalen Variablen statt Parametern und Rückgabewerten ist der Quelltext vollkommen unübersichtlich und praktisch nicht zu durchschauen.
Wie da was passiert kann man so erst einmal gar nicht erkennen.
Das gibt doch ein vollkommen anderes Ergebnis...
Beispiel 25:
(25 - 1) mod 13 = 11, 11 > 10, also ist das Ergebnis 10.
25 mod 10 ist aber 5... ;-)
// EDIT:
Forum: Programmieren allgemein
by jaenicke,
6. Apr 2009
mod 13 gibt den Rest der Division durch 13 zurück.