Vector para Ventas

El siguiente programa solicita 7 Cantidades y 7 Valores Unitarios, luego ubica las cantidades y los unitarios con su respectivo Costo Total.

Proceso vectorventas

Dimension cantidad[7]

Dimension vunitario[7]

Dimension vp[7]

Escribir "Digite datos de los articulos"

para i<-1 hasta 7 con paso 1 Hacer

Escribir "Cantidad ",i

Leer cantidad[i]

Escribir "Valor unitario ",i

Leer vunitario[i]

vp[i]<-cantidad[i]*vunitario[i]

FinPara

Escribir ""

Escribir " CANT VLOR UNIT VLOR PAGAR"
para i<-1 hasta 7 con paso 1 Hacer
Escribir i," ",cantidad[i]," ",vunitario[i]," ",vp[i]
finpara

FinProceso