Пользователь вводит два числа. Если первое число меньше второго то вычислить их сумму, иначе - разность первого и второго.
PROGRAM Z; var a,b,c:integer; begin readln(a,b); If a else c:=a-b; writeln(c) ; end.