Thema
:
Delphi
Für 2 mach 1
Einzelnen Beitrag anzeigen
CalganX
Registriert seit: 21. Jul 2002
Ort: Bonn
5.403 Beiträge
Turbo Delphi für Win32
#
8
Re: Für 2 mach 1
13. Nov 2003, 21:24
Hi,
das ist dann auch nicht mehr so schwer.
Quick&Dirty:
markieren
Delphi-Quellcode:
erg1 := AnzahlPersonen/2;
if
AnzahlPersonen
mod
2 = 1
then
begin
erg1 := erg1 + 1;
end
;
Wirklich veryQuick&veryDirty.
Chris
Zitat
CalganX
Öffentliches Profil ansehen
Besuche die Homepage von CalganX!
Mehr Beiträge von CalganX finden