Программирование алгоритмов линейной структуры

ПЕНЗЕНСКИЙ ГОСУДАРСТВЕННЫЙ УНИВЕРСИТЕТ

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

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

ИНФОРМАТИКА

Тема: «Программирование алгоритмов линейной структуры»

Выполнил: студент гр. 02ТП1 Пахомов В.

Е.

Проверил: преподаватель Ракова А. А.

2003

Задание:

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

выражения, соответствующего варианта. Ввести исходные данные и результат с

пояснительным текстом.

[pic]

Программа:

uses crt;

var

a, b, x, y: real;

begin

clrscr;

writeln('Введите значение Х ');

readln(x);

writeln('Введите значение A ');

readln(a);

a:=sin((sqrt(abs(exp(5*ln(x))+a))))/(exp(-

x)+exp(9))/cos(sqrt(abs(exp(5*ln(x))+a)))/(exp(-x)+exp(9));

y:=3.14*(a)-1.65*exp(-x*a)+0.33*ln((sqr(x)+1)/(sqr(x)+pi));

writeln('Значение Y ', y:3:3);

readkey;

end.

Блок-схема:

[pic]

-----------------------

Начало

a, x

[pic]

Конец