У нас есть несколько работ на данную тему. Вы можете создать свою уникальную работу объединив фрагменты из уже существующих:

Лабораторная работа №5 1.8 Кб.
Лабораторная работа №5 Исследование электрической цепи источника постоянного тока 7.9 Кб.

Лабораторная работа №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