Лабараторная работа №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}

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

a=1

c=2

x=8,81987864801886Е – 0001

Контрольный просчет:

a=1

c=2

b=1*1+2*2=5

x=cos5(1+2,53*2)=cos5(5,06)=0,8819878648

Министерство образования РФ

Рязанская государственная радиотехническая академия

Кафедра ВПМ

Отчет о

Лабораторной работе № 4:

«Программирование линейных алгоритмов»

Выполнил: ст. гр. 316

Позднышев А.А.

Проверил: Баринов В.В.

Рязань 2004