лабораторная работа / вар4 / лаб8

Балаковский институт техники технологий и управления

Лабораторная работа №8

Вариант 4

Выполнил студент УИТ-2в

Балаково 2007 год.

Вычислить

;

x₁=5.4; x₂=6.311

Т

задается функция f

екст программы:

program lab8;

var x:real;

y:real;

function f(a:real):real;

begin

f:=(exp(3*ln(a))+sqr(a)+6)/(exp(3*ln(cos(a)))+sqr(cos(a))+5);

end;

b

y= (f(x))³+(f(x²))²+f(x³)

egin

writeln('Введите x');

read(x);

y:=exp(3*ln(f(x)))+sqr(f(sqr(x)))+f(exp(3*ln(x)));

writeln('y=',y:6:3);

end.