; после оператора перед RETURN в режиме -7

[ComdivByZero]

Согласно синтаксису

ProcedureBody = DeclarationSequence [BEGIN StatementSequence]
[RETURN expression] END.
StatementSequence = statement {";" statement}.
statement = [assignment | ProcedureCall | IfStatement | CaseStatement |
WhileStatement | RepeatStatement | ForStatement].

; является необязательной, но транслятор требует её наличия