miércoles, 8 de mayo de 2013

SEGUNDO CORTE


1.En la universidad se necesita determinar que estudiantes requieren inscribirse en cursos de refuerzo en matemáticas, para que esto sea necesario se requiere que el estudiante tenga un promedio de calificaciones menor de 3.5 o que haya perdido mas de dos materias el semestre anterior. Además todos los estudiantes de Tecnología de Sistemas deben inscribirse para este curso.
Proceso curso_matematico
        promedio<-0;
        materiasperdidas<-0;
        estudiantesdesistemas<-Verdadero;
        Escribir "ingrese su promedio obtenido";
        Leer promedio;
        Escribir "ingrese el numero de materias perdidas del semestre anterior";
        Leer materiasperdidas;
        Escribir "¿pertenece al curso de sistemas?";
        Leer estudiantesdesistemas;
        Si promedio<3.5 o materiasperdidas>2 Entonces
                       Escribir "debe inscribirse en el curso de matematicas";
        Sino
                       si estudiantesdesistemas=Verdadero Entonces
                                       Escribir "debe inscribirse en el curso de matematicas";
            sino
                                       Escribir "no debe inscribirse";
                                      
                       FinSi
        FinSi
FinProceso

2. Un mecánico de automóviles requiere un algoritmo que le permita saber si un motor necesita ser reparado o no, para esto el motor debe cumplir con estas condiciones:
- Si es un motor de inyección y tiene más de 50 mil kilómetros de recorrido
- O si es un motor de carburador y tiene más de 70 mil kilómetros de recorrido
- En ambos casos si el motor está consumiendo más de un cuarto de aceite mensual debe ser reparado.

Proceso reparar_motor
            kilometrosrecorridos<-0;
            motor<-"";
            consumiendoaceite<-Verdadero;
            Escribir "¿el motor es de inyeccion o de carburador?";
            Leer motor;
            Escribir "cantidad de kilometros que ha recorrido";
            Leer kilometrosrecorridos;
            Escribir "¿el motor consume mas de un cuarto de aceite mensual?";
            Leer consumiendoaceite;
            si motor="inyeccion" y kilometrosrecorridos>50000 entonces
                        Escribir "debe ser reparado";
            sino
                        si motor="carburador" y kilometrosrecorridos>70000 Entonces
                                   Escribir "debe ser reparado";
                        Sino
                                   si consumiendoaceite=Verdadero Entonces
                                               Escribir "debe ser reparado";
                                   Sino
                                               Escribir "no debe ser reparado";
                                              
                                   FinSi
                        FinSi
            FinSi
FinProceso

4. Al final de un juego de video, el jugador se declara ganador si acumuló más de 3000 puntos, mantuvo al menos dos vidas y realizó menos de 3 intentos. Elabore un algoritmo que solicite los datos de juego de un jugador y determine si se considera ganador o perdedor.

Proceso video_juego
            puntosobtenidos<-0;
            vidas<-0;
            intentos<-0;
            Escribir "puntos obtenidos";
            Leer puntosobtenidos;
            Escribir "cuantas vidas le quedan";
            Leer vidas;
            Escribir "cuantos intentos realizo";
            Leer intentos;
            si puntosobtenidos>3000 Entonces
                        si vidas>=2 Entonces
                                   si intentos<3 Entonces
                                               Escribir "felicitaciones ganaste";
                                   Sino
                                               Escribir "perdiste";
                                   FinSi
                        Sino
                                   Escribir "perdiste";       
                        FinSi
            Sino
                        Escribir "perdiste";       
            FinSi
FinProceso

*Ejercicio 7 pum

Proceso siete_Pum
            numero<-1;
            condicion<-"s";
            Mientras condicion="s" Hacer
                        Escribir "seguir? Si = s No = n";
                        Si (numero mod 7)=0 Entonces
                                   Escribir "Pum";
                        Sino
                                   Si ((numero-7) mod 10)=0 Entonces
                                   Escribir "Pum";
                                   Sino Escribir numero;
                                   Finsi
                        Finsi    
                        Leer condicion;
                        numero<- numero+1;
            FinMientras
