ALGORITMOS EJERCICIOS EN PSEINT APORTE INDIVIDUAL
HECHO POR: LIEVER ROJAS SCARPETA CÓDIGO: 1075283152
PRESENTADO A: ERNESTO ORLANDO PARRA – TUTOR Y COMPAÑEROS GRUPO: 30130352
UNIVERSIDAD UNIVERS IDAD NACIONAL A!IERTA Y A DISTANCIA DISTANCIA PITALITO " HUILA 2015
Ejercicio No 1
1# S$ %&'$ '$()**+,,)* $, ),-+*&./+ '$, $-+ A'&&4) 4 N/$*+6 +4 ,)( (&-&$4.$( )*).$*9(.&)(: ) E, 4/$*+ '$;$ $(.)* $4 $, *)4-+ '$ 1 ) 1000 <-$4$*)'+ ),$).+*&)/$4.$ D$;$ .$4$* '+( 4&$,$( 4&$, ;=(&+ > 4&$, $?%$*.+ $, 4&$, ;=(&+ 4+ .$4'*= *$(.*&&+4$( $4 4/$*+ '$ +%+*.4&')'$( )'$/=( ($ ,$ ')*= &4'&)&+4$( +/+ C),&$4.$6 @*&+6### E, N&$, $?%$*.+ (+,+ .$4'*= 5 +%+*.4&')'$( +4 /$4()$( '$ )>') ,$+(6 $*) ; A, &4),&B)* '$;$ &4+*/)* $, 4/$*+ '$ &4.$4.+( *$),&B)'+( )4.$( '$ $4+4.*)* ,) *$(%$(.) +**$.)# •
Programa fuente. Proceso Adivina_el_numero Escribir "Nombre del autor: Liever Rojas" Escribir "Fecha: ! de maro del #$%" Escribir "&o' fe (ue este ejercicio es de mi autor)a*" Escribir "en caso de encontrar +lagio la nota de todo, Escribir "mi trabajo debe ser de -ER adem/s de las, Escribir "res+ectivas sanciones a (ue ha'a lugar" Escribir "0........................0" o+ci1n 20 $ intentos# 20 % intentos 20 $ num_secreto 20 aar3$45$ Escribir "En (ue nivel (uieres adivinar el numero:"6 Escribir "............................" Escribir "$.0 Nivel 7asico."6 Escribir "#.0 Nivel E8+erto."6 Escribir "............................" Escribir "9eleccione el nivel: "6 Leer o+cion segun o+cion hacer $: Escribir "Escogiste la o+cion basico" Escribir " " Escribir "Adivine el numero 3de $ a $4:" Leer num_ingresado ientras num_secreto2;num_ingresado < intentos ; $ =acer 9i num_secreto;num_ingresado Entonces Escribir "Estas bajo" 9ino Escribir "Estas alto"
Fin9i intentos 20 intentos0$ Leer num_ingresado Finientras 9i num_secreto>num_ingresado Entonces Escribir "E8acto? @sted adivino en "*$ 0 intentos*" intentos." Fin9i #: Escribir "Escogiste nivel e8+erto" Escribir " " Escribir "Adivina el nmero 3de $ a $4 en % intentos:" Leer num_ingresado ientras num_secreto2;num_ingresado < intentos#;$ =acer 9i num_secreto;num_ingresado Entonces Escribir "Estas cerca" 9ino Escribir "Estas lejos" Fin9i intentos# 20 intentos#0$ Escribir "-uidado te (uedan "* intentos#*" intentos:" Leer num_ingresado Finientras 9i num_secreto>num_ingresado Entonces Escribir "Felicidades adivinaste el numero en: "*B0intentos#*" intentos." 9ino Escribir "Cue mal* el numero era: "*num_secreto Fin9i Fin9egun FinProceso
Pantalla de ejecución
El +rograma lee una variable ' lo almacena en num_ingresado ' busca dentro de azar un nmero del $ al % ' muestra los intentos (ue realio ' si est/ cerca o lejos de adivinar el nmero.
Ejercicio No 4
D$;$ '$()**+,,)* 4 ),-+*&./+ $ +4.$4-) $, (&-&$4.$ /$4 <1 C+4$*.&* '$ D$&/), ) !&4)*&+ <2 C+4$*.&* '$ D$&/), ) O.), <3 C+4$*.&* '$ !&4)*&+ ) D$&/), < S),&* Proceso enu_de_conversion Escribir "Nombre del autor: Liever Rojas" Escribir "Fecha: #! de maro del #$%" Escribir "&o' fe (ue este ejercicio es de mi autor)a*" escribir "en caso de encontrar +lagio la nota de todo " Escribir "mi trabajo debe ser de -ER adem/s de las " Escribir "res+ectivas sanciones a (ue ha'a lugar" Escribir "0........................0" o+cion20$ Escribir "Cue conversion (uieres realiar" Escribir D..............................D Escribir D$.0 -onvertir de &ecimal a 7inario D Escribir D#.0 -onvertir de &ecimal a ctal D Escribir D.0 -onvertir de 7inario a &ecimal D Escribir D!.0 9alir D Escribir D..............................D Leer o+cion 9egun o+cion =acer $: Escribir DEscogiste convertir de &ecimal a 7inarioD Escribir DEscribe el numero (ue (uieres convertirD Escribir D0000000000000000000000000000D denir dec -omo Entero Leer dec bin20 i20 Re+etir r20dec mod # bin20bin5$GiHr i20i5$ dec20decI# =asta Cue dec>$ bin20bin5$Gi ostrar bin #: Escribir DEscogiste convertir de &ecimal a ctalD Escribir DEscribe el numero (ue (uieres convertirD Escribir D0000000000000000000000000000D &enir dec -omo Entero Leer dec
oct20 i20 Re+etir r20dec mod J oct20oct5$GiHr i20i5$ dec20decIJ =asta Cue dec2J oct20oct5$GiHdec Escribir "El numero en octal es: " *oct : Escribir DEscogiste convertir de 7inario a &ecimalD Escribir DKngresa el numero binarioD Escribir D0000000000000000000000000000D &enir bin como entero leer bin si bin; entonces coci20bin re20$ decimal20 mientras coci2;$ =acer decimal20decimal53coci $4Hre coci20 trunc3cociI$4 re203reH#4 Finientras decimal20decimal533coci $4Hre4 escribir "El numero en decimal es: " * decimal Fin9i Fin9egun Escribir "=asta luego" FinProceso
Pantalla de ejecución
El +rograma +ide elegir una opción del $ al ! +ara hacer cual(uier o+ci1n de conversi1n (ue muestra el men.
Ejercicio No. 11
R$),&B)* 4 %*+-*)/) $ ,$ %*$($4.$ 4 /$4 ), ()*&+ +4 ,)( (&-&$4.$( +%&+4$(: 1. L$$* '+( 4/$*+( $4.$*+( %+(&.&+( 4&)/$4.$ 2. S/)* ,+( '+( 4/$*+( ,$9'+( 3. R$(.)*,$ ), %*&/$* 4/$*+ $, ($-4'+ <(&$/%*$ > )4'+ $, %*&/$*+ ($) /)>+* $
, ($-4'+ $4 )(+ +4.*)*&+ &4'&)* +4 4 /$4()$ $ ,) +%$*)&F4 4+ $( %+(&;,$ *$),&B)*,) > +,$* ), /$4 %*&4&%), 4. M,.&%,&)* ,+( '+( 4/$*+( <(&$/%*$ > )4'+ 4&4-4+ '$ ,+( 4/$*+( ($) &-), ) $*+ $4 )(+ +4.*)*&+ &4'&)* +4 4 /$4()$ $ ,) +%$*)&F4 4+ $( %+(&;,$ *$),&B)*,) > +,$* ), /$4 %*&4&%), 5. D&&'&* $, %*&/$* 4/$*+ ')'+ %+* $, ($-4'+ 6 Salir Nota: S$ '$;$ -)*)4.&B)* $ $, ()*&+ )>) &4-*$()'+ ,+( '+( 4/$*+( )4.$( '$ %+'$* *$),&B)* ),&$* +%$*)&F4 > $ 4+ ($ %$'$ $(*&;&* 4 *$(,.)'+ (&4 ,) *$),&B)&F4 '$ 4) +%$*)&F4# Proceso enu_+ciones Escribir "Nombre del autor: Liever Rojas" Escribir "Fecha: #J de maro del #$%" Escribir "&o' fe (ue este ejercicio es de mi autor)a*" escribir "en caso de encontrar +lagio la nota de todo " Escribir "mi trabajo debe ser de -ER adem/s de las " Escribir "res+ectivas sanciones a (ue ha'a lugar" Escribir "0........................0" salir > falso re+etir +cion 20 $ Escribir " " Escribir "9eleccione la o+cion (ue desee" Escribir "......................" Escribir "$. Leer dos numero enteros +ositivos" Escribir "#. sumar los dos numero leidos" Escribir ". Restarle el +rimer numero al segundo numero" Escribir "!. ulti+licar los dos numero" Escribir "%. &ividir el +rimer numero +or el segundo" Escribir "B. salir" leer o+cion 7orrar Pantalla segun o+cion hacer $: Escribir "Kngrese el +rimer numero entero" leer a si 3a2 4 entonces Escribir "No se +ueden ingresar numero negativos"
Fin9i Escribir "Kngrese el segundo numero entero" leer b si 3b24 Entonces Escribir "N se +ueden ingresar numero negativos" Escribir " " Fin9i #: Escribir " " suma 20 a 5 b Escribir "El resultado de la suma es " * suma Escribir " " : Escribir " " si a ; b Entonces resta 20 a 0 b Escribir "El resultado de la resta es " * resta Escribir " " 9ino Escribir "No es +osible realiar la o+eracion" Escribir " " Fin9i !: Escribir " " si 3a > 4 o 3b > 4 entonces Escribir "No es +osible reliar la o+eracion" Escribir " " 9ino multi+licacion 20 a H b Escribir "El resultado de la multi+licacion es " * multi+licacion Escribir " " Fin9i %: Escribir " " division 20 a I b Escribir "El resultado de la division es " * division Escribir " " B: salir > Merdadero &e tro odo: Escribir "Kngrese una o+cion valida" Fin9egun =asta Cue salir FinProceso Pantalla de ejecución
-on un men de o+ciones nos damos a la tarea de insertar dos nmeros* al ingresar en una de las o+ciones se nos desa+arece el men borrar pantalla ' se ingresan los valores (ue se deseen* des+us vuelve ' a+arece el men +ara hacer cual(uiera de las otras o+eraciones.