Considere a seguinte procedure escrita em delphi e assinale a alternativa correta.