• Lenguaje

    PSeInt (Pseudocódigo)

  • Descripción

    Una librería vende libros bajo las siguientes condiciones: si el cliente es tipo 1 (docente) se le descuenta el 30%, si el cliente es tipo 2 (estudiante) se le descuenta el 20% y si el cliente es tipo 3 se le descuenta el 10%. Cuando el cliente realiza la compra, se deben ingresar: el nombre del cliente, tipo de cliente (1,2,3), la cantidad de libros y el costo del libro. Si la cantidad de libros solicitada es mayor de 5 se hace un descuento adicional de 4%, en caso de ser mayor de 10 unidades se hace un descuento adicional de 8%. Hacer un algoritmo para que muestre: nombre del cliente, total a pagar, descuento y neto a pagar.

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
Proceso LibrosConDescuentos
    Escribir Sin Saltar "Ingresa el nombre del cliente:";
    Leer nombre_del_cliente;
    Escribir Sin Saltar "Ingresa el valor de cantidad de libros:";
    Leer cantidad_de_libros;
    Escribir Sin Saltar "Ingresa el valor de costo del libro:";
    Leer costo_del_libro;
    neto_a_pagar <- cantidad_de_libros*costo_del_libro;
    descuento <- 0;
    Escribir "Selecciona el valor de tipo de cliente.";
    Escribir "    1.- docente";
    Escribir "    2.- estudiante";
    Escribir "    3.- otro";
    Escribir Sin Saltar "    :";
    Repetir
        Leer tipo_de_cliente;
        Si tipo_de_cliente<1 O tipo_de_cliente>3 Entonces
            Escribir Sin Saltar "Valor incorrecto. Ingrésalo nuevamente.: ";
        FinSi
    Hasta Que tipo_de_cliente>=1 Y tipo_de_cliente<=3;
    Si tipo_de_cliente = 1 Entonces
        descuento <- neto_a_pagar*0.3;
    FinSi
    Si tipo_de_cliente = 2 Entonces
        descuento <- neto_a_pagar*0.2;
    FinSi
    Si tipo_de_cliente = 3 Entonces
        descuento <- neto_a_pagar*0.1;
    FinSi
    Si cantidad_de_libros>5 Y cantidad_de_libros<=10 Entonces
        descuento <- descuento*0.04;
    FinSi
    Si cantidad_de_libros>10 Entonces
        descuento <- descuento*0.08;
    FinSi
    total_a_pagar <- neto_a_pagar-descuento;
    Escribir "Nombre del cliente: ", nombre_del_cliente;
    Escribir "Valor de descuento: ", descuento;
    Escribir "Valor de neto a pagar: ", neto_a_pagar;
    Escribir "Valor de total a pagar: ", total_a_pagar;
FinProceso