falls man nicht weiß, obs neg / pos ist und es unbedingt neg. sein muss dann:
Code:
if zahl >= 0 then
zahl := -zahl;
[/quote]
zahl := -abs(zahl);
Marc
9 von 10 Stimmen in meinem Kopf sagen ich bin nicht verrückt, die 10. summt die Melodie von Tetris... | Wenn das die Lösung ist, dann hätte ich gerne mein Problem zurück! |
engbarth.es