Delphi-PRAXiS - Einzelnen Beitrag anzeigen

**himitsu**

Delphi-Quellcode:

			//while Geld >= 100 do Dec(Geld, 100);

while (Geld >= 50) and (Geld <> 60) do Dec(Geld, 50);

while Geld >= 20 do Dec(Geld, 20);

Result = Geld = 0;

Ansonsten

Rucksackproblem

himitsu Registriert seit: 11. Okt 2003 Ort: Elbflorenz 44.184 Beiträge Delphi 12 Athens	#11 AW: Betrag auszahlbar? 29. Jun 2011, 12:42 markieren Delphi-Quellcode: //while Geld >= 100 do Dec(Geld, 100); while (Geld >= 50) and (Geld <> 60) do Dec(Geld, 50); while Geld >= 20 do Dec(Geld, 20); Result = Geld = 0; Ansonsten Rucksackproblem $2B or not $2B
	Zitat

Einzelnen Beitrag anzeigen

AW: Betrag auszahlbar?