Помогите составить и решить задачу.

Помогите составить и решить задачу.
Гость
Ответ(ы) на вопрос:
Гость
var x,y:real; begin readln(x); if x<1 then y:=(x*x)/sqrt(1-x); if x=1 then y:=x+3; if x>1 then y:=2*(x*x); writeln(y); end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы