Программирование на языке Object Pascal

Методическое пособие - Компьютеры, программирование

Другие методички по предмету Компьютеры, программирование

? из 4 разделов:

Обязательные:

). Интерфейсный;

). Раздел реализации;

Не обязательные:

). Раздел инициализации;

). Раздел завершения.

Интерфейсный раздел, и раздел реализации являются обязательными и должны присутствовать в каждом модуле. В начале файл модуля - его заголовок, в котором указывается имя модуля; затем все указанные разделы:

Unit имя модуля;

Interface;

Uses список модулей;

(1);;список модулей;

(2);;

(3);

Finalization;

(4);

End

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

В разделе реализации содержится информация, которая из других модулей недоступна. В нем содержатся все процедуры и функции (их исходные коды).

Модули, из которых состоят приложения, делятся на: созданные разработчиком и созданные в Delphi.

Встроенные модули.

System - содержит основные функции Delphi, его не нужно подключать с использованием слова Uses, т.к. он подключается к каждому модулю по умолчанию.

Модули, подключенные к интерфейсному разделу по умолчанию, доступны в любом месте данного модуля. Модули, подключенные в разделе реализации, доступны во всем этом разделе за исключением интерфейсного раздела. В разделах инициализации и завершения расположен код, выполняемый только один раз, в начале и конце работы модуля. Если модулей в программе несколько, то последовательность выполнения их разделов инициализации соответствует порядку их следования после ключевого слова Uses. Разделы завершения выполняются в обратном порядке.

 

Структура программной единицы на языке OPascal

 

К программным единицам относятся: раздел описания, процедура, функция.

Все они имеют единую структуру:

;

Implementation (begin - для процедур и функций)

End. (; - для процедур и функций)

Раздел описания состоит из (порядок следования различен):

). Блок используемых модулей (uses );

). Блок описания типов (type);

). Описание пользовательских типов;

). Описание констант (const );

). Блок описания переменных (var );

). Блок описания меток (label );

). Блок описания процедур и функций пользователя.

Любого из этих блоков может не быть (они не обязательны).

Программные единицы:

(Описание модуля)

Unit Unit 1;

InterfaceWindows, Massages, SysUnits, Classes, Forms;1 = class (TForm)1: TButton;1: TLabel;Button 1 click (sender, TObject);1: TForm 1;, y: integer;: string;=100;

(1)ABC;: array [1…n] of byte;x:= 1 to n do[x]:=x;

end;

(Тело модуля)

ImplementationTForm 1. Button 1. Click (Sender: TObject);1. Caption := Hello!;;

end;

END.

 

Операторы языка OPascal

 

). Присваивание (:=): ;

). Пустой оператор (;): (ставится после вызова каждого оператора или процедуры функции);

Составной оператор - последовательность произвольных операторов программы, заключенная в операторные скобки:

 

Begin

End

OPascal не накладывает ограничений на характер операторов входящих в составной оператор. Внутри составного оператора может находится 1 или несколько составных операторов. Допускается произвольная глубина вложенности составных операторов.

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

 

If ]…

If x>0 then y:=3

x:= ABS(x);

y:= SQR(x);.

 

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

 

Цикл со счетчиком:

 

For ;

 

В операторе For на каждом шаге цикла происходит увеличение/уменьшение (по умолчанию) параметра цикла на 1. Параметром цикла может быть только переменная порядкового типа.

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

Любому из порядковых типов применима функция:

ORD(x) - которая возвращает порядковый номер значения;

PRED(x) - возвращает предыдущее значение;

SUCC(x) - возвращает следующее значение.

Оператор цикла с предусловием.

 

While ;

 

Оператор выполняется до тех пор, пока условие истинно.

 

Procedure ABC, n: integer;

n:= 100;

i:= 0;i<=n do begin:= i+2;. (.nes. Add (IntToStr (i)));;

End.

 

Программа выводит все четные числа от 0 до 100.

Оператор цикла с пост условием.

 

Repeat

Until ;

 

Список операторов выполняется пока условие ложно.

 

Var, i, n: integer;:= 0;:= 100;:= 0;:= i + 1;:= s + 1;i = n;. Lines. Add (s= + IntToSrt (s));;

 

Программа вычисляет сумму чисел натурального ряда до (n).

Оператор выбора.

 

Case of

;

[else ];

End;

 

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

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

Список выбора - одна или более конструкций вида:

 

;

.

.

;

 

Константа выбора должна быть того же типа, что и ключ выбора.

Оператор Case работает в следующем порядке:

Вычисляется выражение (ключ выбора);

В последовательности операторов находится такой, которому предшествует константа, равная вычисленному значению;

Найденный оператор выполняется, после чего Case завершает работу.

Если в списке выбора не найдена констан