Скласти програму обчислювання функции ; S=sin^3t + cosZ^3 ln/x/ / e^-у при t = 0.7 Z= -1.9 y1= -7.2 y2= 1.5 y3= 4.1 x1= 6,3 x2= -10 x3= -3

var t,x,y,z,q,s:real; begin t:=0.7; z:=-1.9; q:=sin(t); y:=-7.2; x:=6.3; s:=q*q*q+cos(z*z*z)*ln(abs(x))/exp(-y); writeln('s1 = ',s); y:=1.5; x:=-10; s:=q*q*q+cos(z*z*z)*ln(abs(x))/exp(-y); writeln('s2 = ',s); y:=4.1; x:=-3; s:=q*q*q+cos(z*z*z)*ln(abs(x))/exp(-y); writeln('s3 = ',s); end. Результат: s1 = 0.268513472402621 s2 = 8.92280608564129 s3 = 55.8685175541082