Оператор перехода

goto метка;

Обычно операторы в программе выполняются в том порядке, в каком они записаны.

Процедура Goto - осуществляет переход в какое-нибудь место в программе из любой ее точки. То есть с ее помощью можно "прыгать" по программе. Обычно эти прыжки происходят из-за каких либо условий, вот пример:

1. Вводим два числа;

2. Складываем их и выводим сумму на экран;

3. Спрашиваем, повторить ли действие?

4. Если ответ утвердительный, переходим (прыгаем) на пункт 1 данного алгоритма.

5. Завершаем программу.

Пример записи оператора перехода:

goto 218;

Условный оператор

if выражение then

оператор1

else

оператор2;

Условный оператор в короткой форме работает по правилу: если булевское выражение истинно, то выполняется оператор , далее выполняется оператор, следующий за условным. Если булевское выражение B ложно, то будет выполняться оператор, следующий за этим условным оператором.

IF..Then..Else - (англ. Если....То...Иначе). Очень важная и необходимая конструкция Паскаля. Используется для проверки каких-либо условий. В этой конструкции используются знаки сравнения, которые в Паскале обозначаются так:

>	Бoльше
<	Меньше
>=	Бoльше или равно
<=	Меньше или равно
<>	Не равно

Цикл с предусловием

while выражение do

оператор;

Цикл с постусловием

repeat оператор

until выражение;

Цикл с параметром

for i= параметр_1 to параметр_2 do

оператор

for i= параметр_1 downto параметр_2 do

оператор

Операторы завершения цикла

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

В версии ТУРБО ПАСКАЛЬ 7.0 определены стандартные процедуры Break и Continue. Процедура Break выполняет безусловный выход из цикла. Процедура Continue обеспечивает переход к началу новой итерации цикла.

Оператор варианта

case выражение of

case условие_1: оператор_1;

case условие_2: оператор_2;

...

case: условие_N: оператор_N

else

условие;

end;

Некоторые процедуры

Процедура Write

Эта процедура выводит на экран какие-либо данные. Она может выводить три основные вещи:

1. Строку символов;

2. Переменную;

3. Результат вычислений;

Read(A1,A2,...AK);

ReadLn(A1,A2,...AK);

ReadLn;

Первый из них реализует чтение К значений исходных данных и присваивание этих значений переменным А1, А2, ..., АК. Второй оператор реализует чтение К значений исходных данных, пропуск остальных значений до начала следующей строки, присваивание считанных значений переменным А1, А2, ..., АК. Третий оператор реализует пропуск строки исходных данных.

Процедура Readln; - используется для чтения с клавиатуры. В нашей программе она служит для того, чтобы затормозить программу после выполнения. В этой процедуре может быть задан параметр, помещенный после нее в скобках -

Readln(A);

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

Процедура Inc - (от англ. Increment - увеличение).

Эта процедура увеличивает переменную на заданное число или на другую переменную.

Синтаксис:

1. Inc(переменная, заданное_число (другая_переменная) );

2. Inc(переменная); - при отсутствии 2-го параметра увеличивает переменную на единицу (это как бы по умолчанию).

1. Имеем переменную Count. Так увеличиваем ее на единицу:

Inc(Count);

2. Та же переменная Count, но увеличиваем ее на 10:

Inc(Count, 10);

Процедура Dec - (от англ. Decrement - увеличение).

Эта процедура уменьшает переменную на заданное число или на другую переменную.

Синтаксис:

1. Dec(переменная, заданное_число (другая_переменная) );

2. Dec(переменная); - при отсутствии 2-го параметра уменьшает переменную на единицу.

И примеры использования процедуры:

1. Имеем переменную Count. Так уменьшаем ее на единицу:

Dec(Count);

2. А так уменьшаем на 7:

Dec(Count, 7);

Процедура Writeln - эта процедура работает точно так же, как и Write, но после того, как выведет строку, она переносит курсор на новую строку.

For I := 10 downto 1 do