Цель работы:изучение условногооператора,оператораотбора, составногооператора иправил программированияразветвляющихсяалгоритмов.
Задание№ 17. Вычислитьзначение функции,заданной графиком
при , при и при .Блок-схема.
\
Программана TurboPascal
{****************************************************************}
{Программа:lab5,Лаб. раб. №5, Вар.17 }
{Цель:изучение условногооператора,оператораотбора, составного }
{оператораи правил программированияразветвляющихсяалгоритмов. }
{Описаниепараметрови переменных: }
{x-исходные значения,y-значение функции }
{Требуемыеподпрограммы:нет. }
{Программист:Позднышев А.А.,гр. 316 }
{Проверил:Баринов В.В.,каф. ВПМ }
{Датанаписания: 18февраля 2004 г. }
{*****************************************************************}
Programlab5;
Var
x,y:real;
Begin
Write(‘Введитеx=’); read(x);
Ifx
else
if x
else y:=0;
Writeln(‘y=’,y)
End.{lab5}
Результатывычисленияпрограммы:
x=-3y=9
x=2y=9.09297426826015E– 0001
x=5y=0
МинистерствообразованияРФ
Рязанскаягосударственнаярадиотехническаяакадемия
Кафедра ВПМ
Отчет о
лабораторнойработе № 5:
«Программированиеалгоритмовразветвляющейсяструктуры»
Выполнил: ст. гр. 316
ПозднышевА.А.
Проверил:Баринов В.В.
Рязань 2004