Помогите сделать задание в Pascal Вычислите выражение при заданных константах: a=10.2; b=9.2; x=2.2; c=0.5;
где само выражение?
Я не вставил фотографию
щас решу)
как фотографировать
я просто в диривни жыву
Это не я писал)
Varf,z:real;consta=10.2;b=9.2;x=2.2;c=0.5;beginf:=ln(a+sqr(x))+sqr(sin(x/b));writeln('f= ',f);z:=exp(-c*x*ln(e))*(x+sqrt(x+a))/(x-sqrt(abs(x-b)));writeln('z= ',z);end.
var f,z:real; const a=10.2; b=9.2; x=2.2; c=0.5; begin f:=ln(a+sqr(x))+sqr(sin(x/b)); writeln('f= ',f); z:=exp(-c*x*ln(e))*(x+sqrt(x+a))/(x-sqrt(abs(x-b))); writeln('z= ',z); end.