лабораторная работа / лаба1

САРАТОВСКИЙ ГОСУДАРСТВЕННЫЙ ТЕХНИЧЕСКИЙ УНИВЕРСИТЕТ

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

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

 

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

 

                                                                          

 

 

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

по дисциплине

Программирование линейных вычислительных процессов на языке Turbo Pascal

 

                                                                               

 

 

Выполнил: ст. гр. УИТ-21

Проверил:

«_____» ___________2008г.

                  

                                                    

 

 

 

 

2008

Цель работы: знакомство с основами алгоритмизации и програмирования линейных вычислительных процессов на языке Turbo Pascal.

Задание 1:

Вычислить и вывести на экран значения переменных f и z , используя расчетные формулы:

f =e^-axln(ax+1)-tg²(ax+1)

z =-ax³sin(ax+1)²

где х=1,5, a=0,12

Блок схема:

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

Program lab_1;

Var

a,d,x,f,z,c:real;

Begin

Writeln('‚Введите x,a');

Read(x,a);

d:=ax+1

c:=sin(d)/cos(d);

f:=Exp(-a*x)*ln(d)-sqr(c);

z:=sqrt(d)-a*x*x*x*sin(sqrt(d));

Writeln('x=',x:8:3,'a=',a:8:3);

End.

Ответ: x= ; a=