Adicionando comparação com Pascal