Написать программу в Паскале.
Даны два числа, если первое больше второго, то найти разницу. В обратном случае найти произведение

var

 a, b, s, integer;

begin

 readln(a, b);

 if a>b  then s:=a-b

 else s:=a*b;

   writeln(s);

readln;

end.

Даны два числа, если первое больше второго, то...