Составьте программу нахождения наименьшего из двух выражений x+y+z и xy2

Question

Информатика

Арся

26 декабря, 07:35

Составьте программу нахождения наименьшего из двух выражений x+y+z и xy2

+2

Ответы (1)

Знаете ответ на вопрос?

Спартак · Answer 1

Var x, y, z, a:real;

Begin

Write ('x = ') ; ReadLn (x) ;

Write ('y = ') ; ReadLn (y) ;

Write ('z = ') ; ReadLn (z) ;

a:=x+y+z;

x:=x*y*2;

WriteLn ('x+y+z = ', a) ;

WriteLn ('2xy = ', x) ;

if a > x then Write ('Min = ', x)

else if a < x then Write ('Min = ', a)

else Write ('Выражения равны')

End.

Составьте программу нахождения наименьшего из двух выражений x+y+z и x*y*2

Составьте программу нахождения наименьшего из двух выражений x+y+z и xy2