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

Question

Петуня

28 июня, 01:55

+2

Ответы (1)

Знаешь ответ?

Тася · Answer 1

Var x, z: real;

begin

readln (x);

if x < - 5 then writeln ('x - недопустимое число');

else z : = sqrt (x + 5);

writeln (z);

end.