“AÑO DE LA CONSOLIDACIÓN DEL MAR DE GRAU”
UNIVERSIDAD TECNOLÓGICA DEL PERÚ
CURSO: CURSO:
PRINCIPIOS DE ALGORITMOS
DOCENTE:
POMACHAGUA BASUALDO, Yuri
Arturo
TEMA:
INTEGRANTES:
ESTRCUTURAS REPETIDAS” ESTRCUTURAS
“
ARROYO ARROYO GUTIEEREZ, GUTIEEREZ, Bi!"# BUSTAMANTE BUSTAMANT E RI$ASPLATA, RI$ASPLATA, Ni%&"r CRUZ IN'ANTE, (o)" Dr*i! MALCA CUE$A, (o)" $%"rio NOLAZCO TITO, I!+) Mi"%
SECCIÓN:
-.
AULA:
/.A0.01 Li2, -3 4" No&i"25r" 4"% 60-.
2016-III
1.- Leer un núer! en"er! N # $%&$u&e # ue'"re 'u (%$"!r)%& N*
Proceso FactN Escribir "Ingrese el número" Leer Num i=1 factorial=1
Mientras i<=num Hacer factorial=factorial*i i=i+1 FinMientras
Escribir "El factorial el número es !! "# Factorial FinProceso
2.- De"er)n%r &% $%n")+%+ +e +,)"!' ue ")ene un núer! en"er! # %+e/' !'"r%r &% 'u% +e &!' +,)"!' %re' e )%re'. Proceso $%gitos Escribir "Ingrese el número" Leer n i=& 'n1=& 'n(=& Mientras n<& Hacer r= n mo 1& 'i r Es Multi)lo $e ( Entonces 'n1='n1+r 'ino 'n(='n(+r Fin'i I=i+1 n=trunc n1&, FinMientras
Escribir "La cantia e %gitos es !!"# i Escribir "La suma e los %gitos )ares es !!"# 'n1 Escribir "La suma e los %gitos im)ares es !!"# 'n(
FinProceso
.- De"er)n%r &% 'u% +e &!' N r)er!' "r)n!' +e &% ')u)en"e 'er)e:
-lgoritmo Nt.rminos Escribir "Ingrese el número e t.rminos" Leer / Escribir "Ingrese el 0alor e " Leer i=2 '/=& $en=1 e3=1 Num=
Mientras i<=/ Hacer Num=Num $en=$en+1 e3=e3+1 '/='/+Num4e3en, i=i+1 FinMientras
'um/otal= 'um/otal= '/+1+3 Escribir "La suma e los t.rminos es !!"# 'um/otal
Fin-lgoritmo
3.- A un% 4e'"% %')'")er!n er'!n%' +e +)(eren"e' e+%+e' # 'e5!'. C!n'"ru)r un %&!r)"! +%+%' &%' e+%+e' # 'e5!' +e &%' er'!n%'. C%&$u&%r: % Cu/n"%' er'!n%' %')'")er!n % &% 4e'"%. 7 Cu/n"!' 8!7re' # $u%n"%' $u%n"%' u9ere'. u9ere'. $ Pr!e+)! Pr!e+)! +e +e e+%+e' e+%+e' !r !r 'e5!. 'e5!. + L% e+%+ +e &% er'!n% /' /' 9!en ue ue %')'");. e N! 'e er)"en er)"en en!re' en!re' +e e+%+ % &% 4e'"%. ( Inre'%r Inre'%r +%"!' +%"!' 8%'" 8%'"% % ue 'e )nre' )nre'e e &% e+%+ e+%+ $er!. -lgoritmo Fiesta Escribir "Ingrese el número e )ersonas en la 5esta"
Leer NP i=1 'H=& 'M=& min=(&& EH=& EM=& E1=& E(=& Mientras i<=NP Hacer Escribir "'e3o e la )ersona6 1, Es Hombre 7 (, Es Mu8er" Escribir "Ingrese la ea e la )ersona" Leer s#e 'i s=1 Entonces 'H='H+1 EH=EH+e E1=E1+1 'ino 'M='M+1 EM=EM+e E(=E(+1 Fin'i 'i e
Fin'i i=i+1 FinMientras PEH=EHE1 PEM=EME( Escribir "El )romeio e ea e 9ombres es !!"# PEH Escribir "El )romeio e ea e mu8eres fue !!"# PEM Escribir "!! asistieron a la 5esta " NP " )ersonas" Escribir "!! Fueron " 'H " Hombres a la 5esta" Escribir "!! Fueron " 'M " Mu8eres a la 5esta" Escribir "La ea e la )ersona m:s 8o0en fue !!"# min Fin-lgoritmo
<.- En un e'"%+)! 'e ")enen = ")!' +)(eren"e' +e &!$%&)+%+e'> &!$%&)+%+e'> &%' $u%&e' 'e )+en")4$%n !r un %&!r $!ren+)+! en"re 1 # =. L!'
re$)!' +e $%+% &!$%&)+%+> # &!' +%"!' re(eren"e' % &%' en"%' +e 7!&e"!' %r% e& r;5)! 9ue! 'e r!!r$)!n%n $!! ')ue:
Pre$)!': 1> 2> > 3> = L!$%&)+%+1 L!$%&)+%+2 ?. L!$%&)+%+ =
C%n"1 C%n"2 ?. C%n"=
D)'e@e un %&!r)"! %r%: % Le% &!' &!' re$)! re$)!'. '. 7 Le% &!' +%"!' +%"!' +e &%' en"%' +e 7!&e"!'. 7!&e"!'. $ Ir)% %r% $%+% en"%> &% $&%e> &% $%n")+%+ $%n")+%+ # e& )!r"e "!"%& +e &!' 7!&e"!' en+)+!' en e'"% en"%. + C%&$u&e e )r)% )r)% &% $%n")+%+ +e 7!&e"!' en+)+!' +e +e $%+% ")!. e C%&$u&e e )r)% )r)% &% re$%u+%$);n "!"%& "!"%& +e& e'"%+)!. e'"%+)!. -lgoritmo Localiaes Escribir "Ingrese los )recios e las ; localiaes" Leer cant1# cant(# cant2# cant# cant; Mientras 1& Hacer Escribir "Ingrese el ti)o e boleto ue com)ro 7 la cantia" Leer t# cant si t=1 Entonces Precio1=cant*11 '>1='>1+Precio1 cont1=cont1+cant 'ino 'i t=( Precio(=?ant*1( '>(='>(+Precio( cont(=cont(+cant 'ino si t=2 Precio2=cant*12 '>2='>2+Precio2 cont2=cont2+cant 'ino 'i t= Precio=cant*1
'>='>+Precio
cont=cont+cant 'ino Precio;=Precio;*1; '>;='>;+Precio; cont;=cont+cant Fin'i Fin'i Fin'i Fin'i Escribir "Marue 1, )ara ingresar los atos o (, )ara salir" Leer num 'i num=1
Entonces i=1 'ino i=& Fin'i FinMientras '/='>1+'>(+'>2+'>+'>; Escribir "El im)orte total e los boletos según oren son !!"# '>1 "# " '>( "# " '>2 "# " '> "# " '>; Escribir "La cantia e los boletos 0enios según oren son !!"# cont1 "# " cont( "# " cont2 "# " cont "# " cont; Escribir "La recauaci@n total el estaio es e !!"# '/
Fin-lgoritmo
.- Un% $&%'e $!n'"% +e n e'"u+)%n"e' B$!n 1n=0> $%+% un! +e &!' $u/&e' $ur'% = %"er)%'. P%r% $%+% %&un! 'e
)nre'%> $&%e # &%' = $%&)4$%$)!ne'. E'$r)7% un %&!r)"! %r% $%&$ $%&$u& u&%r %r e& r! r!e+)! e+)! en" en"er! er! # un un% % 7%rr% rr% 8!r)! r)!n n"%& "%& +e %'"er)'$!' $!! rere'en"%$);n r/4$% +e& r!e+)!. -lgoritmo Prom-lumnos Prom-lumnos Escribir "Ingrese la cantia e alumnos# ue no su)ere los ;& estuiantes" Leer n i=& '1=& '(=& '2=& '=& ';=& Mientras i<=n Hacer Escribir "Ingrese las ; notas el estuiante" Leer n1# n(# n2# n# n; '1='1+n1 '(='(+n( '2='2+n2 '='+n ';=';+n; i=i+1 FinMientras Prom1=trunc Prom1=trunc '1n, Prom(=trunc Prom(=trunc '(n, Prom2=trunc Prom2=trunc '2n, Prom=trunc Prom=trunc 'n, Prom;=trunc Prom;=trunc ';n, Escribir "El )romeio e la materia 1 fue e"# Prom1 Escribir "El )romeio e la materia ( fue e"# Prom( Escribir "El )romeio e la materia 2 fue e"# Prom2 Escribir "El )romeio e la materia fue e"# Prom Escribir "El )romeio e la materia ; fue e"# Prom; Fin-lgoritmo
F.- C!n'"ru)r un r!r%% ue +e"er)ne &% !"en$)% +e n ')en+! un núer! re%& # n un núer! en"er!. C!n')+ere ue n ue+e 'er !')")!> ne%")! ! $er!. N! u'e n)nún "!+! M%"8. -lgoritmo PotenciaAmn PotenciaAmn Escribir "Ingrese el numero ue esea ele0ar a la )otencia" Leer m Escribir "Ingresa el e3)onente" e3)onente" Leer n i=1 Potencia=1 Mientras i=n Hacer Potencia=1m*Potencia i=i!1 FinMientras
Mientras i<=n Hacer 'i n=& Potencia=1 Fin'i Potencia=Potencia*m i=i+1 FinMientras Escribir "La )otencia es !!"# Potencia Potencia Fin-lgoritmo
11.- Se &%n% un +%+! re)"er%+%' e$e' 8%'"% ue e& %&!r +e& ")r! e' 1. De"er)n%r &% $%n")+%+ +e e$e' ue 'e &%n; e& +%+! # e& un"%9e %$uu&%+!> ') &! ue 'e %$uu&% e' e& %&!r +e& ")r!.
-lgoritmo LanB$ao '/=& cont=& Mientras i<1 Hacer Escribir "Ingrese el número ue salio en el ao" Leer i '/='/+i cont=cont+1 FinMientras
Escribir "La suma e los tiros el ao son"# '/ Escribir "El número e tiros realiBaos es"# cont Fin-lgoritmo
12.- De"er)n%r &% 'u% +e &!' N r)er!' "r)n!' +e &% 'er)e +e )7!n%$$)> # !'"r%r 'u' %&!re' $!n')+er%n+! ue N 'e% %#!r ue 1. L% 'e$uen$)% +e &% 'er)e e' e& ')u)en"e:
0> 1> 1> 2> > => > 1> 21>....................... -lgoritmo N/.rminos Escribir "Ingrese el número e terminos" Leer n '/=& 1=1 (=( i=( Mientras i<=n Hacer /=1+& 2=(+1 1=( (=2 '/='/+2 i=i+1 FinMientras Escribir "La suma e los números e los t.rminos es !!"# '/ Fin-lgoritmo
1.- C!ner")r un núer! en"er! +e 7%'e 10 % un% 7%'e en!r ue 10> !'"r%n+! e& re'u&"%+! en %n"%&&%.
-lgoritmo Entero>ase Escribir "Ingrese el número" Leer n 'N=1 ?ont=& Mientras 'N<& Hacer 'i n Es Multi)lo $e 1& Entonces n=n1& ?ont=cont+1 'ino 'N=& Fin'i N(=n
FinMientras
Escribir "La suma e los t.rminos es !!"# N( Escribir "El número e intentos )ara ba8arle la base e 1& 9an sio !!"# ?ont Fin-lgoritmo
13.- E& D"!. +e Tr/n')"! # Seur)+%+ V)%& +e'e% '%7er +e &!' Hn %u"!' ue en"r%n % &% $)u+%+ +e L)%> $u%n"!' en"r%n $!n $%&$!%n,% +e $%+% $!&!r. C!n!$)en+! e& ú&")! +,)"! +e &%
&%$% +e $%+% %u"!;)& 'e ue+e +e"er)n%r e& $!&!r +e &% $%&$!%n,% u")&)%n+! &% ')u)en"e re&%$);n: -lgoritmo ?olor-uto
Escribir "Ingrese el número e autos ue ingresan a la l a ciua" Leer n i=1 ?ont1=& ?ont(=& ?ont2=& ?ont=& ?ont;=& Mientras i<=n Hacer Escribir "Ingrese el último %gito e la )laca" Leer 'i =1 o =( Entonces ?ont1=?ont1+1 'ino 'i =2 o = ?ont(=?ont(+1 'ino 'i =; o =C ?ont2=?ont2+1 'ino 'i =D o = ?ont=?ont+1 'ino ?ont;=?ont;+1 Fin'i Fin'i Fin'i Fin'i
i=i+1 FinMientras Escribir "El número e autos ue entran con calcomania amarilla son !!"# ?ont1 Escribir "El número e autos ue entran con calcomania rosa son !!"# ?ont( Escribir "El número e autos ue entran con calcomania ro8a son !!"# ?ont2 Escribir "El número e autos ue entran con calcomania 0ere son !!"# ?ont Escribir "El número e autos ue entran con calcomania aBul son !!"# ?ont; Fin-lgoritmo
1=.- En un% ")en+% +e +e'$uen"! &%' er'!n%' ue %n % %%r e& )!r"e +e 'u $!r% &&e%n % &% $%9% # '%$%n un% 7!&)"% +e $!&!r> ue &e' +)r/ ue +e'$uen"! "en+r/n '!7re e& "!"%& +e 'u $!r%. De"er)n%r &% $%n")+%+ ue %%r/ $%+% $&)en"e +e'+e ue &% ")en+% %7re 8%'"% ue $)err%. Se '%7e ue ') &% 7!&)"% e' r!9%> e& $&)en"e !7"en+r/ un 30J +e +e'$uen"!K ') e' %%r)&&% un 2=J # ') e' 7&%n$% n! !7"en+r/ +e'$uen"!. -lgoritmo $esc?om)ra Escribir "Ingrese el número e )ersonas ue fueron a la tiena" Leer n i=1 Mientras i<=n Hacer Escribir "Ingrese el im)orte e com)ra el cliente" Leer I? Escribir "Ingrese la bolita 1, )ara ro8a# (, )ara amarilla 7 2, )ara blanca" Leer ? si ?=1 Entonces I$=I?*& 'ino 'i ?=( I$=I?*&(; 'ino I$=& Fin'i Fin'i IP=I?!I$ Escribir "El im)orte a )agar es !!"# IP i=i+1 FinMientras Fin-lgoritmo
1F.- D%+! un núer!> )ner")r&! # +e"er)n%r ') e' $%)$ú%. Un núer! e' $%)$ú%> ') %& )ner")r&! re'u&"% e& )'! núer!. -lgoritmo ?a)icua Escribir "Ingrese el número" Leer n n1=n Mientras n& Hacer $igito=n Mo 1& n=n!$igito n=n1& r=r*1&+$igito FinMientras Escribir "El número in0ertio es !!"# r si n1=r Entonces Escribir "Es ca)icua" 'ino Escribir "No es ca)icua" Fin'i Fin-lgoritmo
20.- C%&$u&%r e& MCD # e& MCM +e +!' núer!' en"er!' !')")!'. -lgoritmo M?$AM?M Escribir "Ingrese los ( números" Leer n1# n( -=n1 >=n( ?=n1 $=n( Mientras -G=> Hacer 'i -> Entonces -=-!> 'ino >=>!Fin'i FinMientras M?M=n1*n(,Mientras c<$ Hacer 'i ?$ Entonces ?=?!$ 'ino $=$!? Fin'i FinMientras M?M=n1*n(,Escribir "El M?M e los ( números es !!"# M?M Escribir "El M?$ e los ( números es !!"# ? Fin-lgoritmo
2.- L% $!%@,% +e &u HDe& Cen"r! +e'e% )r))r &!' re$)7!' +e un ru! +e e&e%+!'. De'e% !7"ener "%7)n e& "!"%& +e $!7r!' +e& er)!+!. P!r $%+% $&)en"e 'e )nre'% 'u n!7re> +)re$$);n> re)'"r! )n)$)%& # re)'"r! 4n%&. E& $!7r! 'e e(e$"ú% en 7%'e % &% ')u)en"e "%7&%: 130 V ! Men!' L!' ')u)en"e' 1<0 V E5$e'! '!7re 10 V
S.
.20 S. 0.1= !r V S. 0.0F< !r V
P!r $%+% $&)en"e 'e +e7e )r))r un re$)7! )n+)$%n+! 'u' +%"!' # !n"!'. -lgoritmo eciboLuB i=1 Mientras 1<& Hacer Escribir "Ingrese el nombre el cliente" Leer name Escribir "Ingrese el omicilio" Leer irecci@n Escribir "Ingrese el número e JH esaos )or el cliente" Leer num 'i num<1& Entonces M=2( 'ino 'i num1D& M=2+num!1D&,*&1;, 'ino M=(+num!21&,*&&KD, Fin'i Fin'i Escribir "El monto )ara el em)leao " name " e omicilio " irecci@n Escribir "Presiona "Presiona 1, )ara ingresar un em)leao mas o (, )ara salir" Leer o)c 'i o)c=1 Entonces i=1 'ino i=& Fin'i FinMientras Fin-lgoritmo
26.- M!'"r%r &% 'u% +e "!+!' &!' +))'!re' +e un núer! en"er!. S) e& núer! ';&! ")ene !r +))'!re' %& 1 # %& r!)! núer!> !'"r%r %+e/' e& en'%9e HNúer! Pr)!.
-lgoritmo 'umEntero Escribir "Ingrese el número" Leer n i=1 '$=& Mientras i<=n Hacer 'i n mo i=& Entonces '$='$+1 Fin'i i=i+1 FinMientras Escribir "La suma e los i0isores el número es !!"# '$ 'i i='$ Entonces Escribir "El número es )rimo" 'ino Escribir "El número no es )rimo" Fin'i Fin-lgoritmo
2.-Un %"e/")$! +e'$u7r); $!! u&")&)$%r $u%&u)er núer! en"er! !r 11> e+)%n"e &% 'u% +e 'u' +,)"!'. Se% un nuer! en"er! N ue 'e e5re'% $!n M +,)"!'> e& r!+u$"! +e +)$8! núer! !r 11 e'"/ +%+! !r &% ')u)en"e re&%: e& +))"! +e &%' un)+%+e' e' )u%& %& +))"! +e &%' un)+%+e' +e N> e& +))"! +e &%' +e$en%' e' )u%& % &% 'u% +e &!' +,)"!' +e &%' un)+%+e' # +e$en%' +e N> e& +))"! +e &%' $en"en%' e' )u%& % &% 'u% +e &!' +,)"!' +e &%' decenas y centenas de N, y así sucesivamente. Ejemplo 3247 x 11 = 35717
Algoritmo Mult_NumEntero Escribir "Ingrese el número" Leer n M=0 C=0 D=0 M=trunc(N/1000) C=trunc((NM!1000)/100) D=trunc((NM!1000C!100)/10) =trunc((NM!1000C!100D!10)/10) resu11= resu1#=$D resu1%=D$C resu1&=C$M resu1'=M i resul1%* Entonces resu1#=resu1# mo+ 10 resu1#=resu1%$1 si resu1%* Entonces resu1%=resu1% mo+ 10 resu1&=resu1&$1 ,ini ,ini Escribir "Leer el número +e -rrib- .-r- -b-o" Escribir resu1' Escribir resu1& Escribir resu1% Escribir resu1# Escribir resu11 ,inAlgoritmo