Задание 1. Использование условного оператора

Составить программу для вычисления значения составной функции при произвольном значении :

Блок-схема алгоритма предложенной задачи будет иметь вид:

Рис. 2. Блок-схема программы

1. Запустите Turbo Pascal.

2. В окне редактирования наберите текст программы:

Program Uslovie_1;

var x, y: real;

begin

Write ('Введите значение х');

Read (x);

If x<0 Then y:=x*x

Else y:=3*exp(-x);

Writeln('При х = ', x:4:2, ' y= ', y:6:2)

end.

3. Запустите процесс компиляции программы комбинацией клавиш Alt+F9.

4. Запустите программу на выполнение.

5. Просмотрите результаты.

6. Протестируйте программу при некоторых значениях переменной .

7. Сохраните программу на диске под именем uslov1.