Hi,

hab hier eine Quersummefunktion gefunden die ich nach C umschreiben will, was mir aber nicht gelingt.

Hier der Delphi Code:

zusammenfalten · markieren

Delphi-Quellcode:

{*
* Berechne die Quersumme aus einer Zahl x
* z.B.: Quersumme von 1234 ist 10
*}
function QuerSumme(x:Longint):integer;
begin
  Result := 0;
  while x <> 0 do
  begin
    Result := Result + (x mod 10);
    x := x div 10;
  end;
end;

Und hier in C (weiß nicht wie ich Result nach C umschreiben soll)

markieren

Code:

int QuerSumme(int x)
{
    while (x!=0)
    {
   
    }
}

Du brauchst eine interne Variable und am Schluss machst du ein return xyz.

markieren

Code:

int QuerSumme(int x)
{
    int tmp
    while (x!=0)
    {
        tmp += x % 10;
        x /= 10;
    }
    return tmp;
}

War gerad einfach mal so runtergecodet -- auf Richtigkeit prüfen!

OK ich versuch mal.