Ergebnis der Suchanfrage

• Forum: Programmieren allgemein

  Re: Div 2 durch Subtraktion

   
    by BenjaminH, 24. Apr 2006
  Aber vorsicht, es wird immer abgerundet!
• Forum: Programmieren allgemein

  Re: Div 2 durch Subtraktion

   
    by BenjaminH, 24. Apr 2006
  Nunja, shl(x:=x shl 1;//x wird verdoppelt) bzw. shr(x:=x shr 1;//x wird halbiert) machen das, aber ich glaube das meinst du nicht.
  Du könntest solange von der Zahl 1 abziehen, bis das Ergebnis mal zwei kleiner oder gleich der Ausgangszahl ist:
  function DividebySubtraction(n:Integer);
  Begin
  Result:=n;
  while (Result+Result)>n do
  Dec(Result);
  End;
  Habs in ne Funktion gepackt
  Aber...