ВЫЧИСЛЕНИЕ ЗНАЧЕНИЙ АРИФМЕТИЧЕСКИХ ВЫРАЖЕНИЙ. Составить схему алгоритма и программу для вычисления значения функции W=W(x,y,z ).Вывести значения аргументов x

Задание №1

Составить схему алгоритма и программу для вычисления значения функции W=W(x,y,z ).Вывести значения аргументов x, y, z и функции W.

№

; X=0.145, y= -1.45, z=2.145.

var

x,y,z,w:real;

begin

x:=0.145;

y:=-1.45;

z:=2.145;

w:=exp(-sqr(cos(x))*ln(2))+ln(abs(sqrt(1+y*y)-sqrt(1+z*z)));

writeln('X=',x:4:3);

writeln('Y=',y:4:3);

writeln('Z=',z:4:3);

writeln('W=',w:10:9);

readln;

end.

ЛИНЕЙНЫЙ ВЫЧИСЛИТЕЛЬНЫЙ ПРОЦЕСС

Задание 2

Составить схему алгоритма и программу для вычисления значений соответствующих данному варианту величин. Вывести все значения вычисляемых величин.

№

;

;

;

u= ;

t= ;

s=cos3+arctg1,2 .

var s,t,u,v,w,r:real;

begin

s:=cos(3)+arctan(1.2);

t:=cos(s)/sin(s)+exp(-s/2*ln(2));

u:=1/exp(1/3*ln(1+t*t+s*s));

v:=exp(-u)-arctan(sqrt(1-sqr(u*u/(t*t+u*u))/u*u/(t*t+u*u)));

w:=ln(5+exp(1/5*ln(u*u))+exp(1/5*ln(v*v)));

r:=abs(sin(u)+cos(v)-cos(u+v+w));

writeln('S=',s:10:9);

writeln('T=',t:10:9);

writeln('U=',u:10:9);

writeln('V=',v:10:9);

writeln('W=',w:10:9);

writeln('R=',r:10:9);

readln;

end.