FinProceso

*Un policía de transito necesita saber si debe imponer un comparendo a un conductor,
-para eso se guia por las siguientes normas:
-Está prohibido conducir si se tiene menos de 16 años
-Está prohibido conducir sin licencia de conducción
Proceso Comparendo             
            edad<-0;
            licencia<-Falso;
            Escribir "¿Tiene Licencia de conducir?";
            Leer licencia;
            Escribir "Ingrese la edad del conductor";
            Leer edad;
                        Si licencia= Falso Entonces
                                   Si edad<16 Entonces
                                               Escribir "Comparendo por no tener licencia ni edad para manejar";
                                   Sino
                                               Escribir "Se aplicara comparendo por no tener licencia";
                                   FinSi
                        Sino
                                   Escribir "Puede avanzar";
                        FinSi
FinProceso


Proceso Comparendo             
            edad<-0;
            licencia<-Verdadero;
            vigencia<-Verdadero;
            Escribir "Ingrese la edad del conductor";
            Leer edad;
            Escribir "¿Tiene Licencia de conducir?";
            Leer licencia;
            Escribir "¿Esta vigente?";
            Leer vigencia;
            Si edad>=16 Entonces
                        Si licencia= Verdadero Entonces
                                   Si vigencia=Verdadero Entonces
                                               Escribir "Puede avanzar";
                                   Sino
                                               Escribir "Se aplicara comparendo";
                                   FinSi
                        FinSi
            Sino Escribir "Se aplicará comparendo";          
FinSi
FinProceso


Proceso Comparendo             
            edad<-0;
            licencia<-Falso;
            vigencia<-Falso;
            Escribir "Ingrese la edad del conductor";
            Leer edad;
            Si edad>=16 Entonces
                        Escribir "¿Tiene Licencia de conducir?";
                        Leer licencia;
                        Si licencia= Verdadero Entonces
                                   Escribir "¿Esta vigente?";
                                    Leer vigencia;
                                   Si vigencia=Verdadero Entonces
                                               Escribir "Puede avanzar";
                                   Sino
                                               Escribir "Se aplicara comparendo por no estar vigente";
                                   FinSi
                        Sino
                                   Escribir "Se aplicara comparendo por no tener licencia";
                        FinSi
            Sino Escribir "Se aplicará comparendo por no cumplir la edad";           
            FinSi
FinProceso

*Números pares menores que 100

Proceso Pares_menores_que_100
            n<-2;
            Mientras n<=100 Hacer
            Escribir n;
            n<-n+2;
            FinMientras
FinProceso

*En una sala de urgencia se atenderá de forma prioritaria a una paciente si:
-Está embarazada
-Tiene más de 37º de temperatura
-Si el paciente es menor de 10 años
-Si el paciente está inconsciente

Proceso Sala_de_urgencias
            embarazada<-Verdadero;
            temperatura<-0;
            edad<-0;
            inconsciente<-Verdadero;
            Escribir "¿La paciente esta embarazada?";
            Leer embarazada
            Si embarazada=Verdadero Entonces
                        Escribir "El paciente tiene prioridad para ser atendido"
            Sino
                        Escribir "Ingrese la temperatura del paciente en grados Celsius";
                        Leer temperatura;
                        Si temperatura>37 Entonces
                                   Escribir "El paciente tiene prioridad para ser atendido"
                        Sino
                                   Escribir "Ingrese la edad del estudiante";
                                   Leer edad;
                                   Si edad<=10 Entonces
                                               Escribir "El paciente tiene prioridad para ser atendido"
                                   Sino
                                               Escribir "Diga si el paciente esta inconsciente";
                                               Leer inconsciente;
                                               Si inconsciente=Verdadero Entonces
                                                          
                                                           Escribir "El paciente tiene prioridad para ser atendido"
                                               Sino Escribir "El paciente tiene que esperar para ser atendido...";
                                               FinSi
                                   FinSi
                        FinSi
            FinSi
