нужно написать программу ( в паскале) в результате выполнения который большее из двух чисел заменяется числом ему противоположным . помогите!!!

это программа меняет на противоположный(+ на - и наооборот)program apscala;var a,b,max:integer;beginreadln(a,b);if a>b then max:=a else max:=b;max:=-max;writeln(max);end.