МЕТКИ И ОПЕРАТОРЫ ПЕРЕХОДА




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

Goto

Метка – это произвольный идентификатор, позволяющий именовать некоторый оператор программы и таким образом ссылаться на него. Метка располагается непосредственно перед помеченным оператором и отделяется от него двоеточием. Перед тем как появиться в программе, метка должна быть описана. Описание меток состоит из зарезервированного слова Lable, за которым следует список меток

Lable

Lb1, Lb2;

Begin

goto lb1;

lb1:

lb2:

goto lb2;

Действие оператора Goto состоит в передаче управления соответствующему меченому оператору.

МАССИВЫ

В Турбо Паскале могут использоваться объекты, содержащие множество однотипных элементов. Это массивы – формальное объединение нескольких однотипных объектов (чисел, символов, строк и т.п.), рассматриваемое как единое целое.

При описании массива необходимо указать общее число входящих в массив элементов и тип этих элементов.

Var

a : array [1..10] of real;

b : array [0..40] of char;

c : array [-2..2] of boolean;

При описании массива используются зарезервированные слова Array Of. За словом Array в квадратных скобках указывается тип-диапазон, с помощью которого компилятор определяет общее число элементов массива. Тип-диапазон задается левой и правой границами изменения индекса массива, так что массив a состоит из 10 элементов, b – из 41, c – из 5. За словом Of указывается тип элементов, образующих массив.

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

Var

a : array [1..10] of real;

b : array [0..40] of char;

c : array [-2..2] of boolean;

k : integer;

begin

b[17] :=’F’;

c[-2]:=a[1]>a[2];

for k:=1 to 10 do

a[k]:=0;

end.

Индекс не должен выходить за пределы, определенные типом-диапазоном (нельзя использовать a[0], c[40]).

Program Mas;

{Программа создает массив из N случайных чисел, распределенных в

диапазоне от 0 до MAX_VALUE-1, подсчитывает среднее

арифметическое этих чисел, минимальное и максимальное из них}

const

N=1000;

MAX_VALUE=100+1;

Var

m : array [1..N] of integer;

i : integer; {индекс массива}

max, min : integer;

s : real;

begin

{наполняем массив случайными числами}

for i:=1 to N do

m[i]:=random(MAX_VALUE);

{задаем начальное значение переменных}

s:=0;

max:=m[1];

min:=m[1];

{цикл вычисления суммы всех случайных чисел и поиска

минимального и максимального}

for i:=1 to N do

begin

s:=s+m[i];

if m[i]

min:=m[i]

else if m[i]>max then

max:=m[i]

end;

WriteLn(‘Min=’,min,’Max=’,max,’Sred=’,s/N)

End.

Функция random(Max) используется для создания массива и возвращает случайное целое число, равномерно распределенное от 0 до Max-1 (Max – параметр обращения).

Количество элементов в списке индексных типов (размерность массива) не ограничено, однако суммарная длина внутреннего представления массива не может быть больше 65520 байт. В памяти компьютера элементы массива следуют друг за другом так, что при переходе от младших адресов к старшим наиболее быстро меняется самый правый индекс массива.

Var

A:array [1..2,1..2] of integer;

Begin

A[1,1]:=1;

A[2,1]:=2;

A[1,2]:=3;

A[2,2]:=4;

End.

В памяти друг за другом будут расположены байты со значениями 1,3,2,4.

Строка – это одномерный массив символов. К любому символу в строке можно обратиться как к элементу одномерного массива.

Var

St:string;

Begin

If st[5]=’A’ then

End.

Самый первый байт в строке имеет индекс 0 и содержит текущую длину строки. Первый значащий символ строки занимает второй байт и имеет индекс 1.



Работы которые могут быть Вам интерессными prestupleniya-protiv-interesov-sluzhbi-v-kommercheskih-i-inih-organizaciyah.html

prestupleniya-protiv-interesov-uchastnikov-na-fondovom-i-tovarnom-rinkah.html

prestupleniya-protiv-konstitucionnih-prav.html

prestupleniya-protiv-konstitucionnih-prav-i-svobod-cheloveka-i-grazhdanina.html

prestupleniya-protiv-konstitucionnih-prav-i-svobod-cheloveka-i-grazhdanina-ponyatie-obshaya-harakteristika-i-sistema-sostavov-otvetstvennost-za-diskriminaciyu.html

prestupleniya-protiv-konstitucionnogo-stroya-rossijskoj-federacii.html

prestupleniya-protiv-lichnoj-svobodi-ih-razgranichenie.html

prestupleniya-protiv-lichnosti-protiv-zhizni-i-zdorovya.html

prestupleniya-protiv-mira-i-bezopasnosti-chelovechestva.html

prestupleniya-protiv-nesovershennoletnih.html

prestupleniya-protiv-obshestvennogo-poryadka-huliganstvo-vandalizm.html

prestupleniya-protiv-obshestvennoj-bezopasnosti.html

prestupleniya-protiv-obshestvennoj-bezopasnosti-vidi-etih-prestuplenij-obshaya-harakteristika-sostava-prestuplenij-banditizm-analiz-sostava-prestupleniya.html

prestupleniya-protiv-obshestvennoj-nravstvennosti-v-sfere-seksualnih-otnoshenij.html

prestupleniya-protiv-okruzhayushej-sredi.html

prestupleniya-protiv-osnov-konstitucionnogo-stroya-i-bezopasnosti-gosudarstva-obshaya-harakteristika-ponyatie-i-vidi-etih-prestuplenij.html

prestupleniya-protiv-polovoj-svobodi.html

prestupleniya-protiv-poryadka-ispolneniya.html

prestupleniya-protiv-poryadka-oborota-dragocennih-metallov-i-dragocennih-kamnej.html

prestupleniya-protiv-poryadka-osushestvleniya-ekonomicheskoj-deyatelnosti.html

prestupleniya-protiv-poryadka-osushestvleniya-vneshneekonomicheskoj-deyatelnosti-tamozhennie-prestupleniya.html

© domain.tld 2017. Design by Design by toptodoc.ru


Автор:

Дата:

Каталог: Образовательный документ