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

Цель работы: изучение условного оператора, оператора отбора, составного оператора и правил программирования разветвляющихся алгоритмов.

Задание № 17. Вычислить значение функции, заданной графиком при , при и при .

Блок-схема.

\

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

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

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

{Цель: изучение условного оператора, оператора отбора, составного }

{ оператора и правил программирования разветвляющихся алгоритмов. }

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

{x -исходные значения, y -значение функции }

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

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

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

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

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

Program lab5;

Var

x,y:real;

Begin

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

If x<=0 then y:=x*x

else

if x<pi then y:=sin(x)

else y:=0;

Writeln(‘y=’,y)

End. {lab5}

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

x=-3 y=9

x=2 y=9.09297426826015E – 0001

x=5 y=0

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

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

Кафедра ВПМ

Отчет о

лабораторной работе № 5:

«Программирование алгоритмов разветвляющейся структуры»

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

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

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

Рязань 2004