Question

Составить программу решения задачи Z=/(x-7)

Answer 1

Program Task;
Var x, Z: Real;
Begin
    Write('x = ');
    ReadLn(x);
    Z := Sqrt(x + 7);
    WriteLn('Z = ', Z:5:3);
    ReadLn;
End.