Precio de un pasaje por avión en lenguaje PSeInt (Pseudocódigo)

Lenguaje

PSeInt (Pseudocódigo)
Descripción

Determinar el precio de un pasaje de ida y vuelta por avión, conociendo la distancia a recorrer, el número de días de estancia y sabiendo que, si la distancia es superior a 1000 kms y el número de días de estancia es superior a 7, la línea aérea le hace un descuento del 30%. El precio por kilómetro es de $ 130.500.

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16

Proceso PrecioDeUnPasajePorAvion

    Escribir Sin Saltar "Ingresa el valor de dias de estancia:";

    Leer dias_de_estancia;

    Escribir Sin Saltar "Ingresa el valor de distancia en km:";

    Leer distancia_en_km;

    subtotal <- distancia_en_km*130500;

    Si distancia_en_km>1000 Y dias_de_estancia>7 Entonces

        descuento <- subtotal*0.3;

    SiNo

        descuento <- 0;

    FinSi

    precio_del_pasaje <- subtotal-descuento;

    Escribir "Valor de descuento: ", descuento;

    Escribir "Valor de precio del pasaje: ", precio_del_pasaje;

    Escribir "Valor de subtotal: ", subtotal;

FinProceso