Descuento por precio bruto en lenguaje PSeInt (Pseudocódigo)

Lenguaje

PSeInt (Pseudocódigo)
Descripción

Al realizar a una compra de un artículo determinado, del que se adquieren una o varias unidades. El IVA es del 13% y si el precio bruto ( precio venta mas IVA) es mayor de $50.00 se debe realizar un descuento del 5%. Imprimir el precio a pagar, el nombre del artículo y la cantidad de unidades.

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23

Proceso DescuentoPorPrecioBruto

    Escribir Sin Saltar "Ingresa el nombre del articulo:";

    Leer nombre_del_articulo;

    Escribir Sin Saltar "Ingresa el valor de precio del articulo:";

    Leer precio_del_articulo;

    Escribir Sin Saltar "Ingresa el valor de unidades:";

    Leer unidades;

    precio_venta <- precio_del_articulo*unidades;

    IVA <- precio_venta*0.13;

    precio_bruto <- precio_venta+IVA;

    Si precio_bruto>50 Entonces

        descuento <- precio_bruto*0.05;

    SiNo

        descuento <- 0;

    FinSi

    precio_a_pagar <- precio_bruto-descuento;

    Escribir "Nombre del articulo: ", nombre_del_articulo;

    Escribir "Valor de IVA: ", IVA;

    Escribir "Valor de descuento: ", descuento;

    Escribir "Valor de precio a pagar: ", precio_a_pagar;

    Escribir "Valor de precio bruto: ", precio_bruto;

    Escribir "Valor de precio venta: ", precio_venta;

FinProceso