Question

Помогите решить плиз....

Answer 1

var x,y:real;

begin
readln(x);
if x>=3 then y:=exp(x)+1
else y:=sqrt(4*sqr(x)+3);
writeln(y);
end.