Einzelnen Beitrag anzeigen

Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.063 Beiträge
 
Delphi 12 Athens
 
#7

AW: Betrag auszahlbar?

  Alt 29. Jun 2011, 11:49
Zitat:
Nein, es wird angenommen, dass immer unendlich viele Scheine in der Kasse sind (leider nur eine Annahme ).
3 While-Schleifen.

Erstmal so viele wie mögliche 100er abziehen,
dann die 50er und dann noch die 20er.

Wenn am Ende 0 übrig bleibt, dann kann man das auszahlen.

PS: Da man 100er auch mit 50ern ausgeben kann, könnte man sich die Prüfung auf 100er auch gleich sparen.
Bleiben also noch 2 Schleifen und ein IF, bzw. als Funktion verbaut gleich das IF als Result:= .
Neuste Erkenntnis:
Seit Pos einen dritten Parameter hat,
wird PoSex im Delphi viel seltener praktiziert.
  Mit Zitat antworten Zitat