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

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

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

Вариант 14

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

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

Вычислить

;

x₁=1.14; x₂=2.483

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

program lab8;

var x:real;

y:real;

function f(a:real):real;

begin

f:=(sqrt(x)+sqrt(sin(x)))/(sin(sqrt(sqr(x)+1)+sqrt(sin(sqr(x)+1)))/cos(sqrt(sqr(x)+1)+sqrt(sin(sqr(x)+1))));

end;

begin

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

read(x);

y:=sqrt(f(x))+sqrt(sin((f(x))));

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

end.

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

y:= sqrt(f(x))+sqrt(sin((f(x))))