?

(FPCore (x) :precision binary64 (+ (- (pow x 2.0) (* 4.0 x)) (sqrt x)))

double code(double x) {
	return (pow(x, 2.0) - (4.0 * x)) + sqrt(x);
}

real(8) function code(x)
    real(8), intent (in) :: x
    code = ((x ** 2.0d0) - (4.0d0 * x)) + sqrt(x)
end function

public static double code(double x) {
	return (Math.pow(x, 2.0) - (4.0 * x)) + Math.sqrt(x);
}

def code(x):
	return (math.pow(x, 2.0) - (4.0 * x)) + math.sqrt(x)

function code(x)
	return Float64(Float64((x ^ 2.0) - Float64(4.0 * x)) + sqrt(x))
end

function tmp = code(x)
	tmp = ((x ^ 2.0) - (4.0 * x)) + sqrt(x);
end

code[x_] := N[(N[(N[Power[x, 2.0], $MachinePrecision] - N[(4.0 * x), $MachinePrecision]), $MachinePrecision] + N[Sqrt[x], $MachinePrecision]), $MachinePrecision]

\left({x}^{2} - 4 \cdot x\right) + \sqrt{x}