Пользователь вводит два числа. если первое число меньше второго то вычислить их сумму, иначе - разность первого и второго.

PROGRAM Z;
var a,b,c:integer;
begin
readln(a,b);
If a<b then c:=a+b
          else c:=a-b;
writeln(c) ;
end.