RUBEN NAV NA VARRO CASERO & RAUL MORALES GARCIA Corrección Corrección e implementación en PSeInt por Alejandro Caro y discoduroderoer © 2004 © 2012-2013 1
Ejercicios de Pseudocódio Parte 1 Nota: Los arreglos son son en base 0 1. ). *. +. ,. -. .
Leer un n!e n!ero ro " !ostrar !ostrar #or la sal$%a sal$%a estn% estn%ar ar s$ %$'(o %$'(o n!ero n!ero es o no es #ar. #ar. Leer ) n!ero n!eross " !ostra !ostrarr el #ro%u' #ro%u'to to %e ellos. ellos. Leer ) n!ero n!eross " %eter! %eter!$nar $nar el el !a"or !a"or %e %e ellos. ellos. Leer * n!er n!eros os " !ostrar !ostrar el el !a"or !a"or %e %e ellos. ellos. Leer un un n!ero n!ero " !ostra !ostrarr su tabla tabla %e !ult$#l$'a !ult$#l$'ar. r. Leer una una se'uen'$ se'uen'$aa %e *0 n!eros n!eros " !ostrar !ostrar la su!a su!a " el #ro%u'to #ro%u'to %e %e ellos. ellos. Leer una se'ue se'uen'$a n'$a %e n!ero n!eros/ s/ (asta ue ue se $ntro%u'e $ntro%u'e un n!ero n!ero negat$o negat$o " !ostrar la su!a %e %$'(os n!eros. 2. Leer %os %os n!ero n!eross " real$3ar real$3ar el #ro%u' #ro%u'to to !e%$ant !e%$antee su!as. su!as. 4. Leer %os %os n!eros n!eros " real$3ar real$3ar la %$$s$5n %$$s$5n !e%$ante !e%$ante restas restas !ostran% !ostran%oo el 'o'$ente 'o'$ente " el resto. 10. Leer una se'uen'$a se'uen'$a %e n!eros " !ostrar su #ro%u'to/ #ro%u'to/ el #ro'eso 6$nal$3ar 'uan%o el usuar$o #ulse a la te'la 7. 11. Lee una se'uen'$a se'uen'$a %e n!eros " %eter!$na 'ual 'ual es el !a"or %e ellos. an%a 1). 8a%o un n!ero n!ero !ostrar !ostrar su alor en b$nar$o. 1*. Generar enteros %e * en * 'o!en3an%o 'o!en3an%o #or ) (asta el alor !9$!o !9$!o !enor ue Cal'ulan%o la su!a %e los enteros genera%os ue sean %$$s$bles #or ,. 1+. Cal'ular la !e%$a %e una se'uen'$a se'uen'$a %e n!eros/ el #ro'eso #ro'eso 6$nal$3ar 'uan%o el usuar$o #ulse 7. 1,. Generar los N #r$!eros #r$!eros tr!$nos %e la ser$e ser$e %e 7$bona''$ 7$bona''$ " !ostrarlos #or #antalla. El alor N ;entero ;entero " #os$t$o< %eber %eber ser le=%o #or el te'la%o. te'la%o. En esta ser$e los %os #r$!eros n!eros son 1/ " el resto se obt$ene su!an%o los %os anter$ores: 1/1/)/*/,/2/1*/)1> 1/1/)/*/,/2/1*/)1> 1-. Leer una se'uen'$a se'uen'$a se n!eros " !ostrar 'ules %e ellos ellos es el !a"or " el !enor/ el #ro'eso 6$nal$3ar 'uan%o se $ntro%u3'a un n!ero $!#ar. 1. Leer una se'uen'$a se'uen'$a %e n!eros " su!ar solo los #ares !ostran%o !ostran%o el resulta%o %el #ro'eso. 12. Leer una se'uen'$a se'uen'$a %e n!eros " !ostrar los *0 #r$!eros #ares le=%os. le=%os. 14. Leer una se'uen'$a se'uen'$a %e n!eros " !ostrar la su!a %e los *0 n!eros n!eros ue o'u#an #os$'$ones %e le'tura #ar. #ar. )0. Leer un n!ero n!ero " %eter!$nar %eter!$nar su 6a'tor$al. 6a'tor$al. )1. Leer un n!ero n!ero " %eter!$nar s$ es o no no es #r$!o. )). Leer una se'uen'$a se'uen'$a %e *0 n!eros " !ostrar la su!a %e los #r$!os. #r$!os. )*. Leer una se'uen'$a se'uen'$a %e *0 n!eros " !ostrar la su!a %e su 6a'tor$al. 6a'tor$al. )+. Cal'ular el alor alor %el n!ero n!ero E ;Euler< ?∑;1@n< " !ostrarlo en en #antalla. #antalla. ;er < ),. I!#le!entar un #rogra!a ue sea sea 'a#a3 %e 'al'ular 'al'ular el resulta%o %e a#l$'ar la 65r!ula s$gu$ente ;n $
Vase #g$na EDer'$'$os %e seu%o'5%$go arte ) #ara ) #ara la segun%a #arte
)
Ejercicios de Pseudocódio Parte 1 Nota: Los arreglos son son en base 0 1. ). *. +. ,. -. .
Leer un n!e n!ero ro " !ostrar !ostrar #or la sal$%a sal$%a estn% estn%ar ar s$ %$'(o %$'(o n!ero n!ero es o no es #ar. #ar. Leer ) n!ero n!eross " !ostra !ostrarr el #ro%u' #ro%u'to to %e ellos. ellos. Leer ) n!ero n!eross " %eter! %eter!$nar $nar el el !a"or !a"or %e %e ellos. ellos. Leer * n!er n!eros os " !ostrar !ostrar el el !a"or !a"or %e %e ellos. ellos. Leer un un n!ero n!ero " !ostra !ostrarr su tabla tabla %e !ult$#l$'a !ult$#l$'ar. r. Leer una una se'uen'$ se'uen'$aa %e *0 n!eros n!eros " !ostrar !ostrar la su!a su!a " el #ro%u'to #ro%u'to %e %e ellos. ellos. Leer una se'ue se'uen'$a n'$a %e n!ero n!eros/ s/ (asta ue ue se $ntro%u'e $ntro%u'e un n!ero n!ero negat$o negat$o " !ostrar la su!a %e %$'(os n!eros. 2. Leer %os %os n!ero n!eross " real$3ar real$3ar el #ro%u' #ro%u'to to !e%$ant !e%$antee su!as. su!as. 4. Leer %os %os n!eros n!eros " real$3ar real$3ar la %$$s$5n %$$s$5n !e%$ante !e%$ante restas restas !ostran% !ostran%oo el 'o'$ente 'o'$ente " el resto. 10. Leer una se'uen'$a se'uen'$a %e n!eros " !ostrar su #ro%u'to/ #ro%u'to/ el #ro'eso 6$nal$3ar 'uan%o el usuar$o #ulse a la te'la 7. 11. Lee una se'uen'$a se'uen'$a %e n!eros " %eter!$na 'ual 'ual es el !a"or %e ellos. an%a 1). 8a%o un n!ero n!ero !ostrar !ostrar su alor en b$nar$o. 1*. Generar enteros %e * en * 'o!en3an%o 'o!en3an%o #or ) (asta el alor !9$!o !9$!o !enor ue Cal'ulan%o la su!a %e los enteros genera%os ue sean %$$s$bles #or ,. 1+. Cal'ular la !e%$a %e una se'uen'$a se'uen'$a %e n!eros/ el #ro'eso #ro'eso 6$nal$3ar 'uan%o el usuar$o #ulse 7. 1,. Generar los N #r$!eros #r$!eros tr!$nos %e la ser$e ser$e %e 7$bona''$ 7$bona''$ " !ostrarlos #or #antalla. El alor N ;entero ;entero " #os$t$o< %eber %eber ser le=%o #or el te'la%o. te'la%o. En esta ser$e los %os #r$!eros n!eros son 1/ " el resto se obt$ene su!an%o los %os anter$ores: 1/1/)/*/,/2/1*/)1> 1/1/)/*/,/2/1*/)1> 1-. Leer una se'uen'$a se'uen'$a se n!eros " !ostrar 'ules %e ellos ellos es el !a"or " el !enor/ el #ro'eso 6$nal$3ar 'uan%o se $ntro%u3'a un n!ero $!#ar. 1. Leer una se'uen'$a se'uen'$a %e n!eros " su!ar solo los #ares !ostran%o !ostran%o el resulta%o %el #ro'eso. 12. Leer una se'uen'$a se'uen'$a %e n!eros " !ostrar los *0 #r$!eros #ares le=%os. le=%os. 14. Leer una se'uen'$a se'uen'$a %e n!eros " !ostrar la su!a %e los *0 n!eros n!eros ue o'u#an #os$'$ones %e le'tura #ar. #ar. )0. Leer un n!ero n!ero " %eter!$nar %eter!$nar su 6a'tor$al. 6a'tor$al. )1. Leer un n!ero n!ero " %eter!$nar s$ es o no no es #r$!o. )). Leer una se'uen'$a se'uen'$a %e *0 n!eros " !ostrar la su!a %e los #r$!os. #r$!os. )*. Leer una se'uen'$a se'uen'$a %e *0 n!eros " !ostrar la su!a %e su 6a'tor$al. 6a'tor$al. )+. Cal'ular el alor alor %el n!ero n!ero E ;Euler< ?∑;1@n< " !ostrarlo en en #antalla. #antalla. ;er < ),. I!#le!entar un #rogra!a ue sea sea 'a#a3 %e 'al'ular 'al'ular el resulta%o %e a#l$'ar la 65r!ula s$gu$ente ;n $
Vase #g$na EDer'$'$os %e seu%o'5%$go arte ) #ara ) #ara la segun%a #arte
)
ROCESO eDer'$'$oF 1 8E7INIR nu!ero COMO ENEROH ESCRIBIR ;Intro%u'e un n!ero
*
ROCESO eDer'$'$oF 4 8E7INIR nu!ero1 COMO ENEROH 8E7INIR nu!ero) COMO ENEROH 8E7INIR nu!ero* COMO ENEROH ESCRIBIR ;Intro%u'e n!ero1
+
ROCESO eDer'$'$oF " 8E7INIR nu!ero COMO ENEROH 8E7INIR $n%$'e COMO ENEROH 8E7INIR su!a COMO ENEROH 8E7INIR #ro%u'to COMO ENEROH su!a 0H #ro%u'to 1H ARA $n%$'e 1 ASA *0 CON ASO 1 ACER LEER nu!eroH su!a su!a nu!eroH #ro%u'to #ro%u'to nu!eroH $n%$'e $n%$'e 1H 7INARA ESCRIBIR ;la su!a es:
,
ROCESO eDer'$'$oF % 8E7INIR %$$%en%o COMO ENEROH 8E7INIR %$$sor COMO ENEROH 8E7INIR 'o'$ente COMO ENEROH 8E7INIR resto COMO ENEROH 8E7INIR s$gno COMO ENEROH ESCRIBIR ;$ntro%u'e el %$$%en%o
-
ROCESO eDer'$'$oF 11 8E7INIR nu!ero COMO ENEROH 8E7INIR !a"or COMO ENEROH 8E7INIR 6$nal COMO CARACERH 8E7INIR 66$n COMO CARACERH 66$n 7H !a"or 0H REEIR ESCRIBIR ;Intro%u'e un n!ero
7INROCESO @@;Otra solu'$5n< ROCESO eDer'$'$oF 12 F$$ 8E7INIR nu! COMO ENEROH 8E7INIR 'a% COMO CA8ENAH ESCRIBIR ;Ingrese un n!ero entero #os$t$o:
LEER nu!eroH 7INMIENRAS !e%$a su!a@'onta%orH ESCRIBIR su!a/ H ESCRIBIR !e%$aH 7INROCESO ROCESO eDer'$'$oF 1! 8E7INIR nu!ero COMO ENEROH 8E7INIR $n%$'e COMO ENEROH 8E7INIR $nter'a!b$o COMO ENEROH 8E7INIR nF1 COMO ENEROH 8E7INIR nF) COMO ENEROH REEIR ESCRIBIR ;Intro%u'e un n!ero
7INSI 7INSI 7INMIENRAS 7INMIENRAS 7INROCESO ROCESO eDer'$'$oF 1# 8E7INIR su!a COMO ENEROH 8E7INIR nu!ero COMO ENEROH su!a 0H ESCRIBIR ;Intro%u'e un n!ero
7INROCESO ROCESO eDer'$'$oF 20 8E7INIR 6a'tor$al COMO ENEROH 8E7INIR $n%$'e COMO ENEROH 8E7INIR nu!ero COMO ENEROH ESCRIBIR ;$ntro%u'e un n!ero
7INMIENRAS SI ;'onta%or ? n < ENONCES su!a su!a nu!eroH 7INSI 7INARA 7INROCESO ROCESO eDer'$'$oF 23 8E7INIR n COMO ENEROH 8E7INIR 'onta%or COMO ENEROH 8E7INIR 6a'tor$al COMO ENEROH 8E7INIR su!a COMO ENEROH 8E7INIR $n%$'e COMO ENEROH 8E7INIR nu!ero COMO ENEROH n 0H 'onta%or 0H su!a 0H REEIR REEIR ESCRIBIR ;$ntro%u'e un n!ero
1)
SUBROCESO su!a 6a'tor$al ; nu!ero < 8E7INIR su!a/ 'onta%or COMO ENEROH su!anu!eroH ARA 'onta%ornu!ero1 ASA 1 CON ASO 1 ACER su!asu!a'onta%orH 7INARA 7INSUBROCESO @@(tt#:@@.%$s'o%uro%eroer.es@eDer'$'$os%e6un'$ones#seu%o'o%$go@ ROCESO eDer'$'$oF 2! 8E7INIR nu!ero COMO ENEROH 8E7INIR resulta%o COMO ENEROH 8E7INIR $ COMO ENEROH 8E7INIR $n%$'e COMO ENEROH REEIR ESCRIBIR ;Intro%u'e un n!ero
1*
1. 8esarrolle un algor$t!o ;seu%o'5%$goOrgan$gra!a< #ara 'a%a uno %e los s$gu$entes #roble!as ue se #lantean: a. 8a%o una se'uen'$a %e n!eros %eter!$nar el !a"or le=%o " el n!ero %e e'es ue a#are'e. b. 8a%o una se'uen'$a %e #alabras %eter!$nar el !a"or " !enor le9$'ogr6$'a!ente. '. Resolu'$5n %e una e'ua'$5n %e ) gra%o. %. 8a%o una se'uen'$a %e n!eros obtener la su!a %e los 6a'tor$ales %e auellos ue o'u#an #os$'$5n #ar. e. 8eter!$na %a%o una se'uen'$a %e enteros obtener los %os !s !a"ores. 6. 8a%a un entero e9traer 'a%a uno %e los %=g$tos ue lo 6or!a. g. 8a%a un entero $sual$3ar sus %$$sores. (. 8a%a una se'uen'$a %e enteros %eter!$nar #ara 'a%a una los %$$sores. $. 8a%a una se'uen'$a %e enteros %eter!$nar los ue son #r$!os " ta!b$n los ue t$enen 'o!o %=g$to !enos s$gn$6$'at$o un . D. 8a%a una se'uen'$a %e enteros %eter!$nar #ara 'a%a su 6a'tor$al " s$ es o no #r$!o. W. 8eter!$na %e una se'uen'$a %e enteros auel ue es !a"or #ero a%e!s es #r$!o. l. 8eter!$na %e una se'uen'$a %e enteros auel 6a'tor$al ue es !a"or. !. 8a%o una se'uen'$a %e enteros %e 'a%a uno %eter!$na sus )0 #r$!eros !lt$#los #os$t$os " enteros.
1+
ROCESO eDer'$'$oF a 8E7INIR nu!ero COMO ENEROH 8E7INIR !a"or COMO ENEROH 8E7INIR 'onta%or COMO ENEROH 8E7INIR 66$n COMO CARACERH 66$n 7H 'onta%or 1H !a"or 0H REEIR ESCRIBIR ;Intro%u'e un n!ero
1,
ROCESO eDer'$'$oF c 8E7INIR a COMO ENEROH 8E7INIR b COMO ENEROH 8E7INIR ' COMO ENEROH 8E7INIR %et COMO REALH ESCRIBIR ;Intro%u'e b
66$n l$!$teH Conta%or 1H Ma"or 0H REEIR ESCRIBIR ;Intro%u'e un n!ero
7INSI 7INARA 7INROCESO ROCESO eDer'$'$oF ( 8E7INIR nu!ero COMO ENEROH 8E7INIR $n%$'e COMO ENEROH 8E7INIR 66$n COMO CARACERH 8E7INIR l$!$te1 COMO CARACERH 8E7INIR l$!$te) COMO CARACERH L$!$te1 NH L$!$te) SH REEIR ESCRIBIR ;Intro%u'e un n!ero
12
rogra!a'$5n !o%ular )alunos no andan* $ Cal'ular el !a"or %e %os alores $ntro%u'$%os !e%$ante el te'la%o ut$l$3an%o #rogra!a'$5n !o%ular. ;$r al '5%$go< Leer un n!ero " !ostrar su tabla %e !ult$#l$'ar ;$r al '5%$go< Real$3ar un algor$t!o ue !uestre el s$gu$ente !en. +o anda ;$r al '5%$go< a. A!$gos b. So'$ables '. Ve'tor %e #ro%u'tos %. Ve'tor %e su!as e. B$s$esto 6. Sal$r D 8e6$ne una 6un'$5n ue re'$ba un e'tor " %euela el !a"or %e to%os. +o anda ;$r a '5%$go< W 8e6$ne una 6un'$5n ue re'$b$en%o un e'tor " un entero %euela la e9$sten'$a o no %e %$'(o entero en el e'tor. +o anda l Algor$t!o ue lea n enteros ue $n%$uen el 6a'tor$al %e los #r$!os. +o anda ;$r al '5%$go< ;Ir a '5%$gos #arte )<
14
Calcular el mayor de dos ,alores introducidos mediante el teclado utiliando proramación modular. )(ec(o sin usar ,aria&les lo&ales* )oler al =n%$'e *
ROCESO eDer'$'$oF$ 8E7INIR alor1 COMO ENEROH 8E7INIR alor) COMO ENEROH antallaF#r$n'$#alH LeerFalores;alor1/ alor)> 7INSUBROCESO SUBROCESO LeerFalores ;alor1 or Re6eren'$a/ alor) or Re6eren'$a< ESCRIBIR ;Intro%u'e alor1
7INSUBROCESO
/eer un nmero y mostrar su ta&la de multiplicar )no anda* )(ec(o sin usar ,aria&les lo&ales* ;oler al =n%$'e<
ROCESO #r$n'$#al 8E7INIR nu!ero COMO ENEROH 8E7INIR 'otaF$n6er$or COMO ENEROH 8E7INIR 'otaFsu#er$or COMO ENEROH 8E7INIR error COMO ENEROH error leerFalores;nu!ero/ 'otaFsu#er$or/ 'otaF$n6er$or
)1
ROCESO #r$n'$#al 8E7INIR o#'$on COMO ENEROH REEIR #antallaF!enu;
7INSI 7IN7UNCION 6un'$on su!a su!aF%$$sores ;alor< 8E7INIR $n%$'e COMO ENEROH 8E7INIR su!a COMO ENEROH Su!a 0H ARA $n%$'e 1 ASA ;1 1< CON ASO 1 ACER SI ;1 J %$$sor ? 0< ENONCES Su!a su!a $n%$'eH 7INSI 7INARA 7IN7UNCION SUBROCESO #ro'e%$!$entoFso'$ables;< 8E7INIR 'otaF$n6er$or COMO ENEROH 8E7INIR 'otaFsu#er$or COMO ENEROH 8IMENSION e'torX'otaF$n6er$or/ 'otaFsu#er$orYH 8E7INIR e'tor COMO ENEROH 8E7INIR $n%$'e COMO ENEROH 'otaF$n6er$or 1H 'otaFsu#er$or )0H ARA $n%$'e 'otaF$n6er$or ASA 'otaFsu#er$or CON ASO 1 ACER LEER e'torX$n%$'eYH 7INARA SI ;;so'$ables;e'tor/ 'otaF$n6er$or/ 'otaFsu#er$or<< ? 1< ENONCES ESCRIBIR ;Son so'$ables
)*
ARA $n%$'e 'otaF$n6er$or ASA 'otaFsu#er$or CON ASO 1 ACER #ro%u'to #ro%u'to e'torX$n%$'eYH 7INARA 7IN7UNCION SUBROCESO e'torF%eFsu!as 8E7INIR 'otaF$n6er$or COMO ENEROH 8E7INIR 'otaFsu#er$or COMO ENEROH 8E7INIR $n%$'e COMO ENEROH 8IMENSION e'torX'otaF$n6er$or/ 'otaFsu#er$orYH 8E7INIR e'tor COMO ENEROH Leer 'otaF$n6er$orH Leer 'otaFsu#er$orH ARA $n%$'e 'otaF$n6er$or ASA 'otaFsu#er$or CON ASO 1 ACER LEER e'torX$n%$'eYH 7INARA ESCRIBIR ;su!aFe'tor;e'tor/ 'otaF$n6er$or/ 'otaFsu#er$or
8E7INIR retorno COMO ENEROH SI ;an$o J + K 0< ENONCES Retorno ;0
7UNCION Ma"or !a"orFe'tor ;a/ 'otaF$n6er$or/ 'otaFsu#er$or< 8E7INIR $n%$'e COMO ENEROH 8E7INIR !a"or COMO ENEROH !a"or aX'otaF$n6er$orYH ARA ;$n%$'e 'otaF$n6er$or ASA 'otaFsu#er$or< CON ASO 1 ACER SI ;aX$n%$'eY K !a"or< ENONCES Ma"or aX$n%$'eYH 7INSI 7INARA 7IN7UNCION 5e'ine una 'unción ue reci&iendo un ,ector y un entero de,uel,a la e6istencia o no de dic(o entero en el ,ector. )no anda*
SUBROCESO nu!eroFe'tor ;nu!ero/ e'tor/ 'otaF$n6er$or/ 'otaFsu#er$or< 8E7INIR $n%$'e/ retorno COMO ENEROH $n%$'e 'otaF$n6er$orH MIENRAS ;$n%$'e ? 'otaFsu#er$or< & ;e'tor;$n%$'e K nu!ero< ACER $n%$'e $n%$'e 1H 7INMIENRAS SI ;$n%$'e 'otaF$n6er$or 1< ENONCES Retorno ;0
#r$n'$#$o< ROCESO e'torF%eF6a'tor$alesF#r$!os 8IMENSION e'torX'otaF$n6er$or/ 'otaFsu#er$orYH 8IMENSION e'torF6a'tor$alX'otaF$n6er$or/ 'otaFsu#er$orYH 8E7INIR 'otaFsu#er$or COMO ENEROH 8E7INIR 'otaF$n6er$or COMO ENEROH 8E7INIR $n%$'e COMO ENEROH LeerFalores;alor1/ alor)
7INSI ESCRIBIR e'torF6a'tor$alX$n%$'eYH 7INARA 7INROCESO SUBROCESO LeerFalores ;alor1 or Re6eren'$a/ alor) or Re6eren'$a< ESCRIBIR ;Intro%u'e alor1
ROCESO 6a'tor$al 8IMENSION e'torFenteroX'otaF$n6er$or/ 'otaFsu#er$orYH 8IMENSION e'torF6a'tor$alX'otaF$n6er$or/ 'otaFsu#er$orYH 8E7INIR 'otaF$n6er$or COMO ENEROH 8E7INIR 'otaFsu#er$or COMO ENEROH Borrar #antallaH LeerFaloresH ARA $n%$'e 'otaF$n6 ASA 'otaFsu# CON ASO 1 ACER e'torF6a'tor$alX$n%$'eY 6a'tor$alF%eFunFnu!ero;e'torFenteroX$n%$'eY
7INARA 7INROCESO SUBROCESO leerFalores 8E7INIR 'otaF$n6er$or/ 'otaFsu#er$or COMO ENEROSH ESCRIBIR $ntro%u'e 'otasH LEER 'otaF$n6er$orH LEER 'otaFsu#er$orH ESCRIBIR ;Rellena el e'tor
SUBROCESO 'onta%orF#alabra #alabraF!asFlarga ;#arra6o< 8E7INIR $n%$'e COMO ENEROH 8E7INIR 'onta%orF#alabra COMO ENEROH 8E7INIR !a"orF#alabra COMO ENEROH $n%$'e 0H 'onta%orF#alabra 0H !a"orF#alabra 0H MIENRAS ;#arra6oX$n%$'eY K Qo< ACER SI ;#arra6oX$n%$'eY K Qo< ENONCES Conta%orF#alabra 'onta%orF#alabra 1H 7INSI SI ;#arra6oX$n%$'eY K Qo< & ;#arra6oX$n%$'e 1Y ? ;#arra6oX$n%$'e 1Y ? Qo< ENONCES SI;'onta%orF#alabra K !a"orF#alabra< ENONCES Ma"orF#alabra 'onta%orF#alabraH 7INSI Conta%orF#alabra 0H 7INSI In%$'e $n%$'e 1H 7INMIENRAS 7INSUBROCESO )
/eer una secuencia y determinar la lonitud de la misma. )no anda*
SUBROCESO $n%$'e long$tu%F'a%ena 8E7INIR $n%$'e COMO ENEROH $n%$'e QoH MIENRAS ;te9toX$n%$'eY K Qo< ACER $n%$'e $n%$'e 1H 7INMIENRAS 7INSUBROCESO ealiar una 'unción ue reci&iendo una secuencia de,uel,a dic(a secuencia en maysculas. )no anda*
SUBROCESO #arra6o tou##er'aseFDaa ;#arra6o< 8E7INIR $n%$'e COMO ENEROH 8E7INIR resulta%o COMO SECUENCIAH $n%$'e 0H MIENRAS ;#arra6oX$n%$'eY K Qo< ACER SI ;#arra6oX$n%$'eY K? a< & ;#arra6oX$n%$'eY ? 3< ENONCES arra6oX$n%$'eY 'onert$rate9to;'onert$ranu!eroX$n%$'eY *)
SUBROCESO s$!ulaFauto$ ;te9to< 8E7INIR VFaX1.long$tu%;te9to< 1Y COMO CARACERH 8E7INIR $n%$'e COMO ENEROH 8E7INIR a'u!ula%or COMO ENEROH 8E7INIR $n%$'e) COMO ENEROH $n%$'e 0H MIENRAS ;te9toX$n%$'eY K Qo< & ;te9toX$n%$'eY K? Qo< & ;te9toX$n%$'eY ? 4< VFaX$n%$'e 1Y te9toX$n%$'eYH $n%$'e $n%$'e 1H 7INMIENRAS VFaX$n%$'eY QoH a'u!ula%or 0H ARA $n%$'e) 0 ASA $n%$'e1 CON ASO 1 ACER A'u!ula%or a'u!ula%or ;'onert$ranu!ero;FaX$n%$'e)Y< [ +,< ;10T;$n%$'e [ $n%$'e)<
SUBROCESO a#ar$'$ones ;te9to< 8E7INIR as'$$X),,Y COMO ENEROH 8E7INIR $n%$'e COMO ENEROH )2
ARA $n%$'e 0 ASA ),+ CON ASO 1 ACER as'$$X$n%$'eY 0H 7INARA ARA $n%$'e ? 0 ASA long$tu%;te9to< CON ASO 1 ACER as'$$ ;'onert$ranu!ero;te9toX$n%$'eY<< ;as'$$X'onert$ranu!ero;te9toX$n%$'eY<< 1 7INARA ARA $n%$'e 0 ASA ),, CON ASO 1 ACER ESCRIBIR ;El 'o%$go as'$$
)4
Ejercicios de Pseudocódio Parte 2 ). Leer una se'uen'$a %e n!eros " !ostrar la su!a %e los #ares " el #ro%u'to %e los ue son !lt$#lo %e ,. )2. Leer una se'uen'$a %e n!eros " %eter!$nar el !a"or %e los #ares le=%os. an%a )4. Leer una se'uen'$a %e n!eros " !ostrar el !a"or %e los !lt$#los %e , le=%os " el !enor %e los !lt$#los %e * le=%os. *0. Leer una se'uen'$a %e letras " !ostrar la su!a %e sus '5%$gos ASCII. Su#one!os ue tene!os la 6un'$5n 'onert$ranu!ero;'ara'ter
*1. 8a%o un e'tor %e , enteros a'tual$3ar 'a%a #os$'$5n %e %$'(o e'tor 'on un n!ero le=%o " !ostrarla en #antalla. *). Leer una se'uen'$a %e )0 n!eros al!a'enarlos en un e'tor " !ostrar la #os$'$5n %on%e se en'uentra el !a"or alor le=%o. **. 8a%o %os e'tores A " B %e 1, ele!entos 'a%a uno/ obtener un e'tor C %on%e la #os$'$5n $ se al!a'ene la su!a %e AX$YBX$Y. *+. 8a%o %os e'tores A " B %e 1, ele!entos 'a%a uno/ obtener un e'tor C %on%e la #os$'$5n $ se al!a'ene la su!a %e AX$YBX$Y " !ostrar el !a"or %e los CX$Y. *,. 8a%o una se'uen'$a %e n!ero le=%os " al!a'ena%os en un e'tor A !ostrar %$'(os n!eros en or%en. *-. 8a%o una se'uen'$a %e n!ero le=%os " al!a'ena%os en un e'tor A " un n!ero le=%o %eter!$nar s$ %$'(o n!ero se en'uentra o no en el e'tor. *. Leer una se'uen'$a %e )0 n!eros " al!a'enar en un e'tor sus 6a'tor$ales " !ostrarlos en #antalla. *2. Leer )0 n!eros " al!a'enarlos %e !anera or%ena%a en un e'tor " !ostrar %$'(o e'tor en #antalla. *4. 8a%o %os !atr$'es A " B obtener la su!a " !ostrarla en #antalla. +0. 8a%o una !atr$3 %eter!$nar la #os$'$5n ;$/D< %el !a"or " !ostrarla en #antalla. +1. 8a%o una !atr$3 %eter!$nar la #os$'$5n ;$/D< %el !a"or " !enor " !ostrarla en #antalla. +). Leer un n!ero " una letra s$ la letra es B !ostrar el alor en b$nar$o/ s$ es O en o'tal " s$ es en (e9a%e'$!al. esultado muc(as ,eces incorrecto: pro&lema de códio ;$r al '5%$go< +*. Leer una se'uen'$a %e )0 n!eros al!a'enarlos en un e'tor AX)0Y " !ostrar la su!a %e los ele!entos ue o'u#an #os$'$ones #ares " el !a"or %e los ue o'u#an #os$'$ones $!#ares. ++. 8a%a una !atr$3 AX+/,Y real$3a la or%ena'$5n %e la !$s!a ;" !ostrarla or%ena%a #or #antalla<. +,. 8a%a una !atr$3 AX+/,Y real$3a el #ro'eso %e or%enar solo #or 6$las. +-. 8a%o un e'tor %e n!eros %eter!$na auellos ue sea #r$!os. Ir a EDer'$'$os %e seu%o'5%$go arte 1 ara #rogra!a'$5n !o%ular s$ga este enla'e
*0
ROCESO ejercicio;2# 8E7INIR nu!ero COMO ENEROH 8E7INIR #ro%u'to COMO ENEROH 8E7INIR su!a#ares COMO ENEROH nu!ero 0H #ro%u'to 1H su!a#ares 0H MIENRAS nu!ero K 1 ACER LEER nu!eroH SI ;nu!ero J ) ? 0< ENONCES @@#reguntar s$ es #ar su!a#ares su!a#ares nu!eroH @@ su!ar nu!ero a nu!ero %e #ares SINO SI ;nu!ero J , ? 0< ENONCES #ro%u'to#ro%u'tonu!eroH LEER nu!eroH 7INSI 7INSI 7INMIENRAS ESCRIBIR ;su!a#ares
8E7INIR nu!ero COMO ENEROH 8E7INIR !a"or COMO ENEROH 8E7INIR !enor COMO ENEROH MA\10H $n%$'e0H @@$n$'$al$3ar =n%$'e en 0 nu!ero0H !a"or0H !enor0H MIENRAS ;$n%$'e MA\< ACER $n%$'e$n%$'e1H ESCRIBIR ;Intro%u3'a NUMERO
8E7INIR !a"orF$n%$'e COMO ENEROH 8E7INIR $n%$'e COMO ENEROH 8E7INIR !a"or COMO ENEROH ARA $n%$'e 0 ASA 14 CON ASO 1 ACER ESCRIBIR ;Intro%u'e un n!ero
ESCRIBIR ;Intro%u'e un n!ero #ara el e'tor B
$n%$'e $n%$'e 1H 7INMIENRAS SI ;$n%$'e 11< ENONCES ESCRIBIR ;No est
or%ena%oX$Ye'torX$YH ESCRIBIR or%ena%oX$YH 7INARA 7INROCESO @@(tt#:@@#rogra!a%ora#l$'a'$ones.b$'(otoblog.'o!@#rogra!a'$on@'ont$nuan%o'on #seu%o'o%$go.(t!l ROCESO eDer'$'$oF 3% @@ ab$l$tar #er!$t$r usar ar$ables #aras %$!ens$onar arreglos en o#'$ones %e lenguaDe @@Nota: Las %$!ens$ones ar$ables t$enen ue $r %es#us %e la le'tura %e la 'ant$%a% %e sus ele!entos 8IMENSION AX,/10YH 8IMENSION BX,/10YH 8E7INIR A/ B COMO ENEROSH 8E7INIR su!a COMO ENEROH 8E7INIR 6$la COMO ENEROH 8E7INIR 'olu!na COMO ENEROH ARA 6$la 0 ASA + CON ASO 1 ACER ARA 'olu!na 0 ASA 4 CON ASO 1 ACER LEER AX6$la/'olu!naYH 7INARA 7INARA ARA 6$la 0 ASA + CON ASO 1 ACER ARA 'olu!na 0 ASA 4 CON ASO 1 ACER LEER BX6$la/'olu!naYH 7INARA 7INARA 8IMENSION su!aX6$la/'olu!naYH ARA 6$la 0 ASA + CON ASO 1 ACER ARA 'olu!na 0 ASA 4 CON ASO 1 ACER su!aX6$la/'olu!naY AX6$la/'olu!naY BX6$la/'olu!naYH 7INARA 7INARA ESCRIBIR ;su!aX6$la/'olu!naY
*-
ROCESO eDer'$'$oF 40 8IMENSION AX,/+YH 8E7INIR A COMO ENEROH 8E7INIR 6$la COMO ENEROH 8E7INIR 'olu!na COMO ENEROH 8E7INIR !a"or COMO ENEROH 8E7INIR #os$'$onF6$la COMO ENEROH 8E7INIR #os$'$onF'olu!na COMO ENEROH ARA 6$la 0 ASA + CON ASO 1 ACER ARA 'olu!na 0 ASA * CON ASO 1 ACER ESCRIBIR ;Intro%u'e un n!ero
*
ROCESO eDer'$'$oF 41 8IMENSION AX+/*YH 8E7INIR A COMO ENEROH 8E7INIR 6$la COMO ENEROH 8E7INIR 'olu!na COMO ENEROH 8E7INIR !a"or COMO ENEROH 8E7INIR !enor COMO ENEROH 8E7INIR #os$'$onF6$la COMO ENEROH 8E7INIR #os$'$onF'olu!na COMO ENEROH 8E7INIR #os$'$onF6$la1 COMO ENEROH 8E7INIR #os$'$onF'olu!na1 COMO ENEROH ARA 6$la 0 ASA * CON ASO 1 ACER ARA 'olu!na 0 ASA ) CON ASO 1 ACER ESCRIBIR ;Intro%u'e un nu!ero
*2
ROCESO eDer'$'$o ;42 @@resultado muc(as ,eces incorrecto/ #roble!a %e '5%$go ;$r al =n%$'e< 8E7INIR $n%$'e COMO ENEROH 8E7INIR #ul COMO ENEROH 8E7INIR t$#o COMO CARACERH 8E7INIR nu!ero COMO ENEROH 8E7INIR 'o'$ente COMO ENEROH 8E7INIR %$$sor COMO ENEROH 8E7INIR resto COMO ENEROH 8IMENSION resulta%oX)0YH 8E7INIR resulta%o COMO CA8ENAH ESCRIBIR ;Ingrese un n!ero
$nt restoH '(ar resulta%oX)0YH #r$nt6 ;Ingrese un n!ero
c
+1
ROCESO eDer'$'$oF 43 8IMENSION AX)0YH @@%e )0 ele!entos 8E7INIR $n%$'e COMO ENEROH 8E7INIR su!a COMO ENEROH 8E7INIR !a"or COMO ENEROH 8E7INIR A COMO ENEROH ARA $n%$'e 0 ASA 14 CON ASO 1 ACER ESCRIBIR ;Intro%u'e un n!ero
+)
ROCESO eDer'$'$oF 44 8IMENSION AX+/,YH 8E7INIR A COMO ENEROH 8E7INIR 6$la COMO ENEROH 8E7INIR 'olu!na COMO ENEROH 8IMENSION VX)0YH 8E7INIR V COMO ENEROH 8E7INIR $n%$'e COMO ENEROH 8E7INIR $nter'a!b$o COMO ENEROH 8E7INIR $nter!e%$o COMO ENEROH 8E7INIR salta%or COMO ENEROH ARA 6$la 0 ASA * CON ASO 1 ACER ARA 'olu!na 0 ASA + CON ASO 1 ACER ESCRIBIR ;Intro%u'e un n!ero
+*
ROCESO eDer'$'$oF 4! 8IMENSION AX+/,YH 8E7INIR $nter!e%$o COMO ENEROH 8E7INIR $nter'a!b$o COMO ENEROH 8E7INIR 6$la COMO ENEROH 8E7INIR 'olu!na COMO ENEROH 8E7INIR A COMO ENEROH ARA 6$la 0 ASA * CON ASO 1 ACER ARA 'olu!na 0 ASA + CON ASO 1 ACER ESCRIBIR ;Intro%u'e un n!ero
++
