var
x, a, b, y, z: real;
begin
x := 2.5;
a := 8.7;
b := 1.8;
y := (Exp(x + 3.1) + 2) / (x + 6.1);
z := 2 * y + Tan(b) + 3;
z := (Exp((1 / 3) * Ln(a)) + z) / z;
Writeln('y = ', y, ' z = ', z)
end.
y = 31.6774892355991 z = 1.03313601798708
