Структура программы

Раздел описания:

- подключение библиотек (Uses):

Uses crt, graph, mylab;

- определение констант (Const)

Const

e = 2.7182818; { Real type constant. }

a = 2; { Ordinal (Integer) type constant. }

с = '4'; { Character type constant. }

s = 'This is a constant string'; {String type constant.}

s1 = chr(32)

ls = SizeOf(Longint);

Sl : String = 'This is a typed constant string';

- определение типов (Type)

Type Ts10 = string[10];

Ts25 = string[25];

TA = array[1..1000] of Boolean;

- определение переменных (Var)

Var <идентификатор> : <тип>;

A : ta;

i,j,n, : integer;

F : file of byte;

l, newl : ts10;

- определение процедуры (Procedure)

Procedure <имя процедуры> [<параметры>];

<раздел описания>;

Begin

<раздел операторов>

End;

- определение функции (Function)

Function <имя процедуры> [(<параметры>)] : ;

<раздел описания>;

Begin

<раздел операторов>

End;