8. Программирование алгоритмов разветвляющейся структуры. Операторы условных и безусловных переходов в языке Pascal

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

В языке ПАСКАЛЬ для таких вычислений предусмотрен условный оператор, который имеет две

формы — полную и краткую.

Полная форма условного оператора имеет вид

IF_ <логическое выражение>_THEN_оператор 1

ELSE_оператор_2

Здесь IF (если), THEN (тогда), ELSE (иначе) - служебные слова, оператор 1, оператор 2 - простые или составные операторы.

Если логическое выражение истинно, тогда выполняется оператор 1, иначе (если логическое выражение ложно) выполняется оператор 2. В качестве операторов 1 и 2 могут быть также условные операторы. Условный оператор относится к сложным, так как в его состав входят другие операторы.

IF X<0 THEN Y: = X+1

ELSE Y: =2*x.

Условие, управляющее разветвлением вычислений, не обязательно должно иметь форму операции отношения. Оно может принимать вид любого логического выражения, в частности логической переменной.

В языке ПАСКАЛЬ допускается и краткая форма условного опе­ратора:

If_ логическое выражение _ then _ оператор 1

Если логическое выражение истинно, то выполняется оператор 1; иначе (если логическое выражение ложно) выполняется оператор, рас­положенный в программе после условного оператора IF. Например,

IF A>15 THEN Y:=X – 7;

Z:=SUM+1

В этом фрагменте представлено два независимых оператора. Один из них условный, другой — оператор присваивания.

В языке ПАСКАЛЬ принят естественный порядок выполнения програм­мы: все операторы выполняются последовательно один за другим в том порядке, как они записаны. Однако в практике программирования за­дач возникает необходимость нарушения последовательности выполне­ния операторов. Например, необходимо обойти участок программы, а вернуться к нему позже. Для этого предназначен оператор перехода, который имеет следующую форму записи:

GO TO _ метка

Метка представляет собой любое целое число без знака в диапазо­не 1-9999 или идентификатор

в некоторых случаях оператор безусловного перехода оказы­вается весьма полезным.

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

Вычислить при

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

Program razv; (*задание названия программы*)

Var x, y, z: real; (*вводимые данные*)

g: real; (*результат*)

Begin

Writeln (’Введите значения x,y,z’); (*вывод сообщения на экран*)

Read (x,y,z); (*ввод данных в программу*)

If x < y Then g := (1 + Abs(0.2 - x)) / (1 + x * y) (*вычисляем значение функции*)

Else g:= EXP(1/3*LN(z)); (* вычисляем значение функции*)

Writeln (’Результат:’);

Write (’g=’, g:5:6);

End.

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

Под массивом понимается совокупность конечного числа данных одного типа. Массив обозначается одним именем. Каждый элемент массива обозначается именем массива с индексом.Элементы массива упорядочены по значениям индекса.

Если в программе используется массив, то он должен быть описан либо в разделе переменных VAR, либо в разделе типов TYPE. Pacсмотрим сначала описание массива в разделе переменных VAR. Форма) описания имеет вид