найти и напечатать u = min{x+y, xy}

///Pascal abc)

var x,y,u:real;function min(a,b:real):real;begin if a>b then min:=b else min:=a;end;beginwrite('x=');read(x);write('y=');read(y);u:=min(x+y,x*y);writeln(u);end.