``` procedure MyProcedure(); begin end; var x: integer; begin x := MyProcedure(); end. ``` 