Мельница данных  (06.07.2022)
Составной оператор
1 begin
2  //Другие операторы
end 
Операторы, размещенные внутри составного оператора, разделяются точкой с запятой. Никаких ограничений на состав операторов и количество уровней вложенности не накладывается.
       
1begin
2  Result := LCurrentValue;
3  Exit;
4end;