Ejemplos resueltos de Principios de Algoritmos c <- 1 #$%a <- 0 MIENTRAS c < 100 HACER #$%a <- #$%a + c c <- c + 1 FINMIENTRAS ESCRIBIR &La #$%a d" 'o# 100 !r(%"ro# !r(%"ro# n)%"ro# "#: & ESCRIBIR #$%a FIN
1. Hacer Hacer un pseu pseudoc docodi odigo go que que impri imprima ma los números del 1 al 100.
PROGRAMA contador1 INICIO c <- 0 ALGORITMO: MIENTRAS c < 101 HACER ESCRIBIR c c <- c + 1 FINMIENTRAS FIN
. Hacer Hacer un pseudo pseudocod codigo igo que que impri imprima ma todo todos s los los núme número ros s natu natura rale les s que que !ay desde la unidad !asta un numero que introducimo imos por teclado.
2. Hacer Hacer un pseu pseudoc docodi odigo go que que impri imprima ma los números del 100 al 0, en orden decreciente.
ALGORITMO contador2 INICIO c <- 100 MIENTRAS c < 0 HACER ESCRIBIR c c <- c - 1 FINMIENTRAS FIN
ALGORITMO nat$ra' INICIO ( <- 0 n <- 0 ESCRIBIR &Introd$c" $n n)%"ro: & LEER n MIENTRAS ( < n HACER ( <- ( + 1 ESCRIBIR ( FINMIENTRAS FIN
3. Hacer Hacer un pseu pseudoc docodi odigo go que que impri imprima ma los números pares entre 0 y 100.
ALGORITMO !ar"# INICIO c <- 2 MIENTRAS c < 101 HACER ESCRIBIR c c <- c + 2 FINMIENTRAS FIN
". Hace acer un pse pseudoc udocod odig igo o que que solo olo nos permita introducir # o $.
ALGORITMO #n INICIO r"# <- & & MIENTRA TRAS r"# <* &S& r"# <* &N& HACER ESCRIBIR &Introd$c" S o N& LEER r"# r"# <- Con,"rt(r%a.)#c$'a#/ r"# FINMIENTRAS FIN
4. Hace Hacerr un progr program ama a que que impr imprim ima a la suma de los 100 primeros números.
ALGORITMO #$%a INICIO
Ejemplos propuestos% &. "t"r%(nar "' ,a'or d" 'a (!ot"n$#a d" $n tr(an3$'o r"ct4n3$'o a!'(cando "' t"or"%a d"
P(t43ora#5 "' !"r6%"tro . "' 4r"a conoc("ndo "' ,a'or d" #$# cat"to#7 '. Con#tr$(r $n a'3or(t%o 8$" ca'c$'" "' %onto 8$" !a3ar4 $n d"t"r%(nado a'$%no "n "' %o%"nto d" 'a %atr(c$'a5 #a9("ndo 8$" d(co a'$%no r"a'(a $na %atr6c$'a !or cr;d(to#5 "' co#to d" cada cr;d(to "# d" S72=7>07 La Cant(dad d" cr;d(to# !or c(c'o "# d"' tota' d" 217 (. En $n #(#t"%a d" n$%"rac(?n (n3'"#a 'a "#tat$ra d" $na !"r#ona "#ta dada !or 'a #$%a d" 'o# !("# . !$'3ada# 8$" t("n"7 A#6 !or "@"%!'o $na !"r#ona !$"d" %"d(r > !("# con
1
!$'3ada#7 Con#tr$(r $n a'3or(t%o 8$" "!r"#" "#t" t(!o d" %"d(da a %"tro#7 S" #a9" 8$": 1 !(" 12 !$'3ada#5 1 !$'3ada 27> c% . 1 %"tro 100 c%7 10. n o#!(ta' a r"c(9(do $na donac(?n "#!"c(a' 8$" #"r4 r"!art(da d" 'a #(3$("nt" %an"ra:
>D !ara M"d(c(na G"n"ra'5 0D !ara Card(o'o36a5 1>D !ara P"d(atr6a . "' r"#to !ara Tra$%ato'o36a7 (#"" $n a'3or(t%o 8$" d"t"r%(n" c$anto r"c(9(r4 cada 4r"a7 Con#tr$(r $n a'3or(t%o 8$" ca'c$'" "' %onto %"n#$a' 8$" ad"$da $n c'("nt" 8$" co%!ra $n "8$(!o d" #on(do a' cr;d(to5 #a9("ndo 8$" "' %onto d" co%!ra r"c(9" $n (ncr"%"nto d"' 1D d" (%!$"#to5 a#6 co%o5 d" >D d" (nt"r;# %"n#$a' !or cada '"tra 8$" racc(ona7 12. Tr"# !"r#ona# d"c(d"n (n,"rt(r #$ d(n"ro !ara $ndar $na "%!r"#a7 Cada $na d" "''a# (n,("rt" $na cant(dad d(#t(nta7 O9t"n"r "' !orc"nta@" 8$" cada 8$("n (n,("rt" con r"#!"cto a 'a cant(dad tota' (n,"rt(da7 13. (#"" $n a'3or(t%o 8$" d"t"r%(n" "' !orc"nta@" d" ,aron"# . d" %$@"r"# 8$" a. "n $n #a'?n d" c'a#"7 14. (#"" $n a'3or(t%o !ara r"!art(r $na cant(dad d" d(n"ro a tr"# !"r#ona# "n or%a !ro!orc(ona' a #$# "dad"#7 E' %onto 8$" '" corr"#!ond" a cada !"r#ona #" ca'c$'a con 'a #(3$("nt" or%$'a: Monto d" 'a !"r#ona "dad d" 'a !"r#ona %onto a r"!art(r S$%a tota' d" "dad"# 1. (#"" $n a'3or(t%o 8$" '"a 'a ca!ac(dad d" $n d(#co d$ro "n 3(3a9.t"# . 'o con,("rta a %"3a9.t"#5 J('o9.t"# . 9.t"#7 1 J('o9.t"# 102 9.t"# 1 %"3a9.t"# 102 J('o9.t"# 1 3(3a9.t"# 102 %"3a9.t"# 1". E' d$"o d" $na "%!r"#a d"#"a !'an((car 'a# d"c(#(on"# (nanc("ra# 8$" to%ara "n "' #(3$("nt" ao7 La %an"ra d" !'an((car'a# d"!"nd" d" 'o #(3$("nt": S( act$a'%"nt" #$ ca!(ta' #" "nc$"ntra con #a'do n"3at(,o5 !"d(r4 $n !r;#ta%o 9ancar(o !ara 8$" #$ n$",o #a'do #"a d" K10 0007 S( #$ ca!(ta' t("n" act$a'%"nt" $n #a'do !o#(t(,o !"d(r4 $n !r;#ta%o 9ancar(o !ara t"n"r $n n$",o #a'do d" K20 0005 !"ro #( #$ ca!(ta' t("n" act$a'%"nt" $n #a'do #$!"r(or a 'o# K20 000 no !"d(r4 n(n3n !r;#ta%o7 Po#t"r(or%"nt" r"!art(r4 #$ !r"#$!$"#to d" 'a #(3$("nt" %an"ra: K> 000 !ara "8$(!o d" co%!$to5 K2 000 !ara %o9('(ar(o . "' r"#to 'a %(tad #"r4 !ara 'a co%!ra d" (n#$%o# . 'a otra !ara otor3ar (nc"nt(,o# a' !"r#ona'7 "#!'"3ar 8$" cant(dad"# #" d"#t(naran !ara 'a co%!ra d" (n#$%o# " (nc"nt(,o# a' !"r#ona' .5 "n ca#o d" 8$" $"ra n"c"#ar(o5 a c$anto a#c"nd"r6a 'a cant(dad 8$" #" !"d(r6a a' 9anco7 11.
1&.
Ca'c$'ar "' co#to d"' #"r,(c(o d" %$dana5 d" ac$"rdo a 'a d(#tanc(a "ntr" "' !$nto d" !art(da . d" ''"3ada7 Para ca'c$'ar "' co#to #" d"9" t"n"r "n c$"nta: S( 'a d(#tanc(a !or cada ,(a@" "# %a.or o (3$a' a > J%5 #" co9rar4 S7 =700 !or J('?%"tro5 d" 'o contrar(o #" co9rar4 "' %onto 94#(co 8$" "# d" S7 2>7007
1'. na a9r(ca !a3a a #$# "%!'"ado# d" ac$"rdo a #$ cond(c(?n5 d" ta' %an"ra 8$" $n
o9r"ro contratado r"c(9" a' %"# S71200700 . $n o9r"ro "#ta9'" S710007007 a#6 %(#%o5 todo# 'o# "%!'"ado# r"c(9"n $n !a3o d" 3rat((cac(?n "n 'o# %"#"# d" $'(o . (c("%9r"7 (ca 3rat((cac(?n ,ar6a d" ac$"rdo a 'o# ao# d" #"r,(c(o# 8$" t("n" "' "%!'"ado5 co%o #" %$"#tra "n "' #(3$("nt" c$adro:
Ao# d" S"r,(c(o# 0a> a 10 11 a %4#
D d" Grat((cac(?n 0 0 100
1(. Ad"%4# todo# 'o# "%!'"ado# r"c(9"n $n d"#c$"nto !or AFP d"' D7 Ca'c$'ar "' #$"'do
d" $n o9r"ro corr"#!ond("nt" a $n %"# d"t"r%(nado
2
20. na "%!r"#a #" "ncar3a d" 'a ,"nta . d(#tr(9$c(?n d" C7 Lo# c'("nt"# !$"d"n
ad8$(r(r 'o# art6c$'o# !or cant(dad7 Lo# !r"c(o# #on:
S7 7>0 #( #" co%!ra a#ta $n(dad"#7 S7 70 #( #" co%!ra "ntr" 10 $n(dad"# . a#ta 7 S7 710 #( #" co%!ra "ntr" 100 . $n(dad"#7 S7 270 !ara %4# d" >007
21. n 9anco r"a'(a "' !a3o d" (nt"r"#"# a #$# c'("nt"# !or $n d"!o#(to a !'ao (@o d"
ac$"rdo a 'a #(3$("nt" (nor%ac(?n: T(!o d" %on"da5 T("%!o d" d"!o#(to . %onto d"!o#(tado7 Lo# (nt"r"#"# #"r4n a!'(cado# #"3n "' #(3$("nt" c$adro: M"#"# So'"# /D ?'ar"# /D 0> 0 0 12 1 %a# = Mo#trar "' (nt"r;# . "' %onto tota' a r"c(9(r7 22. Una tienda de venta de polos ha establecido porcentajes de descuento, indicados a continuación, de acuerdo a las características de la prenda: Tipo de algodón (Simple, Pima), Tipo de prensa (Nio, !oven, "dulto), #etalle de la prenda (Sin estampado, $on estampado)
N(o o,"n Ad$'to T(!o d" a'3od?n 23. 24. 2. 2". 2&. 2'. S C S C S C S(%!'" 2(. 30. 31. 32. 33. 34. > > = P(%a 3. 3". 3&. 3'. 3(. 40. > = > Ca'c$'ar "' (%!ort" a !a3ar !or $na !r"nda7 27 n c'("nt" #o'o !$"d" co%!rar !a#a@"# !ara $na c($dad7 Ca'c$'ar "' tota' 8$" t("n" 8$" !a3ar $n d"t"r%(nado c'("nt"7 27 Ca'c$'ar "' !a3o d" $n o9r"ro 8$" tra9a@a a' d"#ta@o7 E' !a3o 8$" r"c(9" "' o9r"ro !or cada $n(dad !rod$c(da d"!"nd" d" #$ cat"3or6a . d"' t(!o d" !rod$cto 8$" !rod$c"5 co%o #" %$"#tra "n "' #(3$("nt" c$adro: Tar(a /S7 $n(dad Cat"3or6a T"@a# Lo#"ta# A 27>0 2700 B 2700 17>0 C 17>0 1700 2>7 A#6 %(#%o5 "' o9r"ro r"c(9" $na 9on((cac(?n "#!"c(a' d" ac$"rdo a 'a cant(dad 8$" !rod$c": n(dad"# Prod$c(da# Bon((cac(?n /D 1 2>0 0700 2>1 >00 >0700 >01 1000 100700 1001 %a# 1>0700 Ad"%4# d"' tota' d" (n3r"#o# #" d"#c$"nta => !or #"3$ro7 27 "t"r%(nar 'a cant(dad #"%ana' d" d(n"ro 8$" r"c(9(r4 cada $no d" 'o# n o9r"ro# d" $na "%!r"#a7 S" #a9" 8$" c$ando 'a# ora# 8$" tra9a@o $n o9r"ro "c"d"n d" 05 "' r"#to #" con,("rt" "n ora# "tra# 8$" #" !a3an a' do9'" d" $na ora nor%a'5 c$ando
3
no "c"d"n d" Q c$ando 'a# ora# "tra# "c"d"n d" #" !a3an 'a# !r(%"ra# a' do9'" d" 'o 8$" #" !a3a !or $na ora nor%a' . "' r"#to a' tr(!'"7 2=7 S" t("n" $n con@$nto d" 10 tar@"ta# cada $na cont("n" 'a (nor%ac(?n d"' c"n#o !ara $na !"r#ona: S"o5 Edad . E#tado c(,(' /a7- #o't"ro5 97 Ca#ado5 c7 ($do5 d7 (,orc(ado7 (#"" $n !#"$doc?d(3o "#tr$ct$rado 8$" '"a todo# "#to# dato#5 " (%!r(%a "' n%"ro d" c"n#o d" toda# 'a# @?,"n"# #o't"ra# 8$" "#t;n "ntr" 1 . 21 ao#7 27 Hac"r $n a'3or(t%o 8$" '"a N con#$%o# d" $n r"#ta$rant"7 S( "' con#$%o (n3r"#ado "c"d" 'o# =0 #o'"#5 "' d"#c$"nto #"r4 d" >D7 M$"#tr" todo# 'o# !a3o# "co#7 27 na "%!r"#a a'%ac"na 'o# dato# d" N "%!'"ado#5 !ara "#to5 "n $n !roc"#o r"!"t(t(,o #" (n3r"#a "' #"o . "' #a'ar(o d" cada "%!'"ado7 S" !(d" ca'c$'ar: a7 La cant(dad d" !"r#ona# 8$" 3anan %4# d" =00 a' %"#7 97 E' !ro%"d(o d" #a'ar(o#7 c7 E' !orc"nta@" d" %$@"r"# 8$" tra9a@an "n "#a "%!r"#a d7 E' !orc"nta@" d" ,aron"# 8$" tra9a@an "n "#a "%!r"#a
4
