Главная Учебники - Разные Лекции (разные) - часть 32
|
Цель работы:
изучение условного
оператора,
оператора
отбора, составного
оператора и
правил программирования
разветвляющихся
алгоритмов.
Задание
№ 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
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 | |||||