Algoritmo EJERCICIO1
LEER AR
LEER CAN
PB=(AR*CAN)
SI AR >=50 ENTONCES
D=PB*0.05
SiNo
D=0
FINSI
PDES=PB-D
IGV=(PDES*18.5)/100
PTP=PDES+IGV
FinAlgoritmo