2. Операторы языка

 

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

В этом вопросе мы рассмотрим наиболее часто употребляемые операторы языка Турбо-Паскаль.

 

2.1. Оператор присваивания

 

Синтаксис оператора присваивания:

<имя переменной> := <выражение>;

Примеры: k := 7; i := sqr(k); n := k * i;

В этих примерах оператор присваивания k := 7 служит для присваивания переменной k значения 7, оператор присваивания i := sqr(k) служит для присваивания переменной i значения k² , т.е. значения 7 * 7 = 49, а  оператор  присваивания n := k * i присваивает переменной n значения k * k² , т.е. значения 7 * 49 = 343.

При программировании широко используются операторы присваивания вида k := k + 1, смысл которого заключается в том, что надо “взять значение переменной с именем k, прибавить к нему единицу, а затем присвоить новое значение переменной с именем k”. Такой прием называют организацией счетчика.

Рассмотрим в качестве примера программу определения координат материальной точки (х и y) для заданной секунды ее полета (t) по параболической траектории, вычисляемых по формулам:

х = v ^. t ^. cos(O), y = v ^. t ^. sin(O) - g ^. t² / 2,

где v - начальная скорость точки, О - угол ее бросания, g - ускорение свободного падения, равное 9,81 м/с².

 

     program traekt;

        Const g = 9.81;

        Var x, y, v, O : real; t : integer;

        Begin

            read(v, O, t);

            x := v * t * cos(O);

            y := v * t * sin(O) - g * t * t /2;

            writeln('Координата х=',x,' Координата y=',y)

        End.

 

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

 

Синтаксис условного оператора:

if <условие> then <оператор 1> else <оператор 2>;

Пример: if x <= 0 then y := - a * x else y := b * exp(x);

Условный оператор позволяет использовать проверку истинности условия для выбора между разными возможными способами действия. В нем слова if, then и else являются зарезервированными. Если условное выражение, следующее за if истинно, то выполняется оператор (возможно, составной), следующий за then. Если условное выражение ложно, то выполняется оператор (возможно, составной), следующий за словом else. На месте любого оператора в конструкции if-then-else может стоять другой условный оператор if-then-else.

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

Рассмотрим в качестве примера программу вычисления функции y, если она изменяется следующим образом:

 

                 x, при x < 2,

     y =       2, при 0   x   3,

                 -x + 5, при x > 3.

 

program funk;

        Var x, y : real;

        Begin

            read(x);

            if x < 2 then y := x else

            if x > 3 then y := -x + 5 else

            y := 2;

            write(y)

        End.