TURBO PASCAL:Учебное пособие. Терёхин В.В. - 94 стр.

begin
  <тело процедуры - операторный_блок>
end;

и описание функции :

function <идеитификатор - имя процедуры> ( <список пара-
               метров>) : <тип значения функции> ;
const <раздел описания констант>
type <раздел описания типов>
var <раздел описания переменных>
label <раздел описания меток>
<раздел описания процедур и функций>
begin
   <тело процедуры - операторный блок>
end;

      Функция через свой идентификатор передает значение
определенного в заголовке типа. Для этого в теле функции за-
писывается следующий оператор присваивания:

<идентификатор-имя функции> : = <выражение соответст-
         вующего типа> ;

        Формальные параметры в процедуре или функции не
отличаются от других описанных в ней переменных и могут
быть использованы как переменные. Описательные разделы
(type, const и др. ) могут отсутствовать, чередоваться, повто-
ряться, если это не нарушает внутренней логики и правильно-
сти программы.
        Надо отметить, что непосредственно в самих процеду-
рах или функциях можно описывать другие процедуры и функ-
ции. Возможность описания и использования процедур, вло-
женных процедур и т. д. заставляет задуматься над использова-
нием переменных, описанных в подпрограммах. Для решения
                                                            94