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

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