Даны целые числа X,Y,Z. Вычислить MAX(X+Y+Z, XYZ) Начертить блок-схему Составить...

Question

Даны целые числа X,Y,Z. Вычислить MAX(X+Y+Z, XYZ)
Начертить блок-схему
Составить программу в паскале

Answer 1

Программа:
var x,y,z,max:integer;
 begin
write('x=');readln(x);
write('y=');readln(y);
write('z=');readln(z);
if x+y+z>x*y*z
  then max:=x+y+z
 else max:=x*y*z;
writeln('max=',max);
end.
Схема - в файле

---

Comments

Очень благодарна