Записать оператор присваивания, меняет знак переменной number на противоположный.
Number:= number * (-1);