Pascal/Turbo Pascal - Ayuda con arreglos

 
Vista:

Ayuda con arreglos

Publicado por Daisha (1 intervención) el 11/12/2006 23:22:09
El Mandato es el siguiente:
Se tienen dos arreglos relacionados donde se tienen almacenados los codigos de los N articulos que se venden en un almacen y la existencia (numeros de unidades existentes) de cada uno de los articulos, asi:

Codigo existencia
008 20 Del articulo 008 hay 20 unidades de existencia
064 32 Del articulo 064 hay 32 unidades de existencias, etc
101 52
200 10
208 104

Por cada proveedor o cliente que llegue al almacen se graba un registro con los siguientes datos
Tipo de transacion
1 para probeedor (recibo)
2 para cliente (venta)
Codigo del articulo transado
Numeros de unidades transadas (recibidas o vendidas)

Se requiere calcular lo siguiente por cada transacion:
Si es recibo se suma a las existencias actuales de ese articulo, el numero de unidades transadas
Si es venta se resta a las unidades en existencia de ese articulo las unidades vendidas

Al final se debe imprimir los codigos de los articulos y las existencias de cada una de ellas, es decir el arreglo de codigos y de existencias ya actualizado.
NOTA: asuma que en ningun momento la cantidad vendida es mayor que la cantidad en existencia y por lo tanto , no se va a presentar inconsistencias. Recuerde que el numero total de articulos que vende el almacen y los arreglos de codigo y existencias se deben leer inicialmente.

AYUDENME POR FAVORRRR!!!
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder