Forum: Object-Pascal / Delphi-Language
by sx2008,
5. Jan 2010
In Beitrag #11 habe ich Dir eine schöne leicht verständliche Funktion gegeben.
Dein Problem ist hausgemacht, denn du hast jetzt alles in eine schwer verständliche "Superformel" gepackt,
anstatt das Ergebnis aus einfachen Funktionen zusammenzusetzen.
So sollte es sein (saubere,eindeutige Namen und leicht verständlich):
Alkoholmenge :=...
Forum: Object-Pascal / Delphi-Language
by sx2008,
23. Dez 2009
Wie wär's damit:
function BerechneAlkImBier(anzahl:integer):double;
const
PROZENTE = 10.0;
VOLUMEN = 0.2;
begin
result := anzahl * VOLUMEN * PROZENTE/100.0;
end;
Für Wein und Schnaps bekommst du das sicher selbst hin.