Составьте программу вычисления выражения: max(x+y+z, xyz)+3 если x,y,z введены с клавиатуры. по паскалю.

Program xyz;
var max,x,y,z:integer;
begin
readln(x,y,z);
max:=x;
if ((max<y) and (y>z)) then max:=y
else if ((max<z) and (z>y)) then max:=z;
writeln(,max,'(',x,'+',y,'+',z,')=',max*(x+y+z));
end.