EJERCICIO DE MENÚS - QUIZ

HACER UN ALGORITMO CON MENÚS , UN QUIZ TIPO ICFES, Y QUE SOLO DE 4 OPCIONES MÁXIMO POR PREGUNTA PARA RESPONDER.

SOLUCIONES:


Proceso QUIZ_PROGRAMACION
RPTA<-0;
VECES<-0;
NOTA<-5.0;
MIENTRAS VECES<4 HACER
Escribir "";
Escribir " A) ¿QUE ES UN PROGRAMA? ";
Escribir "";
Escribir " 1. UNA SERIE DE INSTRUCCIONES EJECUTADAS POR EL USUSARIO ";
Escribir "";
Escribir " 2. CUANDO UN PROGRAMADOR INVENTA UN SOFTWARE ";
Escribir "";
Escribir " 3. SERIE O SECUENCIA DE PASOS O INSTRUCCIONES, TAREAS Y ACTIVIDADES PARA ";
Escribir "    ALCANZAR UN OBJETIVO Y RESOLVER UN PROBLEMA ";
Escribir "";
Escribir " 4. NINGUNA DE LAS ANTERIORES ";
Escribir "";
Escribir " ESCRIBA SU RESPUESTA SEGUN EL NUMERO RESPECTIVO ";
Escribir "";
LEER RPTA;
Escribir "";
SI RPTA<>3 ENTONCES
NOTA<-NOTA-0.2
VECES<-VECES+1;
Sino
VECES<-4
FINSI
FINMIENTRAS
VECES<-0;
MIENTRAS VECES<4 HACER
Escribir "";
Escribir " B) ¿QUE ES PROGRAMAR? ";
Escribir "";
Escribir " 1. PROCESO POR EL CUAL SE INVENTA ALGO ";
Escribir "";
Escribir " 2. ARTE POR MEDIO DE LA CUAL SE DESARROLLA UN PROGRAMA ";
Escribir "";
Escribir " 3. LA 1 Y LA 2 ";
Escribir "";
Escribir " 4. NINGUNA DE LAS ANTERIORES ";
Escribir "";
Escribir " ESCRIBA SU RESPUESTA SEGUN EL NUMERO RESPECTIVO ";
Escribir "";
LEER RPTA;
Escribir "";
SI RPTA<>2 ENTONCES
NOTA<-NOTA-0.2
VECES<-VECES+1;
Sino
VECES<-4
FINSI
FINMIENTRAS
VECES<-0;
MIENTRAS VECES<4 HACER
Escribir "";
Escribir " C) ¿QUE SISTEMA DE COMUNICACION ENTIENDE UN COMPUTADOR? ";
Escribir "";
Escribir " 1. SISTEMA DE DIAGRAMAS DE FLUJO ";
Escribir "";
Escribir " 2. SISTEMAS DE INFORMACION  ";
Escribir "";
Escribir " 3. SISTEMA BINARIO ";
Escribir "";
Escribir " 4. NINGUNA DE LAS ANTERIORES ";
Escribir "";
Escribir " ESCRIBA SU RESPUESTA SEGUN EL NUMERO RESPECTIVO ";
Escribir "";
LEER RPTA;
Escribir "";
SI RPTA<>3 ENTONCES
NOTA<-NOTA-0.2
VECES<-VECES+1;
Sino
VECES<-4
FINSI
FINMIENTRAS
VECES<-0;
MIENTRAS VECES<4 HACER
Escribir "";
Escribir " D) DENTRO DE LOS SOFTWARE CREADOS PARA APRENDER A PROGRAMAR ESTAN: ";
Escribir "";
Escribir " 1. MICROSOF OFFICE Y NERO ";
Escribir "";
Escribir " 2. SISTEMAS OPERATIVOS WINDOWS, LINUX Y MAC  ";
Escribir "";
Escribir " 3. TODAS LAS OPCIONES: 1, 2 Y 4 ";
Escribir "";
Escribir " 4. JAVA, DFD Y PSEINT, ENTRE OTROS ";
Escribir "";
Escribir " ESCRIBA SU RESPUESTA SEGUN EL NUMERO RESPECTIVO ";
Escribir "";
LEER RPTA;
Escribir "";
SI RPTA<>4 ENTONCES
NOTA<-NOTA-0.2
VECES<-VECES+1;
Sino
VECES<-4
FINSI
FINMIENTRAS
VECES<-0;
MIENTRAS VECES<4 HACER
Escribir "";
Escribir " E) ¿CUALES SON LOS PASOS PARA CREAR UN SOFTWARE? ";
Escribir "";
Escribir " 1. INVESTIGAR - EXPLORAR - EJECUTAR ";
Escribir "";
Escribir " 2. IDENTIFICAR EL PROBLEMA - ANALISIS DEL SISTEMA ";
ESCRIBIR "  - CONSTRUCCION Y HACER PRUEBAS ";
Escribir "";
Escribir " 3.  DESCUBRIR - ANALISAR - EVALUAR - INGENIAR ";
Escribir "";
Escribir " 4. TODAS LA ANTERIORES ";
Escribir "";
Escribir " ESCRIBA SU RESPUESTA SEGUN EL NUMERO RESPECTIVO ";
Escribir "";
LEER RPTA;
Escribir "";
SI RPTA<>2 ENTONCES
NOTA<-NOTA-0.2
VECES<-VECES+1;
Sino
VECES<-4
FINSI
FINMIENTRAS
SI NOTA>0.1 Y NOTA<2.9 ENTONCES
Escribir " SU NOTA ES ", NOTA;
Escribir "";
ESCRIBIR " USTED HA REPROBADO, SU NOTA ES BAJA, "
ESCRIBIR " HAY QUE PONER MAS VOLUNTAD Y ESTUDIAR MAS!!! ";
FinSi
SI NOTA>3.0 Y NOTA<4.0 ENTONCES
Escribir " SU NOTA ES ", NOTA;
Escribir "";
ESCRIBIR " USTED HA APROBADO Y SU RENDIMIENTO ES MEDIO, MAS DEDICACION, FELICITACIONES!!! ";
FinSi
SI NOTA>4.0 Entonces
Escribir " SU NOTA ES ", NOTA;
Escribir "";
ESCRIBIR " USTED HA APROBADO Y SU RENDIMIENTO ES ALTO, FELICITACIONES!!! ";
ESCRIBIR " SIGUE ASI Y TRIUNFARAS ";
FINSI
FinProceso

