Positive Zahlen in negative umwandeln

[Roachford]

zahl := -zahl;