Einzelnen Beitrag anzeigen

Benutzerbild von Dalai
Dalai

Registriert seit: 9. Apr 2006
1.680 Beiträge
 
Delphi 5 Professional
 
#10

AW: Zwei Ganzzahlen zu Dezimalzahl zusammensetzen

  Alt 28. Sep 2023, 14:27
Wenns jetzt keine Hausaufgaben sind die auf ne bestimmte Weise gelöst werden sollen würd ich einfach
StrToFloat(IntToStr(Zahl1) + ',' + IntToStr(Zahl2))
Nein, keine Hausaufgabe. Die Umwandlung mittels String kam mir auch in den Sinn, aber das Problem ist ja immer die Abhängigkeit vom im System eingestellten Dezimaltrennzeichen. Daher hab ich das gleich verworfen, auch wenn der Weg über Strings den Vorteil hätte, dass Zahl2 führende Nullen haben kann und damit ein Ergebnis wie 1,005 möglich ist. Das ist aber aktuell keine Voraussetzung.

Kann die zweite Zahl auch führende Nullen haben, so dass das gewünschte Ergebnis etwas wie "1,00042" wäre?
Nein, die Zahlen sind immer Ganzzahlen und als Integer definiert.

Uwes Code hat für mich am meisten Charme. Einfacher und verständlicher Code . Dankeschön! Die Funktion CountDigits hab ich von hier: https://stackoverflow.com/a/30016222

Grüße
Dalai
  Mit Zitat antworten Zitat