EJERCICIO MENÚS - CHISTES

HACER UN ALGORITMO QUE DESPLIEGUE UNA SERIA DE CHISTES PARA QUE EL USUARIO ESCOGA, Y LE PREGUNTE SI LE GUSTO O NO EL CHISTE, SI RESPONDE QUE SI MUESTRA NUEVAMENTE EL MENÚ DE LO CONTRARIO CERRAR LA APLICACIÓN. 

SOLUCIÓN:

Proceso CHISTES
CHISTE<-0;
CHISTE1<-"V";
MIENTRAS CHISTE<>7 HACER
Escribir "SELECCIONE UNO DE LOS SIGUIENTES CHISTES";
Escribir "";
Escribir " 1. CHISTE SOBRE NIÑOS";
Escribir "";
Escribir " 2. CHISTES SOBRE BORRACHOS";
Escribir "";
Escribir " 3. CHISTES VERDES";
Escribir "";
Escribir " 4. CHISTES SOBRE PROFESORES";
Escribir "";
Escribir " 5. CHISTES SOBRE ESTUDIANTES";
Escribir "";
Escribir " 6. CHISTES SOBRE ANIMALES";
Escribir "";
Escribir " 7. SALIR";
Escribir "";
ESCRIBIR " INGRESE UN CHISTE, SEGUN SU RESPECTIVO NUMERO ";
Escribir "";
LEER CHISTE;
SI CHISTE=1 ENTONCES
Escribir "";
Escribir "";
Escribir "Mamá, mamá, papá se ha muerto encima de la criada."
Escribir "Pero ¿estás seguro de que se ha muerto?"
Escribir "Bueno, no está muerto del todo, todavía culea.";
Escribir "";
Escribir "";
Escribir "SI LE HA GUSTADO EL CHISTE ESCRIBA (V) DE LO CONTRARIO (F)";
Escribir "";
LEER CHISTE1;
Escribir "";
Escribir "";
SI CHISTE1= "V" ENTONCES
CHISTE<-0
Sino
CHISTE<-7
FINSI
FinSi
SI CHISTE=2 ENTONCES
Escribir "";
Escribir "";
Escribir "Entra un borracho a una cafetería y dice, celebrando, con voz balbuceante:"
Escribir "¡Feliz año nuevo!, A lo que una dama le contesta"
Escribir  "¿Feliz año nuevo? ¿En pleno agosto?, Y dice el borracho:, ¿Ya estamosh en agosto?"
Escribir  " Ay mi mujer me va a matar ¡nunca había llegado tan tarde!"
Escribir "";
Escribir "";
Escribir "SI LE HA GUSTADO EL CHISTE ESCRIBA (V) DE LO CONTRARIO (F)";
Escribir "";
LEER CHISTE1;
Escribir "";
Escribir "";
SI CHISTE1= "V" ENTONCES
CHISTE<-0
Sino
CHISTE<-7
FINSI
FinSi
SI CHISTE=3 ENTONCES
Escribir "";
Escribir "";
Escribir "-Que, te gusto?, Me pareces mesopotámico, Exótico, raro?, "
Escribir "No, pareces una mesa con un hipopótamo encima, más ancho que largo"
Escribir "";
Escribir "";
Escribir "SI LE HA GUSTADO EL CHISTE ESCRIBA (V) DE LO CONTRARIO (F)";
Escribir "";
LEER CHISTE1;
Escribir "";
Escribir "";
SI CHISTE1= "V" ENTONCES
CHISTE<-0
Sino
CHISTE<-7
FINSI
FINSI
SI CHISTE=4 ENTONCES
Escribir "";
Escribir "";
Escribir "El profesor le esta tomando un examen de teologia a una piba, en una universidad catolica,"
Escribir "Digame Senorita, ?Cual fue el primer hombre? "
Escribir "Mire profesor pregunteme lo que quiera, pero nada de meterse en mi vida privada. "
Escribir "";
Escribir "";
Escribir "SI LE HA GUSTADO EL CHISTE ESCRIBA (V) DE LO CONTRARIO (F)";
Escribir "";
LEER CHISTE1;
Escribir "";
Escribir "";
SI CHISTE1= "V" ENTONCES
CHISTE<-0
Sino
CHISTE<-7
FINSI
FINSI
SI CHISTE=5 ENTONCES
Escribir "";
Escribir "";
Escribir "A ver Pepito, si yo digo fui rica, es pasado, pero si yo digo soy hermosa,¿Que es?,"
Escribir "!Exceso de imaginacion profesora!"
Escribir "";
Escribir "";
Escribir "SI LE HA GUSTADO EL CHISTE ESCRIBA (V) DE LO CONTRARIO (F)";
Escribir "";
LEER CHISTE1;
Escribir "";
Escribir "";
SI CHISTE1= "V" ENTONCES
CHISTE<-0
Sino
CHISTE<-7
FINSI
FINSI
SI CHISTE=6 ENTONCES
Escribir "";
Escribir "";
Escribir "En la selva del Africa un leoncito se encontró a un misionero y "
Escribir "empezó a corretearlo rugiendo con deseos de matarlo,"
Escribir "a esto cuando la leona madre alcanza a ver a su pequeño"
Escribir "cachorro y le grita:Niño no juegues con la comida !!! "
Escribir "";
Escribir "";
Escribir "SI LE HA GUSTADO EL CHISTE ESCRIBA (V) DE LO CONTRARIO (F)";
Escribir "";
LEER CHISTE1;
Escribir "";
Escribir "";
SI CHISTE1= "V" ENTONCES
CHISTE<-0
Sino
CHISTE<-7
FINSI
FINSI
SI CHISTE>8 Entonces
Escribir "";
Escribir "";
Escribir "ESTE CHISTE NO ESTA DISPONIBLE, POR FAVOR DIGITE UN CHISTE DEL MENU, GRACIAS!!!"
Escribir "";
Escribir "";
FINSI
SI CHISTE<>7 ENTONCES
ESCRIBIR CHISTE;
FINSI
FinMientras
FinProceso

