Очень срочно инфа 9 класс

Ответ:

===== PascalABC.NET =====

var  

 a,b : integer;

begin

 writeln('введите a,b');

 readln(a,b);

 if a>b then a:=a-b

   else b:=b-a;

 writeln('Максимальное = ',max(a,b));

end.

Объяснение: