Материалы сайта
Это интересно
Лабораторная работа №5
Цель работы: изучение условного оператора, оператора отбора, составного оператора и правил программирования разветвляющихся алгоритмов. Задание № 17. Вычислить значение функции, заданной графиком [pic] при [pic], [pic]при [pic] и [pic] при [pic]. Блок-схема. \[pic] Программа на 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