Question

введите x, вычислите Z если x допустимое значение, если нет то пишем x- имеет недопустимое значение, Z вычисляется Z=sqrt(x+5)

Answer 1

var x, z: real;
begin
readln(x);
if x < -5 then writeln('x - недопустимое число');
else z := sqrt(x + 5);
writeln(z);
end.