Даны три вещественных числа x, y, z. вычислить значения выражений x +y+z и xyz и вывести максимальное из них

Решение
var
x, y, z: integer;

begin
readln(x, y, z);
if (x+y+z)>(x*y*z) then write(x+y+z) else write(x*y*z);
end.

Если есть вопросы, пиши.