EJERCICIO DE MENÚS - HORARIO DE CLASES SEGÚN EL DÍA

HACER UN ALGORITMO QUE DESPLIEGUE UN MENÚ CON LOS DÍAS DE LA SEMANA, Y SEGÚN EL DÍA ELEGIDO POR EL USUARIO, EL PROGRAMA MOSTRARA EL HORARIO DE CLASES DE ESE DÍA.

NOTA: SI EL USUARIO ELIGE EL DÍA DOMINGO EL PROGRAMA DEBERÁ FINALIZAR O SALIR.

SOLUCIÓN:

Proceso DIAS_HORARIOS
DIA<-0;
MIENTRAS DIA<>7 HACER
Escribir "SELECCIONES UNA DE LOS SIGUIENTES DIAS";
Escribir " 1. LUNES";
Escribir " 2. MARTES";
Escribir " 3. MIERCOLES";
Escribir " 4. JUEVES";
Escribir " 5. VIERNES";
Escribir " 6. SABADO";
Escribir " 7. DOMINGO";
ESCRIBIR " INGRESE UN DIA, SEGUN SU RESPECTIVO NUMERO ";
LEER DIA;
SI DIA=1 ENTONCES
Escribir "";
Escribir "";
Escribir "LA CLASE DEL DIA ES: METODOLOGIA DEL ESTUDIO Y EL PENSAMIENTO INVESTIGATIVO";
Escribir "";
Escribir " DESDE LAS 2:00 P.M HASTA LAS 6:00 P.M, SEDE COREDUCACION LA DORADA - CALDAS ";
Escribir "";
Escribir "";
FinSi
SI DIA=2 ENTONCES
Escribir "";
Escribir "";
Escribir "LA CLASE DEL DIA ES: MATEMATICAS BASICAS";
Escribir "";
Escribir " DESDE LAS 2:00 P.M HASTA LAS 6:00 P.M, SEDE COREDUCACION LA DORADA - CALDAS ";
Escribir "";
Escribir "";
FinSi
SI DIA=3 ENTONCES
Escribir "";
Escribir "";
Escribir "LA CLASE DEL DIA ES: PROGRAMACION ";
Escribir "";
Escribir " DESDE LAS 3:00 P.M HASTA LAS 6:00 P.M, EN LA UNIVERSIDAD DE CALDAS ";
Escribir "";
Escribir "";
FinSi
SI DIA=4 ENTONCES
Escribir "";
Escribir " EN ESTE DIA NO HAY CLASES REGISTRADAS ";
Escribir "";
FinSi
SI DIA=5 ENTONCES
Escribir "";
Escribir "";
Escribir "LA CLASE DEL DIA ES: INTRODUCCION A LA TECNOLOGIA ";
Escribir "";
Escribir " DESDE LAS 2:00 P.M HASTA LAS 6:00 P.M, EN LA UNIVERSIDAD DE CALDAS ";
Escribir "";
Escribir "";
FinSi
SI DIA=6 ENTONCES
Escribir "";
Escribir "";
Escribir "LA CLASE DEL DIA ES: CATEDRA INSTITUCIONAL ";
Escribir "";
Escribir " DESDE LAS 12:30 P.M HASTA LAS 4:00 P.M, SEDE COREDUCACION LA DORADA - CALDAS ";
Escribir "";
Escribir "";
FinSi
SI DIA>7 Entonces
Escribir "";
Escribir "";
Escribir "ESTA OPCION NO ESTA EN EL MENU, POR FAVOR ELIGA UN DIA DENTRO DEL MENU";
Escribir "";
Escribir "";
FINSI
SI DIA<>7 ENTONCES
Escribir DIA;
FinSi
FinMientras
FinProceso

