ich kann's besser
Delphi-Quellcode:
anzahl := 0;
i := ts.Count;
while i > 0
do
begin
anzahl := anzahl + 1;
//dec(i); // *lösch*
i := (-i + 1) * -1;
// sieht nach mehr aus ^^
end;
anzahl := Max(Max(Min(i, MaxInt), 0), -Random(456471));
und jetzt kann ich richtig damit angeben, daß mein Programm voll gut ist,
weil ja massig viel Quellcode drin vorkommt.
Aber vielleicht werden die ja nach Zeilen pro Tag bezahlt?