Ответы и объяснения

Лучший Ответ!
2013-11-25T01:15:27+04:00
Program Task;
Var x, Z: Real;
Begin
    Write('x = ');
    ReadLn(x);
    Z := Sqrt(x + 7);
    WriteLn('Z = ', Z:5:3);
    ReadLn;
End.