EJERCICIO CREACIÓN DE MENÚS PSEINT

HACER UN ALGORITMO QUE MUESTRE UN MENÚ DE OPCIONES, 1. SUMA, 2. RESTA, 3. MULTIPLICA, 4. DIVIDE, 5. SALIR; QUE AL PEDIRLE AL USUARIO DOS NÚMEROS Y AL ELEGIR UNA DETERMINADA OPCIÓN, EJEMPLO, 1. SUMA, EL PROGRAMA HAGA LAS OPERACIONES CORRESPONDIENTES SEGÚN CADA CASO.

SOLUCIÓN:

Proceso MENU
OPCION<-1;
MIENTRAS OPCION<>5 HACER
NUMERO1<-0;
NUMERO2<-0;
ESCRIBIR "INGRESE UN NUMERO";
LEER NUMERO1;
ESCRIBIR "INGRESE OTRO NUMERO";
LEER NUMERO2;
Escribir "SELECCIONES UNA DE LAS OPCIONES";
Escribir " 1. SUMA";
Escribir " 2. RESTA";
Escribir " 3. MULTIPLICAR";
Escribir " 4. DIVIDIR";
Escribir " 5. SALIR";
LEER OPCION;
SI OPCION=1 ENTONCES
RESULTADO<-NUMERO1+NUMERO2;
FinSi
SI OPCION=2 ENTONCES
RESULTADO<-NUMERO1-NUMERO2;
FinSi
SI OPCION=3 ENTONCES
RESULTADO<-NUMERO1*NUMERO2;
FinSi
SI OPCION=4 ENTONCES
RESULTADO<-NUMERO1/NUMERO2;
FinSi
SI OPCION<>5 ENTONCES
Escribir RESULTADO;
FinSi
FinMientras
FinProceso

