A B not A A and B A or B A xor B

False False True False False False

False True True False True True

True False False False True True

True True False True True False

Символьные ( Char )

Символьные переменные занимаю 1 байт памяти и их значениями служат символы ASCII- кода. К символьным данным применимы стандартные функции Pred,Succ,Ord.

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

Var Lit1,Lit2:char;

Nom:byte;

...

Lit1:=’B’;Lit2:=Pred(Lit1); {Lit2=A}

Nom:=Ord(Lit2); {Nom=65 - ASCII-код символа ‘А’}

Lit1:=Chr(Nom); {Lit1=’A’ - обратное преобразование ASCII-кода в символ}

ОСНОВНЫЕ ОПЕРАТОРЫ

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

< метка >:< оператор >;

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

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

 

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

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

Пример

var I,J:integer;

A,B:real;

Lon:boolean;

...

I:=12; J:=I+10;A:=0.25; B:=Sin(A);Lon:=A<>B;

· Составной оператор

 

Begin < оператор 1>;<оператор 2>;...;<оператор N> end;

Составной оператор позволяет объединить несколько операторов в один. Здесь Begin и End представляют собой операторные скобки.

Пример

Begin X:=0.5;Y:=Sin(X);write(X,Y) {вывод результата вычислений} end;

 

· Оператор безусловного перехода

Goto <метка>;

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

Пример

недопустимо

Label 1, 3, 10; goto 10;

begin begin допустимо

X:=0.5; goto 1;

goto 1; 10:goto 3

... end;

1:Y:=Sin(X)+1; 1:Y:=0.25;

...

end;

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

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

 

True

If < логическое выражение > Then < оператор >;

False

True

If < логическое выражение > Then < оператор 1 > Else < оператор 2 >;

 

False

Пример

if X>0 then Y:=sin(X); sinX, при X>0

if X<=0 then Y:=cos(X); Y= cosX, при X<=0

или

if X>0 then Y:=sin(X) else Y:=cos(X);

Пример

if X mod 2=0 then {подсчет количества четных чисел}

begin Kol:=Kol+1; writeln(‘ Четное ’) end {составной оператор}

else writeln(‘ Нечетное ’);

 

· Оператор выбора Case

 

Case < выражение> of

<список константных значений 1 >: <оператор 1>;

<список константных значений 2 >: <оператор 2>;

...

{ else <оператор 0> }

end;

Выражение относится к ординальному типу (т.е. любому простому кроме

Real).

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

Выполнение оператора заключается в следующем:

n вычисляется значение выражения,

n если полученное значение указано в каком-либо списке констант - выполняется соответствующий оператор 1,2,...,

n если полученное значение не указано ни в одном списке констант - выполняется оператор 0.

{ } необязательная часть оператора.

Пример

Case CHISof

0: Writeln (‘ Ноль ’);

1,3,5,7,9: Writeln (‘ Нечетное ’);

2,4,6,8: Writeln (‘ Четное ’)

Else

Writeln (‘ Не цифра ’)

end;

 

 

· Операторы цикла