Thema: Delphi Für 2 mach 1

Einzelnen Beitrag anzeigen

natter24

Registriert seit: 1. Nov 2003
Ort: Aschaffenburg
12 Beiträge
 
Delphi 4 Standard
 
#9

Re: Für 2 mach 1

  Alt 13. Nov 2003, 20:41
Hallo Chakotay1308,

das wäre dann die Variante 'der letzte Ungerade erhält die doppelte Portion' je Zeiteinheit. Für 'Normalprotionen müsste der Source doch dann so ausssehen, oder?

Delphi-Quellcode:
erg1 := AnzahlPersonen/2;
if AnzahlPersonen mod 2 = 1 then begin
  erg1 := erg1 + 0,5;
end;
[edit=Daniel B]Delphi-Tags korrigiert. Mfg, Daniel B[/edit]
Norbert
Versuch´s mal mit Gemütlichkeit!
  Mit Zitat antworten Zitat