FinProceso

*Preguntele al usuario una serie de números, mientras que los números ingresados sean menores que que 100

Proceso Pedir_usuario_nmc
            n<-0;
            Mientras n<100 Hacer
                        Escribir "Ingrese un numero";
                        Leer n;
            FinMientras
FinProceso

*Determinar si un estudiante de I Semestre de Sistema la Dorada necesita carta de autorización para el viaje.

Proceso Carta_de_autorización
            edad<-0;
            Escribir "Ingrese la edad del estudiante";
            Leer edad;
            Si edad<18 Entonces
                        Escribir "Este estudiante necesita carta de autorización";
            Sino
        Escribir "El estudiante NO necesita carta de autorización";
            FinSi
FinProceso

*Un policía de transito necesita saber si debe imponer un comparendo a un conductor,
para eso se guia por las siguientes normas:
-Está prohibido conducir si se tiene menos de 16 años
-Está prohibido conducir sin licencia de conducción

Proceso Comparendo             
            edad<-0;
            licencia<-Verdadero;
            Escribir "Ingrese la edad del conductor"
            Leer edad;
            Escribir "¿Tiene Licencia de conducir?"
            Leer licencia;
            Si edad>16 Entonces
                        Si licencia= Verdadero Entonces
                                   Escribir "Puede continuar";
                        Sino
                                   Escribir "Se aplicara comparendo";
                        FinSi
            Sino Escribir "Se aplicará comparendo";          
FinSi
FinProceso

*En una universidad quieren un programa para saber si deben invitar a un estudiante
a hacer parte del equipo de Baloncesto, para eso se requiere que el estudiante
mida más de 180 cm de estatura.

Proceso Equipo_de_Baloncesto
            estatura<-0;
            Escribir "Ingrese estatura del estudiante en centímetros";
            Leer estatura;
            Si estatura>180 Entonces
                        Escribir "Invitar al estudiante";
            FinSi
FinProceso

*Nota o trampa.
Proceso nota_o_trampa
            nota<-0;
            trampa<-Verdadero;
            Escribir "Ingrese nota";
            Leer nota;
            Escribir "¿Hizo trampa?";
            Leer trampa;
            Si nota<3 o trampa=Verdadero Entonces
                        Escribir "Reprobó"
                        Sino Escribir "Aprobó"
            FinSi
FinProceso

Proceso nota_y_trampa
            nota<-0;
            trampa<-Verdadero;
            Escribir "Ingrese nota";
            Leer nota;
            Escribir "¿Hizo trampa?";
            Leer trampa;
            Si nota>=3 y trampa=Falso Entonces
                        Escribir "Aprobó"
                        Sino Escribir "Reprobó"
            FinSi
FinProceso

*Determinar si un número es positivo.

Proceso Numero_positivo
            n<-0;
            Escribir "Ingrese el número";
            Leer n;
            Si n>0 Entonces
                        Escribir "El número es positivo";
            Sino
                        Escribir "El número no es positivo";
            FinSi
FinProceso

*En una sala de urgencia se atenderá de forma prioritaria a una paciente si:
-Está embarazada
-Tiene más de 37º de temperatura

Proceso Sala_de_urgencias
                embarazada<-Verdadero;
                temperatura<-0;
                Escribir "¿La paciente está embarazada?";
                Leer embarazada
                Escribir "Ingrese la temperatura del paciente en grados Celsius";
                Leer temperatura;
                Si embarazada=Verdadero o temperatura>37 Entonces
                               Escribir "Tiene prioridad para ser atendido"
                               Sino Escribir "No tiene prioridad"
                FinSi
FinProceso

*Si aprobó o no.

Proceso Nota_final
                nota_final<-0;
                Escribir "Ingrese la Nota Final del estudiante";
                Leer nota_final;
                Si nota_final>=3 Entonces
                               Escribir "Aprobó"
                               Sino Escribir "Reprobó"
                FinSi
FinProceso

No hay comentarios:

Publicar un comentario