Объяснение:
var
a, b, x : Double;
begin
Readln(a);
Readln(b);
if a>b then
x=a+b
else
x=a*b;
writeln(FloatToStr(x));
end;
Объяснение:
var
a, b, x : Double;
begin
Readln(a);
Readln(b);
if a>b then
x=a+b
else
x=a*b;
writeln(FloatToStr(x));
end;