Ответ(ы) на вопрос:
ГостьVar x,z:real;
Begin
Readln(x);
If x<0 then
Z:=x/3;
If x>=0 then
Z:=2+SQRT(x*x*x);
Writeln(z);
End.
Гостьvar x,z:real;
Begin
write('x = ');
readln(x);
if x<0
then z:=x/3
else z:=2+sqrt(x*x*x);
writeln('z = ',z);
End.
Пример:
x = -18
z = -6
Не нашли ответ?
Похожие вопросы