Corrigindo Programa 06 para padrão GNU Cobol