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

Question

Информатика

Наталья

8 октября, 11:02

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

+1

Ответы (2)

Знаете ответ?

Анисий · Answer 1

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.

Петюня · Answer 2

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.