Viaje de estudios en lenguaje PSeInt (Pseudocódigo)

Lenguaje

PSeInt (Pseudocódigo)
Descripción

El director de una escuela está organizando un viaje de estudios, y requiere determinar cuanto debe cobrar a cada alumno y cuanto debe pagar a la compañia de viajes por el servicio. La forma de cobrar es la siguiente:
- Si son 100 alumnos o más, el costo por cada alumno es de 65.00.
- De 50 a 99 alumnos, el costo es de 70.00.
- De 30 a 49, de 95.00.
- Si son menos de 30, el costo de la renta del autobús es de 4000.00 sin importar el numero de alumnos.

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

Proceso ViajeDeEstudios

    Escribir Sin Saltar "Ingresa el valor de numero de alumnos:";

    Leer numero_de_alumnos;

    costo_por_alumno <- 0;

    pago_por_el_servicio <- 0;

    Si numero_de_alumnos>=100 Entonces

        costo_por_alumno <- 65;

        pago_por_el_servicio <- costo_por_alumno*numero_de_alumnos;

    FinSi

    Si numero_de_alumnos>=50 Y numero_de_alumnos<100 Entonces

        costo_por_alumno <- 70;

        pago_por_el_servicio <- costo_por_alumno*numero_de_alumnos;

    FinSi

    Si numero_de_alumnos>=30 Y numero_de_alumnos<50 Entonces

        costo_por_alumno <- 95;

        pago_por_el_servicio <- costo_por_alumno*numero_de_alumnos;

    FinSi

    Si numero_de_alumnos>=30 Y numero_de_alumnos<50 Entonces

        pago_por_el_servicio <- 4000;

        costo_por_alumno <- pago_por_el_servicio/numero_de_alumnos;

    FinSi

    Escribir "Valor de costo por alumno: ", costo_por_alumno;

    Escribir "Valor de pago por el servicio: ", pago_por_el_servicio;

FinProceso