// PascalABC.NET 3.4
begin
var x:=ReadReal('введите x:');
var y:=(18.3*Exp(-x*x/2)-6.3*Exp(-x/3))/(7.4*Tan(x/2)-(2*x)**(1/3));
Writeln('2. y=',y);
y:=Exp(-x*x/2)+Abs(Tan(x*x*x)**3/(1+Sqrt(x)))**(1/3);
Writeln('3. y=',y);
y:=Ln((Exp(-x*x)-x**0.25+Cos(x/2))/Sqrt(1+Tan(x*x)**2));
Writeln('4. y=',y)
end.