лабораторная работа / вар19 / Лабораторная №8

БАЛАКОВСКИЙ ИНСТИТУТ ТЕХНИКИ ТЕХНОЛОГИИ И УПРАВЛЕНИЯ

ФАКУЛЬТЕТ ИНЖЕНЕРНО-СТРОИТЕЛЬНЫЙ

КАФЕДРА УПРАВЛЕНИЕ И ИНФОРМАТИКА В ТЕХНИЧЕСКИХ СИСТЕМАХ

ЛАБОРАТОРНАЯ РАБОТА №5

ПО ДИСЦИПЛИНЕ

Программирование и основы алгоритмизации

ВЫПОЛНИЛ СТ. ГР. УИТ-23

ПРИНЯЛА

2005

ЛАБОРАТОРНАЯ РАБОТА №8

Задание(19): Вычислить.

Блок- схема реализующая решение программы

Функция Программа

y

Программа, реализующая алгоритм имеет вид:

program lab8_Vika;

var

y,x:real;

function Fun(x:real):real;

begin

Fun:=sin(x)+cos(x);

end;

BEGIN

writeln('Vvedite x');

read(x);

Y:=Fun(Fun(x)/Fun(cos(x)));

writeln('Y=',Y:5:4);

END.

Результаты выполнения программы:

Задаем 2 элемента х:

Х=2.19

У=1.4137

Х=1.117

У=1.3801

5