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

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

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

Вариант 22

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

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

Вычислить

;

x₁=2.02; x₂=2.845

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

program lab8;

var x,k:real;

y:real;

function f(a:real):real;

begin

f:=sin(a)+cos(a);

end;

begin

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

read(x);

y:=f(sqr(x))/f(x)+sqr(f(x));

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

end.

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

y:=f(sqr(x))/f(x)+sqr(f(x))