Введены 2 числа, выведите их произведение, если первое больше второго и разность их в противном случае
var a,b:integer; begin readln(a,b); if (a>b) then writeln(a) else begin writeln(b); end; readln; end.