Помогите записать пример(Рис.1) ** языке Паскаль, по типу(Рис.2)

Question

Помогите записать пример(Рис.1) на языке Паскаль, по типу(Рис.2)

---

---

Answer 1

Var x,t,y,y1,y2:real;
begin
write('x = ');
readln(x);
write('t = ');
readln(t);
y1:=(exp(-sqrt(x))*cos(x)+10)/(cos(t*sin(t))+10);
y2:=1/ln(abs(x*x*x*x*x+t*t*t*t*t));
y:=y1*y2;
writeln('y = ',y:6:3);
end.

Пример:
x = 1.5
t = 0.9
y =  0.443