EJERCICIO NUMERO FACTORIAL CON PARA

HACER UN ALGORITMO QUE MUESTRE EL NUMERO FACTORIAL, DE UN NUMERO X INGRESADO POR EL USUARIO.

SOLUCIÓN:


Proceso sin_titulo
V1<-1;
V2<-2;
NUMERO<-0;
ESCRIBIR "INGRESE UN NUMERO";
LEER NUMERO;
PARA I<-1 HASTA NUMERO-1 CON PASO 1 HACER
R<-V1*V2
V1<-R;
V2<-V2+1;
FINPARA
ESCRIBIR R;
FinProceso

EJERCICIO Nº 5 CON PARA

5. Hacer un programa que encuentre la raíz cuadrada de un número, aproximándola a un decimal

SOLUCIÓN

Proceso sin_titulo
R<-1;
NUMERO<-0;
ESCRIBIR "INGRESE UN NUMERO";
LEER NUMERO;
Para  I<-1 Hasta NUMERO Con Paso 1 Hacer
R<-RC(NUMERO) 
FinPara
ESCRIBIR R;
FinProceso

EJERCICIO Nº 4 CON PARA

4. Hacer un programa que pida al usuario 2 números naturales, el programa debe mostrar los múltiplos del primer numero en la cantidad del segundo número.

Ejemplo

El usuario escribe 3 y 5, el programa debe mostrar

3 6 9 12 15

SOLUCIÓN:

Proceso sin_titulo

X0<-0;

X1<-0;

NUMERO<-0;

X<-1;

Escribir "INGRESE UN NUMERO NATURAL, PARA SABER LOS MULTIPLOS DE ESTE";

Leer X0;

Escribir "AHORA INGRESE LA CANTIDAD DE MULTIPLO QUE DESEA VER";

Leer X1;

Para NUMERO<-X0 Hasta X0*X1 Con Paso X0 Hacer

Escribir NUMERO;

FinPara

FinProceso