Вычислить y=sqrt(4*x^3+14*x^2-12*x). После ввода, учитывать что решение имеет только в...

Question

Вычислить y=sqrt(4*x^3+14*x^2-12*x). После ввода, учитывать что решение имеет только в случае когда подкоренное выражение >=0. Если подкоренное выражение будет<0, то выводить нет решения и отправлять обратно на ввод аргумента.</p>

Comments

какой язык?

---

pascal

Answer 1

Var x,y:integer;
begin
readln(x);
if x<0 then writeln(<span>y=sqrt(4*exp(3*ln(x))+14*sqr(x)-12*x)) else 
writeln('no solution');
readln;
end.