розділ опису міток;
розділ опису констант;
розділ опису типів;
розділ опису змінних;
опис процедур та функцій;
begin
оператор1;
.....................
операторN
end

У кожному конкретному випадку задають лише необхідні для даного програмного модуля розділи описів, які можуть повторюватись по кілька разів і в довільному порядку.
Ось приклад програми, яка виводить квадрати введених чисел, поки не буде введений нуль:

Program test;
Var
i : integer;
Begin
repeat
Read ( i );
WriteLn ( sqr ( i ) );
until i = 0
end.