Verzweigungen in Delphi 6.0???

[mkinzler]

Delphi-Quellcode:

usproz := ueberstunden/pflichstunden * 100;

if usproz <= 10 then
begin
    proz := 25;
end
else
begin
    proz := 30;
end;

bruttolohn := pflichtstunden*stundenlohn; 

if ueberstunden > 0 then bruttolohn :=  bruttolohn + uerberstunden *stundenlohn*proz;