Positive Zahlen in negative umwandeln

[Larsi]

Hi,
wie kann ich beispielsweise die positive Zahl 40 in - 40 machen. In Delphi?

[Die Muhkuh]

:mrgreen:

Wie machst Du es normal in Mathematik?

[DeddyH]

Ist das Dein Ernst?

Delphi-Quellcode:

Zahl := -abs(Zahl);

Das ist auf jeden Fall negativ.

[nahpets]

* -1
oder

Delphi-Quellcode:

StrToInt('-' + IntToStr(40))

:wink:

[Dunkel]

oder Zahl := Zahl - (Zahl * 2);

[The Riddler]

Oder:

Delphi-Quellcode:

Zahl := ((((Zahl * 350) * -1000) / 350) / 1000)

[DeddyH]

Delphi-Quellcode:

Zahl := Zahl * -Sign(Zahl);

[Roachford]

Delphi-Quellcode:

zahl := -zahl;

[Die Muhkuh]

Herrlich :mrgreen:

[The Riddler]

Delphi-Quellcode:

Zahl := Zahl - (4 * Zahl / 2);