Реферат: Лабараторная работа №4

Цель работы: изучение правил записи констант, переменных, выражений, операторов присваивания, раздела определения констант, раздела описания переменных и общей структуры программы на языке Turbo-Pascal.


Задание № 17. Составить программу вычисления функции и определить характер ее зависимости от значений исходных данных:


Блок-схема.



Программа на Turbo Pascal


{****************************************************************}

{Программа: lab4, Лаб. раб. №4, Вар. 17 }

{Цель: изучение правил записи констант, переменных, выражений, }

{операторов присваивания, раздела определения констант, раздела }

описания переменных и общей структуры программы на языке Turbo-Pascal}

{Описание параметров и переменных: }

{a,c -исходные значения, b -промежуточное значение, x -значение функции }

{Требуемые подпрограммы: нет. }

{Метод: вычисление по формулам }

{Программист: Позднышев А.А., гр. 316 }

{Проверил: Баринов В.В., каф. ВПМ }

{Дата написания: 14 февраля 2004 г. }

{****************************************************************}


Program lab4;

Var

A,b,c,x:real;

Begin

Write(‘Введите а=’); read(a);

Write(‘Введите c=’); read(c);

b:=a*a+c*c;

x:=exp(b*ln(abs(cos(a+2.53*c))));

Writeln(‘x=’,x)

End. {lab4}


--> ЧИТАТЬ ПОЛНОСТЬЮ <--

К-во Просмотров: 232
Бесплатно скачать Реферат: Лабараторная работа №4