Function vereinfachen, bei vielen if abfragen

[r2c2]

@Jasocul
Ah! Jetzt hab ichs kapiert!


@Hallo_Thomas

Zitat von Hallo_Thomas:

noch mah ne kleene Frage

Delphi-Quellcode:

function zaehler(z:Integer):Integer;
var x  :Integer;
begin

  case z of
for x:=0 to 144 do
    x : begin
      Result := Zaehler[x]
    end;

Kann ich diese Case of ANweisung mit soner Schleife combinieren ohne alle 144 Werte auszuschreiben?

lol... Ne, so nicht, aber, dann setzt du ja voraus, dass es n mathematischen zusammenhang zwischen z und den Summanden gibt. Dann kann man das seeeehr vereinfachen:

Delphi-Quellcode:

Result := <mathematischer Zusammenhang>;

z.B.:

Result := z*2+(z-4);

mfg

Christian