Código para ejercicio de pago de impuestos

Algoritmo sin_titulo
   
    definir tipo, modelo, pasajeros como entero;
    definir valor_pagar como real;
   
    escribir "Tipo de vehiculo: 1-Motocicleta, 2-Automovil, 3-Camioneta, 4-Camión";
    leer tipo;
   
    escribir "Que modelo es su vehiculo";
    leer modelo;
   
    segun tipo hacer
       
        1: si modelo < 2000 entonces
                valor_pagar <- 400000;
            sino
                si modelo >= 2000 entonces
                    valor_pagar <- 300000;
                finsi
               
            FinSi
           
        2: escribir "Numero de pasajeros";
            leer pasajeros;
           
            si modelo < 2000 y pasajeros <= 4 entonces
                valor_pagar <- 550000;
            sino
                si modelo >= 2000 y pasajeros <= 4 Entonces
                    valor_pagar <- 450000;
                sino
                    si modelo >= 2000 y pasajeros > 4 entonces
                        valor_pagar <- 600000;
                    FinSi
                FinSi
            FinSi
           
        3: si modelo < 2000 entonces
                valor_pagar <- 700000;
            sino
                si modelo >= 2000 entonces
                    valor_pagar <- 650000;
                finsi
                   
            FinSi
               
        4:valor_pagar <- 800000;
               
    FinSegun
   
    escribir "Ud debe pagar: ", valor_pagar;
   

FinAlgoritmo