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

Задание:

1. Ознакомиться с теоретическим материалом.

2. Составить конспект по данной лекции (записать в рабочую тетрадь). Сфотографировать и выслать мне на электронную почту или ВКонтакт.

3. Особенно внимательно изучите примеры составления программ. Тексты программ пишем особенно внимательно, без ошибок – они будут Вам нужны на дальнейших занятиях при выполнении практических работ.

4. Если у Вас дома на компьютере установлена система программирования PascalABC.Net (или другая система программирования, позволяющая набирать текст программы на языке Паскаль), наберите в ней текст программы Задачи1 и запустите её на выполнение.Скрин (или фото) программы пришлите мне на электронную почту.

Лекция №

Тема: «Операторы управления. Оператор условного перехода
IF – THEN - ELSE»

План

I. Общие сведения об операторах управления

II. Оператор условного перехода IF – THEN – ELSE

II.1. Общий вид оператора и принцип его работы

II.2. Примеры решения задач с использованием оператора условного перехода

I. Общие сведения об операторах управления

Ранее рассмотренные нами программы были линейными. В этих программах операторы выполнялись последовательно один за другим. Однако такая структура используется только для реализации простых алгоритмов. В реальной жизни мы часто сталкиваемся с примерами, когда следует выполнить то или иное действие в зависимости от конкретных условий или выполнить некоторое действие несколько раз. Точно также и при решении многих практических задач с использованием компьютера возникает потребность в смене порядка выполнения операторов в программе.

Операторы управления позволяют изменить порядок выполнения операторов в программе. К ним относятся операторы перехода и операторы цикла.

II. Оператор условного перехода IF – THEN - ELSE

II.1. Общий вид оператора и принцип его работы

Оператор условного перехода используется в случае, когда необходимо выбрать одно из возможных действий в зависимости от некоторого условия. Он позволяет изменить порядок выполнения операторов в программе в зависимости от определенных условий.

Общий вид оператора условного перехода:

IF <условие> THEN <оператор 1>

ELSE <оператор 2>;

Работа оператора: если условие, заданное в операторе IF, является истинным, то выполняется <оператор 1>; в противном случае, если условие является ложным, выполняется <оператор 2>.

Рассмотрим, например, следующий фрагмент программы:

A:=5; B:=3;

If A>B Then Y:=A*B

Else Y:=A+B;

В данном примере после выполнения условного оператора переменная Y будет иметь значение 15 (т.к. условие A>B является истинным, машина выполнит оператор Y:=A*B)

Если же в данном примере изменить исходные данные, например:

A:=2; B:=4;

If A>B Then Y:=A*B

Else Y:=A+B;

то после выполнения условного оператора переменная Y будет иметь значение 6 (т.к. условие A>B является ложным, машина выполнит оператор Y:=A+B).

II.2. Примеры решения задач с использованием условного оператора

Приведем примеры задач с использованием оператора условного перехода.

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

Блок – схема алгоритма

Текст программы на языке Паскаль

Program Primer;

Var X, Y: Real;

Begin

Write (‘Введите Х=’);

Readln (X);

IF X>0 THEN Y:= SQRT(X) {SQRT – это корень }

ELSE Y:= SQR(X); {SQR – это возведение в квадрат }

Writeln (‘Y=’,Y:6:2)

End.

Слово Else не является обязательным. Допускается усеченный формат оператора условного перехода:

IF <условие> THEN <оператор>;

Работа такого оператора: если условие является истинным, то выполняется оператор, записанный после слова THEN. В противном случае выполняется оператор, следующий за оператором IF.

В рассмотренном выше примере можно было использовать следующую конструкцию:

IF X>0 THEN Y:=SQRT(X);

IF X<=0 THEN Y:=SQR(X);

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

для любых х и с.

Текст программы на языке Паскаль

Program Primer_2;

Var C,X, A, Z: Real;

Begin

Write (‘Введите значения Х,C’);

Write (‘X=’); Readln (X);

Write (‘C=’); Readln (C);

A:=2*SQR(C)+1;

IF X>A THEN Z:= SIN(X)

ELSE IF X<A THEN Z:=COS(X)

ELSE Y:=SIN(X)/COS(X);

Writeln (‘ При Х=’,Х:6:2, 'C=',C:6:2, 'Y=',Y:6:2)

End.

В данном примере использована вложенная конструкция условных операторов.