Ergebnis der Suchanfrage

• Forum: Object-Pascal / Delphi-Language

  Re: Rechenaufgabe

    Delphi
    by himitsu, 17. Jul 2006
  @Amateurprofi: was ich schrieb, war der Pascal-Code und du hattest ja schon die optimiertere Version.
  
  In Pascal muß man ja z.B. immer das ergebnis zuweisen, auch wenn es eigentlich sinnlos wäre ... in ASM könnte man es gleich optimiert schreiben, aber in Pascal schreibt man es halt erstmal hin, damit der Compiler nicht mekert und läßt es sich dann wieder wegoptimieren :stupid:
  
  z.B. beim...
• Forum: Object-Pascal / Delphi-Language

  Re: Rechenaufgabe

    Delphi
    by himitsu, 13. Jul 2006
  Aber mit ein bissl Nachdenken hätte man auch selber auf eine Lösung kommen können ... entweder unter MATH in der OH suchen, oder
  
  if x < 0 then x := -x;
  PS: ABS macht intern nichts anderes ;)
  
  function abs(x: TYP): TYP;
  begin
  if x < 0 then
  result := -x
  else