const                    // Начался раздел констант
  n = 10;                // Описание (именованной) константы
  
var                      // Начался раздел глобальных переменных, 
                         // значит - закончился раздел констант 
  i, j : integer;        // 1-е описание переменных
  r, q : real;           // 2-е описание переменных
  k, m : integer;        // 3-е описание переменных - снова integer. 
                         // Имеем право.

Begin
  
  // Обязательный раздел кода
  ...
End.                  // Конец всему (в этой программе)!