Структурированные операторы

Пустой оператор

Обращение к процедуре (функции)

Назначение. При обращений к процедуре (функции) вызывает код подпрограммы, который прерывает выполнение основной программы и приступает к выполнению последовательность команд, содержащихся в подпрограмме (процедуре или функции). После выполнения подпрограммы выполнение программы продолжается, начиная с оператора, следующего после вызванной процедуры.

Формат записи

<имя процедуры> [ (<Список параметров>) ]

Перед использованием процедура или функция должны быть описаны в разделе описания процедур и функций.

При обращении к процедуре (функции) в списке параметров указываются фактические параметры, которые передают в процедуру (функцию) или возвращают из нее некоторые данные.

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

Таким образом, формальные параметры показывают в каком виде (какого типа данные и в каком форме) должны быть переданы фактические параметры в процедуру. Следовательно, формальные параметры и фактические параметры должны быть одного типа.

Формальные параметры, передаваемые в списке параметров, будут рассмотрены в последующих лекциях.

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

Составной оператор (Begin End;):

Назначение. Составной оператор служит для объединения произвольного числа операторов в группу. Фактически составной оператор является операторными скобками.

Формат записи:

Begin

<оператор1>;

…

<операторN>;

End;

Пример: if x=0 then

Begin Writeln ('Деление на ноль');

Writeln ('Введите новое значение Х');

Goto 1;

End;

Оператор одного условия (If)

Назначение. Оператор If реализует алгоритмическую конструкцию «ветвление» и изменяет порядок выполнения операторов в зависимости от истинности или ложности заданного условия.

Формат записи: If <условие> then <оператор1>

[else <оператор2>]

<Условие> - выражение булевского типа, может быть простым или сложным;

<Оператор1>, <оператор2> простые или составные операторы.

Пример: if x=0 then Begin Writeln ('Деление на ноль');

Writeln ('Введите новое значение Х');

Goto 1;

End

else Begin Y:=(a+b)/x;

Writeln (‘Y = ’,Y);

End;

Оператор выбора (Case)

Назначение. С помощью этого оператора можно выбрать выполнение одного оператора из любого количества вариантов.

Формат записи: Case <выражение-селектор> of

<список1>: <оператор1;>

<список2>: <оператор2;>

……

<списокN>: <операторN;>

[ else <оператор>]

End; {Case}

При использовании оператора Case необходимо помнить, что:

· тип выражения-селектора и типы констант списков выбора должны быть одинаковы;

· все операторы могут быть как простыми таки составными.

Пример.

Case I of

0,2,4,6,8: Writeln ('Четная цифра');

1,3,5,7,9: Writeln ('Нечетная цифра');

10..100: Writeln (‘Число от 10 до 100’)

else

Writeln (‘Отрицательное число или больше 100’)

End;

Оператор цикла (Repeat)

Назначение. Оператор цикла Repeat организует выполнение цикла, состоящего из любого числа операторов с неизвестным заранее числом повторений. Тело цикла выполняется хотя бы один раз. Выход из цикла осуществляется при истинности заданного условия.

Формат записи: Repeat <Оператор1;>

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

…..

<ОператорN>

until <условие>;

Группа операторов от 1 до N образует тело цикла.

Пример.

Repeat

Write (‘Введите числа X и Y ’);

Readln (X,Y);

Sum:=X+Y;

Writeln (‘Сумма чисел X+Y равна ’, Sum);

Write (‘Завершить программу? ’);

Readln (Ch);

Until (UpCase(Ch) = ‘Y’) or (Ch = ‘д’) or (Ch = ‘Д’);

{UpCase – получение заглавной буквы}

Оператор цикла While;

Назначение. Оператор цикла While организует выполнение одного оператора неизвестное заранее число раз. Выход из цикла осуществляется, если заданное логическое выражение окажется ложным. Так как истинность логического выражения перед началом выполнения оператора, то тело цикла может не выполниться ни разу.

Формат записи:

While <условие> do <оператор;>;

Оператор образует тело цикла, он может быть простым или составным.

Пример.

a:=5000;

While Abs(a)>0.0001 do

a:=a*0.99;

Оператор цикла For;

Назначение. Оператор цикла For организует выполнение одного оператора заранее известное число раз.

Различают две формы записи оператора For.

Формат записи 1:

For <параметр цикла>:= <S1> to <S2> do <оператор>;

Формат записи 2:

For <параметр цикла>:= <S1> Downto <S2> do <оператор>;

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

Необходимо помнить, что после каждого шага цикла:

при использовании формата записи 1 параметр цикла увеличивается на 1, следовательно, всегда S2 должно задавать большим или равным S1,

а при использовании формата записи 2 параметр цикла уменьшается на 1, следовательно, всегда S1 должно задавать большим или равным S2.

Пример.

For I:=1 to 9 do Write (‘I = ‘,I);

For j:=’Z’ downto ‘A’ do Write (j);

Дата добавления: 2014-01-04