• Lenguaje

    PSeInt (Pseudocódigo)

  • Descripción

    Al cerrar un expendio de naranjas, 15 clientes que aun no han pagado recibirán un 15% de descuento si compran más de 10 kilos. Determinar cuánto pagara cada cliente y cuanto percibirá la tienda por esas compras.

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
Proceso ExpendioDeNaranjas
    total_percibido <- 0;
    Escribir Sin Saltar "Ingresa el valor de costo por kilo:";
    Leer costo_por_kilo;
    Para i<-1 Hasta 15 Con Paso 1 Hacer
        Escribir "PROCESO ", i;
        Escribir Sin Saltar "Ingresa el valor de kilos comprados:";
        Leer kilos_comprados;
        subtotal <- kilos_comprados*costo_por_kilo;
        Si kilos_comprados>10 Entonces
            descuento <- subtotal*0.1;
        SiNo
            descuento <- 0;
        FinSi
        total <- subtotal-descuento;
        total_percibido <- total_percibido+total;
        Escribir "Valor de descuento: ", descuento;
        Escribir "Valor de subtotal: ", subtotal;
        Escribir "Valor de total: ", total;
        Escribir "";
    FinPara
    Escribir "Valor de total percibido: ", total_percibido;
FinProceso