Positive Zahlen in negative umwandeln

[The Riddler]

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