Código de barras como hacerlo en pascal

(Representación gráfica) a partir de un código numérico, este se forma con los valores correspondientes a: - código de la empresa: número de 3 cifras (representado por 3 dígitos) - importe: número entero mayor o igual a cero y menor a 10000 (representado por 4 dígitos) - dígito verificador: se genera a partir de los 7 dígitos correspondientes a los datos anteriores calculando el resto de dividir por 10 el valor absoluto de la diferencia entre la sumatoria de los dígitos que ocupan una posición par y la sumatoria de los que ocupan una posición impar.