Даны действительные числа x,y,z. Вычислить max (x+y+z,xyz).

Question

Даны действительные числа x,y,z. Вычислить max (x+y+z,xyz).

Answer 1

Uses crt;
var x,y,z:real;
begin
read(x,y,z);
if x+y+z>x*y*z then
writeln(x+y+z)
else
writeln(x*y*z);
end.

Comments

Действительно, не заметил, спасибо.

---

real

Answer 2

Uses crt;
var x,y,z,max: real;
begin
     readln(x,y,z);
     if x+y+z>x*y*z then writeln('max=x+y+z=',x+y+z);
     if x+y+z     if x+y+z=x*y*z then writeln('x*y*z=x+y+z=',x*y*z);
end.