Ejercicios-de-Programacion-en-Java.pdf

Afianza tus conocimientos de programaci ón mediante la resoluci ón de ejercicios

Ejercicios Ejercicio s de d e Programación en Java Condicionales, Condic ionales, Bucles, Tablas y Funciones F.M. F.M. P érez Montes

Esta obra está publicada bajo una licencia: Creative Commons Reconocimiento-No Comercial-Sin Obra Derivada 3.0 España , que le permite copiar, distribuir y comunicar públicamente la obra, siempre y cuando reconozca el crédito del autor, lo haga sin fines comerciales y no altere, transforme o genere una obra derivada a partir de ésta. ispone del te!to legal completo en la siguiente direcci"n: http:##creativecommons.org#licenses#by$nc$nd#%.&#es# '(&)), *rancisco +anuel érez +ontes. -lgunos derechos reservados. Edita Asoc. Por la Innovacin Ed!cativa Ed!innova. Esta obra se encuentra disponile en: http:##.eduinnova.es#monografias(&))#ene(&))#java.pdf Depsito le"al# SE $%$$-%0$$. IS&N# '()-)*-+$*-(,',-(.

Esta obra está publicada bajo una licencia: Creative Commons Reconocimiento-No Comercial-Sin Obra Derivada 3.0 España , que le permite copiar, distribuir y comunicar públicamente la obra, siempre y cuando reconozca el crédito del autor, lo haga sin fines comerciales y no altere, transforme o genere una obra derivada a partir de ésta. ispone del te!to legal completo en la siguiente direcci"n: http:##creativecommons.org#licenses#by$nc$nd#%.&#es# '(&)), *rancisco +anuel érez +ontes. -lgunos derechos reservados. Edita Asoc. Por la Innovacin Ed!cativa Ed!innova. Esta obra se encuentra disponile en: http:##.eduinnova.es#monografias(&))#ene(&))#java.pdf Depsito le"al# SE $%$$-%0$$. IS&N# '()-)*-+$*-(,',-(.

A mi hija Claudia, la solución a todos los problemas.

ARADECIIEN/OS

A todos los que han hecho posible este libro. En especial a mi amigo y compañ ero: Alfonso Jim énez, por sus innumerables correcciones y por la clase Entrada.

NDICE

r"logo ........................... ......................................... .................... ...... ágina

)

/ntroducci"n ........................... ......................................... ............... . ágina ágina

0

1olet2n ) 34ariables y condicionales5 condicionales5 ................. ................. ágina ágina

6

1olet2n ( 37ondicionales y bucles5 .................... ágina %8 1olet2n % 31ucles anidados5 ........................... ........................... ágina 6( 1olet2n 0 39ablas5 ................................ .................................... .... ágina 6 1olet2n 8 39ablas n$dimensionales5 n$dimensionales5 .................... ágina 6 1olet2n 6 3*unciones5 ............................. ................................. .... ágina ))8 -péndice / 31oletines completos5 ...................... ágina )( -péndice // 37lase Entrada5 ........................... ........................... ágina (&6

/

PR12OO El libro Ejercicios de Programación en Java: Condicionales, Bucles, Tablas y Funciones nace como fruto de a;os de docencia en materias relacionadas:

-lgor2tmica, rogramaci"n,

iempre utilizo la metáfora del pianista para e!plicar el tándem programar#lenguaje programar#lenguaje de programaci"n: saber tocar las notas de un piano es relativamente fácil, tan solo debemos anotar en cada una de las teclas a qué nota musical corresponde. Esto ser2a ser2a simila similar r a conoce conocer r un lengua lenguaje je de progra programac maci"n i"n. . Es muy sencillo sencillo utilizar utilizar un

if

o

entender la mecánica de un while. 4olviendo 4olviendo al piano: piano: una vez que

dominamos dominamos la relaci"n relaci"n tecla#n tecla#nota, ota, un pianista pianista debe

aprender muchas otras cosas para que aquello que está tocando suene bien? bien ? esto ser2a saber tocar el piano. ara saber programar, no basta saber c"mo funciona una instrucci"n sino saber Ejercicios de Programación en Java

1

utilizarla conjuntamente con otras, en el orden y la forma adecuadas para que la aplicaci"n que estamos creando suene bien. bien . Esta obra no es un libro para aprender java ni sus numerosas bibliotecas, es un libro que por medio de ejercicios resueltos, desde cero, y con la práctica facilita la asimilaci"n de las técnicas de programaci"n. ara aprender a programar la mejor forma es desvincular la l"gica de la aplicaci"n 3c"mo hacerlo5 del lenguaje utilizado para implementarlo. icho en otras palabras: lo mejor es utilizar seudoc"digo 3un lenguaje te"rico de alto nivel5 donde no tengamos que preocuparnos por las particularidades del lenguaje de programaci"n, ni por la rigidez de su sinta!is. El inconveniente de utilizar seudoc"digo es que el lector no tiene nada tangible, nada con lo que se pueda comprobar el buen funcionamiento de la aplicaci"n? por este motivo se ha decidido utilizar =ava. Esta elecci"n se justifica frente a otras alternativas, como el lenguaje 7, que también es muy didáctico, simplemente por el hecho de que con =ava podemos abstraernos un poco más, al ser un lenguaje de más alto nivel. 9ambién hay que decir que en la medida de lo posible no profundizaremos en las bibliotecas del lenguaje? en otras ocasiones esto será totalmente imposible de llevar a la práctica y hemos de trabajar con los detalles. ara ara finali finalizar zar, , desear desear2a 2a coment comentar ar que el libro libro se estruc estructur tura a como como un conjun conjunto to de boletines de ejercicios que se resuelven de la forma más didáctica posible. @n programador

Ejercicios de Programación en Java

2

e!perto e!perto segurame seguramente nte encontra encontrará rá solucion soluciones es mucho más elegantes elegantes y eficientes eficientes. . -qu2 nuestro nuestro principal objetivo es que el lector entienda qué está haciendo y por qué lo hace. i el lector se enfrenta a la tarea de aprender a programar, este libro, junto con las clases clases que pueda pueda recibi recibir r en una facult facultad, ad, escuel escuela a técnic técnica a o ciclo ciclo format formativo ivo de grado grado superior, serán una ayuda eficaz para llevar a cabo su objetivo. Esta tarea debe tomarse sin prisas, entendiendo los detalles sutiles y dedicando mucho tiempo a la práctica.

>evilla, octubre de (&)& *rancisco +. érez +ontes


3

IN/RODCCI1N

Este libro está compuesto como una colecci"n de boletines de ejercicios 3se encuentran disponibles en el -péndice I5. En cada bolet2n se resuelven ejercicios con una temática común, de la siguiente forma: 1olet2n )...... 4ariables y condicionales 1olet2n (...... 7ondicionales y bucles 1olet2n %...... 1ucles anidados 1olet2n 0...... 9ablas 1olet2n 8...... 9ablas n$dimensionales 1olet2n 6...... *unciones




Atro aspecto importante es la entrada por teclado, algo primordial para poder introducir datos y probar nuestros programas. En un principio el alumno no debe tener los conocimientos necesarios para escribir el c"digo que le proporcione dicha entrada. -lgo similar ocurre en las asignaturas de programaci"n, lo que plantea el problema de empezar a e!plicar c"digo y funciones que se escapan al programador novel. or todo esto, se ha dise;ado la clase Entrada, que permite realizar de forma transparente la entrada por teclado. -prender a utilizarla es sencillo y proporciona una herramienta c"moda y fiable para dejar de preocuparnos por la entrada de datos.
En!rada"en!ero#$

Entrada.real35

Entrada.cadena35

Entrada.caracter35


%

&olet4n $ Variables y condicionales

). edir los coeficientes de una ecuaci"n se (B grado, y muestre sus soluciones reales. >i no e!isten, debe indicarlo. &ac'age bol(1ej(1) &ublic class *ain + &ublic s!a!ic void main#!ring-. args$ + double a,b,c) // coe0icien!es a2bc4( double 1,2,d) // soluciones y de!erminan!e

ys!em"ou!"&rin!ln#56n!rodu7ca &rimer coe0icien!e #a$:5$) a4En!rada"en!ero#$) ys!em"ou!"&rin!ln#56n!rodu7ca segundo coe0icien!e: #b$:5$) b4En!rada"en!ero#$) ys!em"ou!"&rin!ln#56n!rodu7ca !ercer coe0icien!e: #c$:5$) c4En!rada"en!ero#$) // calculamos el de!erminan!e d4##b8b$98a8c$) i0#d($ ys!em"ou!"&rin!ln#5;o eis!en soluciones reales5$) else+ //

=

// si a4( nos encon!ramos una división &or cero" 14#9b*a!>"s"s

? ? ?

(. edir el radio de un c2rculo y calcular su área. -C/Dr(. &ac'age bol(1ej(2) &ublic class *ain + &ublic s!a!ic void main#!ring-. args$ + double a,r) // @rea y radio ys!em"ou!"&rin!#56n!roduce el radio de un circulo: 5$) r4En!rada"real#$)

a4*a!>"P68#r8r$) // &ara elevar al cuadrado o!ra o&ción es: *a!>"&oA #r, 2$ ys!em"ou!"&rin!ln#5El @rea de una circun0erencia de radio 5  r 5 es: 5  a$) ? ?

%. edir el radio de una circunferencia y calcular su longitud. &ac'age bol(1ej(3) &ublic class *ain +




&ublic s!a!ic void main#!ring-. args$ + double l,r) // longi!ud y radio

ys!em"ou!"&rin!#56n!roduce el radio de una circun0erencia: 5$) r4En!rada"real#$)

l428*a!>"P68r) ys!em"ou!"&rin!ln#5a longi!ud de una circun0erencia de radio 5  r 5 es: 5  l$) ?

?

0. edir dos números y decir si son iguales o no. &ac'age bol(1ej() &ublic class *ain + &ublic s!a!ic void main#!ring-. args$ + in! n1,n2) ys!em"ou!"&rin!#56n!roduce un nDmero: 5$) n14En!rada"en!ero#$) ys!em"ou!"&rin!#56n!roduce o!ro nDmero: 5$) n24En!rada"en!ero#$)

i0#n144n2$ ys!em"ou!"&rin!ln#5on iguales5$) else ys!em"ou!"&rin!ln#5;o son iguales5$)

? ?




8. edir un número e indicar si es positivo o negativo. &ac'age bol(1ej(%) &ublic class *ain + &ublic s!a!ic void main#!ring-. args$ + in! num) ys!em"ou!"&rin!#56n!roduce un nDmero: 5$) num4En!rada"en!ero#$)

i0# num  ($ ys!em"ou!"&rin!ln#5;ega!ivo5$) else // su&onemos
? ?

6. edir dos números y decir si uno es múltiplo del otro. &ac'age bol(1ej(=) &ublic class *ain + &ublic s!a!ic void main#!ring-. args$ + in! n1,n2)

ys!em"ou!"&rin!#56n!roduce un nDmero: 5$) n14En!rada"en!ero#$)

ys!em"ou!"&rin!#56n!roduce o!ro nDmero: 5$) n24En!rada"en!ero#$)




i0#n1Gn244($ ys!em"ou!"&rin!ln#5on mDl!i&los5$) else ys!em"ou!"&rin!ln#5;o son mDl!i&los5$)

? ?

F. edir dos números y decir cual es el mayor. &ac'age bol(1ej() &ublic class *ain + &ublic s!a!ic void main#!ring-. args$ + in! n1,n2) ys!em"ou!"&rin!#56n!roduce un nDmero: 5$) n14En!rada"en!ero#$) ys!em"ou!"&rin!#56n!roduce o!ro nDmero: 5$) n24En!rada"en!ero#$)

// si ambos nDmeros son iguales dirHa
? ?


1(

G. edir dos números y decir cual es el mayor o si son iguales. &ac'age bol(1ej() &ublic class *ain + &ublic s!a!ic void main#!ring-. args$ + in! n1,n2) ys!em"ou!"&rin!#56n!roduce un nDmero: 5$) n14En!rada"en!ero#$) ys!em"ou!"&rin!#56n!roduce o!ro nDmero: 5$) n24En!rada"en!ero#$)

i0#n144n2$ ys!em"ou!"&rin!ln#5on iguales5$) else + i0#n1In2$ ys!em"ou!"&rin!ln#n1  5 es mayor
? ?

. edir dos números y mostrarlos ordenados de mayor a menor. &ac'age bol(1ej() &ublic class *ain + &ublic s!a!ic void main#!ring-. args$ + in! n1,n2)


11

ys!em"ou!"&rin!#56n!roduce un nDmero: 5$) n14En!rada"en!ero#$) ys!em"ou!"&rin!#56n!roduce o!ro nDmero: 5$) n24En!rada"en!ero#$)

i0#n1In2$ ys!em"ou!"&rin!ln#n1  5 y 5  n2$) else ys!em"ou!"&rin!ln#n2  5 y 5  n1$)

? ?

)&. edir tres números y mostrarlos ordenados de mayor a menor. &ac'age bol(1ej1() &ublic class *ain + &ublic s!a!ic void main#!ring-. args$ + in! a,b,c)

ys!em"ou!"&rin!#56n!rodu7ca &rimer nDmero: 5$) a4En!rada"en!ero#$) ys!em"ou!"&rin!#56n!rodu7ca segundo nDmero: 5$) b4En!rada"en!ero#$) ys!em"ou!"&rin!#56n!rodu7ca !ercer nDmero: 5$) c4En!rada"en!ero#$) i0#aIb  bIc$ ys!em"ou!"&rin!ln# a5, 5b5, 5c$) else+ i0#aIc  cIb$ ys!em"ou!"&rin!ln#a5, 5c5, 5b$)


12

else+ i0#bIa  aIc$ ys!em"ou!"&rin!ln#b5, 5a5, 5c$) else+ i0#bIc  cIa$ ys!em"ou!"&rin!ln#b5, 5c5, 5a$) else+ i0#cIa  aIb$ ys!em"ou!"&rin!ln#c5, 5a5, 5b$) else+ i0#cIb  bIa$ ys!em"ou!"&rin!ln#c5, 5b5, 5a$) ? ? ? ?

? ? ?

)). edir un número entre & y . y decir cuantas cifras tiene. &ac'age bol(1ej11) &ublic class *ain + &ublic s!a!ic void main#!ring-. args$ + in! num)

ys!em"ou!"&rin!#56n!rodu7ca un nDmero en!re ( y ": 5$) num4En!rada"en!ero#$) i0#num1($ ys!em"ou!"&rin!ln#5!iene 1 ci0ra5$)


13

else+ i0#num1(($ ys!em"ou!"&rin!ln#5!iene 2 ci0ras5$) else+ i0#num1((($ ys!em"ou!"&rin!ln#5!iene 3 ci0ras5$) else+ i0#num1(((($ ys!em"ou!"&rin!ln#5!iene  ci0ras5$) else+ i0#num1((((($ ys!em"ou!"&rin!ln#5!iene % ci0ras5$) ? ? ? ?

? ?

)(. edir un número entre & y . y mostrarlo con las cifras al revés. &ac'age bol(1ej12) &ublic class *ain + &ublic s!a!ic void main#!ring-. args$ + in! num) in! dm, um, c, d, u) //   "    a cada guarismo lo llamaremos: //dm um c d u: dm #decenas de millar$, um:#unidades de millar$ // c: #cen!enas$, d: #decenas$, u: #unidades$


1

ys!em"ou!"&rin!#56n!rodu7ca un nDmero en!re ( y ": 5$) num4En!rada"en!ero#$)

// unidad u 4 num G 1() num 4 num / 1() // decenas d 4 num G 1() num 4 num / 1() // cen!enas c 4 num G 1() num 4 num / 1() // unidades de millar um 4 num G 1() num 4 num / 1() // decenas de millar dm 4 num) // lo im&rimimos al revKs: ys!em"ou!"&rin!ln #u  5 5  d  5 5  c  5 5  um  5 5  dm$) // o!ra 0orma de >acerlo es num 4 1((((8u  1(((8d  1((8c  1(8um  dm) ys!em"ou!"&rin!ln #num$) ? ?

)%. edir un número entre & y ., decir si es capicúa. &ac'age bol(1ej13)


1%

&ublic class *ain + &ublic s!a!ic void main#!ring-. args$ + in! num) in! dm, um, c, d, u) //   "    a cada guarismo lo llamaremos: //dm um c d u: dm #decenas de millar$, um:#unidades de millar$ // c: #cen!enas$, d: #decenas$, u: #unidades$

ys!em"ou!"&rin!#56n!rodu7ca un nDmero en!re ( y ": 5$) num4En!rada"en!ero#$) // unidad u 4 num G 1() num 4 num / 1() // decenas d 4 num G 1() num 4 num / 1() // cen!enas c 4 num G 1() num 4 num / 1() // unidades de millar um 4 num G 1() num 4 num / 1() // decenas de millar dm 4 num) // el nDmero ser@ ca&icDa si las ci0ras son iguales dos a dos &or los e!remos // las cen!enas no las !enemos en cuen!a


1=

i0 #dm 44 u  um 44 d$ ys!em"ou!"&rin!ln #5el nDmero es ca&icDa5$) else ys!em"ou!"&rin!ln #5el nDmero ;L es ca&icDa5$)

// >ay
pacHage bol&)ej)%? public class +ain I public static void main3>tringJK args5 I int num? int dm, um, c, d, u? boolean capicua C false? ## suponemos que el número no es capicúa? ##   .    a cada guarismo lo llamaremos: ##dm um c d u: dm 3decenas de millar5, um:3unidades de millar5 ## c: 3centenas5, d: 3decenas5, u: 3unidades5 ## En esta versi"n haremos que el número )() " el %% sea visto como capicúa. ##
>ystem.out.print3L/ntroduzca un número entre & y .: L5? numCEntrada.entero35? ## unidad u C num M )&? num C num # )&?


1

## decenas d C num M )&? num C num # )&? ## centenas c C num M )&? num C num # )&? ## unidades de millar um C num M )&? num C num # )&? ## decenas de millar dm C num? ##si el número tiene 8 cifras 3dm, um, c, d, u5 if 3dm CC u NN um CC d5 capicua C true? ##si el número tiene 0 cifras 3&, um, c, d, u5 if 3dm CC & NN um CC u NN c CC d5 capicua C true? ##si el número tiene % cifras 3&, &, c, d, u5 if 3dm CC & NN umCC& NN c CC u5 capicua C true? ##si el número tiene ( cifras 3&, &, &, d, u5 if 3dm CC & NN um CC & NN c CC & NN d CC u5 capicua C true? ## se entiende que un número de una cifra no es capicúa if 3capicua5 >ystem.out.println 3Lel número es capicúaL5?


1

else >ystem.out.println 3Lel número OA es capicúaL5? P

P

)0. edir una nota de & a )& y mostrarla de la forma: /nsuficiente, >uficiente, 1ien... &ac'age bol(1ej1) &ublic class *ain + &ublic s!a!ic void main#!ring-. args$ + in! no!a)

ys!em"ou!"&rin!#56n!rodu7ca una no!a: 5$) no!a4En!rada"en!ero#$) // !an!o los i0Os como los elseOs encierran a una sola ins!rucción // y no es necesario u!ili7ar llaves + ?

i0#no!aI4(  no!a%$ ys!em"ou!"&rin!ln#56;F6C6E;TE5$) else i0#no!a44%$ ys!em"ou!"&rin!ln#5F6C6E;TE5$) else i0#no!a44=$ ys!em"ou!"&rin!ln#5B6E;5$) else i0#no!a44 QQ no!a44$ ys!em"ou!"&rin!ln#5;LTRBE5$) else


1

i0#no!a44 QQ no!a441( $ ys!em"ou!"&rin!ln#5LBSER6E;TE5$)

? ?

&ac'age bol(1ej1b) &ublic class *ain + &ublic s!a!ic void main#!ring-. args$ + in! no!a)

ys!em"ou!"&rin!#56n!rodu7ca una no!a: 5$) no!a4En!rada"en!ero#$) sAi!c>#no!a$+ case (: case 1: case 2: case 3: case : ys!em"ou!"&rin!ln#56;F6C6E;TE5$) brea') case %: ys!em"ou!"&rin!ln#5F6C6E;TE5$) brea') case =: ys!em"ou!"&rin!ln#5B6E;5$) brea') case : case : ys!em"ou!"&rin!ln#5;LTRBE5$) brea') case :


2(

case 1(: ys!em"ou!"&rin!ln#5LBSER6E;TE5$) brea') de0aul!: ys!em"ou!"&rin!ln#5ESSLS5$) brea')

? ? ?

)8. edir el d2a, mes y a;o de una fecha e indicar si la fecha es correcta. >uponiendo todos los meses de %& d2as. &ac'age bol(1ej1%) &ublic class *ain + &ublic s!a!ic void main#!ring-. args$ + in! dia,mes,aNo) // // // //

&ara a sea correc!a se !iene
ys!em"ou!"&rin!#56n!rodu7ca dHa: 5$) dia4En!rada"en!ero#$) ys!em"ou!"&rin!#56n!rodu7ca mes: 5$) mes4En!rada"en!ero#$) ys!em"ou!"&rin!#56n!rodu7ca aNo: 5$) aNo4En!rada"en!ero#$) i0 #dia I4 1  dia 43($ i0 #mes I4 1  mes 4 12$


21

i0 #aNo 4 ($ ys!em"ou!"&rin!ln #5Fec>a correc!a5$) else ys!em"ou!"&rin!ln #5RNo incorrec!o5$) else ys!em"ou!"&rin!ln#5*es incorrec!o5$) else ys!em"ou!"&rin!ln#5UHa incorrec!o5$)

? ?

)6. edir el d2a, mes y a;o de una fecha e indicar si la fecha es correcta. 7on meses de (G, %& y %) d2as. >in a;os bisiestos. &ac'age bol(1ej1=) &ublic class *ain + &ublic s!a!ic void main#!ring-. args$ + in! dia,mes,aNo)

ys!em"ou!"&rin!#56n!rodu7ca dHa: 5$) dia4En!rada"en!ero#$) ys!em"ou!"&rin!#56n!rodu7ca mes: 5$) mes4En!rada"en!ero#$) ys!em"ou!"&rin!#56n!rodu7ca aNo: 5$) aNo4En!rada"en!ero#$) // el Dnico aNo a incorrec!a5$) else+ i0#mes442  #diaI41  dia42$$


22

ys!em"ou!"&rin!ln#dia  5/5  mes  5/5  aNo5: Fec>a correc!a5$) else+ i0##mes44 QQ mes44= QQ mes44 QQ mes4411$  #diaI41  dia43($$ ys!em"ou!"&rin!ln#dia  5/5  mes  5/5  aNo5: Fec>a correc!a5$) else+ i0# #mes441 QQ mes443 QQ mes44% QQ mes44 QQ mes44 QQ mes441( QQ mes4412$  #diaI41  dia431$$ ys!em"ou!"&rin!ln#dia  5/5  mes  5/5  aNo5: Fec>a correc!a5$) else ys!em"ou!"&rin!ln#5Fec>a incorrec!a5$)

? ? ? ? ?

&ac'age bol(1ej1=) &ublic class *ain + &ublic s!a!ic void main#!ring-. args$ + in! dia,mes,aNo) in! diasVdelVmes) boolean 0ec>aVcorrec!a4!rue)

ys!em"ou!"&rin!#56n!rodu7ca dHa: 5$) dia4En!rada"en!ero#$) ys!em"ou!"&rin!#56n!rodu7ca mes: 5$) mes4En!rada"en!ero#$) ys!em"ou!"&rin!#56n!rodu7ca aNo: 5$) aNo4En!rada"en!ero#$)


23

diasVdelVmes 4 () // si se u!ili7a un mes 0uera del rango 1""12 // su&ondremos aVcorrec!a 4 0alse) i0 #dia1 QQ dia I31$ // un dHa 0uera del rango 1""31 no !iene sen!ido 0ec>aVcorrec!a 4 0alse) i0 #mes1 QQ mes I12$ // un mes 0uera del rango 1""12 no !iene sen!ido 0ec>aVcorrec!a 4 0alse) i0#mes442 $ diasVdelVmes 4 2) i0#mes44 QQ mes44= QQ mes44 QQ mes4411$ diasVdelVmes 4 3() i0#mes441 QQ mes443 QQ mes44% QQ mes44 QQ mes44 QQ mes441( QQ mes4412$ diasVdelVmes 4 31) i0 #dia I diasVdelVmes$ 0ec>aVcorrec!a 4 0alse) i0 #0ec>aVcorrec!a$ ys!em"ou!"&rin!ln#dia  5/5  mes  5/5  aNo5: Fec>a correc!a5$) else ys!em"ou!"&rin!ln#5Fec>a incorrec!a5$)

? ?

)F. edir el d2a, mes y a;o de una fecha correcta y mostrar la fecha del d2a siguiente. suponer que todos los meses tienen %& d2as. &ac'age bol(1ej1) &ublic class *ain +


2

&ublic s!a!ic void main#!ring-. args$ + in! dia,mes,aNo)

ys!em"ou!"&rin!#56n!rodu7ca dHa: 5$) dia4En!rada"en!ero#$) ys!em"ou!"&rin!#56n!rodu7ca mes: 5$) mes4En!rada"en!ero#$) ys!em"ou!"&rin!#56n!rodu7ca aNo: 5$) aNo4En!rada"en!ero#$) // su&onemos a in!roducida es correc!a // incremen!amos el dHa dia ) // si el dHa su&era 3(, lo reiniciamos a 1 e incremen!amos el mes i0 #dia I4 3($ + dia 4 1) mes ) // si el mes su&era 12, lo reiniciamos a 1 e incremen!amos el aNo i0 #mes I4 12$ + mes 4 1) aNo ) ? ? // >abrHa

2%

ys!em"ou!"&rin!ln #dia  5/5 mes  5/5  aNo$) ? ?

)G. Qdem que el ej. )F, suponiendo que cada mes tiene un número distinto de d2as 3suponer que febrero tiene siempre (G d2as5. &ac'age bol(1ej1) &ublic class *ain + &ublic s!a!ic void main#!ring-. args$ + in! dia,mes,aNo) in! diasVdelVmes4() // guardaremos el nDmero de dHas
ys!em"ou!"&rin!#56n!rodu7ca dHa: 5$) dia4En!rada"en!ero#$) ys!em"ou!"&rin!#56n!rodu7ca mes: 5$) mes4En!rada"en!ero#$) ys!em"ou!"&rin!#56n!rodu7ca aNo: 5$) aNo4En!rada"en!ero#$) // su&onemos a in!roducida es correc!a i0#mes442 $ diasVdelVmes 4 2) i0#mes44 QQ mes44= QQ mes44 QQ mes4411$ diasVdelVmes 4 3() i0#mes441 QQ mes443 QQ mes44% QQ mes44 QQ mes44 QQ mes441( QQ mes4412$ diasVdelVmes 4 31) // incremen!amos el dHa dia )


2=

// si el dHa su&era el nDmero de dHas del mes, // lo reiniciamos a 1 e incremen!amos el mes i0 #dia I4 diasVdelVmes$ + dia 4 1) mes ) // si el mes su&era 12, lo reiniciamos a 1 e incremen!amos el aNo i0 #mes I4 12$ + mes 4 1) aNo ) ? ? // >abrHa
). edir dos fechas y mostrar el número de d2as que hay de diferencia. >uponiendo todos los meses de %& d2as. &ac'age bol(1ej1) &ublic class *ain +


2

&ublic s!a!ic void main#!ring-. args$ + in! dia1,mes1,aNo1) in! dia2,mes2,aNo2) in! !o!alVdias) ys!em"ou!"&rin!ln #5Fec>a 1:5$) ys!em"ou!"&rin!#56n!rodu7ca dHa: 5$) dia14En!rada"en!ero#$) ys!em"ou!"&rin!#56n!rodu7ca mes: 5$) mes14En!rada"en!ero#$) ys!em"ou!"&rin!#56n!rodu7ca aNo: 5$) aNo14En!rada"en!ero#$)

ys!em"ou!"&rin!ln #5Fec>a 2:5$) ys!em"ou!"&rin!#56n!rodu7ca dHa: 5$) dia24En!rada"en!ero#$) ys!em"ou!"&rin!#56n!rodu7ca mes: 5$) mes24En!rada"en!ero#$) ys!em"ou!"&rin!#56n!rodu7ca aNo: 5$) aNo24En!rada"en!ero#$)

// su&onemos a in!roducidas son correc!as // conver!imos las dos 0ec>as a dHas y calculamos la di0erencia !o!alVdias 4 dia29dia1  3(8#mes29mes1$3=%8#aNo29aNo1$) ys!em"ou!"&rin!ln #5UHas de di0erencia: 5  !o!alVdias$) ? ?

(&. edir una hora de la forma hora, minutos y segundos, y mostrar la hora en el segundo siguiente. &ac'age bol(1ej2()


2

&ublic class *ain + &ublic s!a!ic void main#!ring-. args$ + in! >,m,s) // >ora, minu!os y segundos ys!em"ou!"&rin!#56n!rodu7ca >ora: 5$) >4En!rada"en!ero#$) ys!em"ou!"&rin!#56n!rodu7ca minu!os: 5$) m4En!rada"en!ero#$) ys!em"ou!"&rin!#56n!rodu7ca segundos: 5$) s4En!rada"en!ero#$)

// su&onemos ora in!roducida es correc!a // incremen!amos los segundos s ) // si los segundos su&eran %, los reiniciamos a ( e incremen!amos los minu!os i0 #s I4 =($ + s 4 () m ) // si los minu!os su&eran %, los reiniciamos a ( e incremen!amos la >ora i0 #m I4 =($ + m 4 () > ) // si la >ora su&era 23, la reiniciamos a ( i0 #>I42$ >4() ?

? ys!em"ou!"&rin!ln #5Fec>a: 5 >  5:5 m  5:5  s$) ? ?


2

(). edir una nota numérica entera entre & y )&, y mostrar dicha nota de la forma: cero, uno, dos, tres... &ac'age bol(1ej21) &ublic class *ain +

&ublic s!a!ic void main#!ring-. args$ + in! num) ys!em"ou!"&rin!#56n!rodu7ca una no!a numKrica en!re ( y 1(: 5$) num4En!rada"en!ero#$) sAi!c>#num$+ case (: ys!em"ou!"&rin!ln#5CESL5$) brea')

case 1: ys!em"ou!"&rin!ln#5;L5$) brea')

case 2: ys!em"ou!"&rin!ln#5UL5$) brea')

case 3: ys!em"ou!"&rin!ln#5TSE5$) brea')

case : ys!em"ou!"&rin!ln#5CRTSL5$) brea')

case %: ys!em"ou!"&rin!ln#5C6;CL5$) brea')


3(

case =: ys!em"ou!"&rin!ln#5E65$) brea')

case : ys!em"ou!"&rin!ln#56ETE5$) brea')

case : ys!em"ou!"&rin!ln#5LCWL5$) brea')

case : ys!em"ou!"&rin!ln#5;EXE5$) brea')

case 1(: ys!em"ou!"&rin!ln#5U6EY5$) brea') ? ?

?

((. edir un número de & a  y mostrarlo escrito. or ejemplo, para 86 mostrar: cincuenta y seis. &ac'age bol(1ej22) &ublic class *ain + &ublic s!a!ic void main#!ring-. args$ + in! num) in! unidades, decenas) // es!a versión muesr!a 11 como die7 y uno" // es una 0orma de >acerlo bas!an!e burda"


31

// se &uede &oner algunos condicionales &ara los nDmeros es&eciales: 11,12,""" // y o!ro condicional &ara mos!rar 5y5

ys!em"ou!"&rin!#56n!rodu7ca un nDmero #( a $: 5$) num4En!rada"en!ero#$) unidades 4 num G 1() decenas 4 num / 1()

sAi!c>#decenas$+ case (: ys!em"ou!"&rin!#55$) brea')

case 1: ys!em"ou!"&rin!#5die75$) brea')

case 2: ys!em"ou!"&rin!#5vein!e5$) brea')

case 3: ys!em"ou!"&rin!#5!rein!a5$) brea')

case : ys!em"ou!"&rin!#5cuaren!a5$) brea')

case %: ys!em"ou!"&rin!#5cincuen!a5$) brea')

case =: ys!em"ou!"&rin!#5sesen!a5$)


32

brea')

case : ys!em"ou!"&rin!#5se!en!a5$) brea')

case : ys!em"ou!"&rin!#5oc>en!a5$) brea')

case : ys!em"ou!"&rin!#5noven!a5$) brea') ? ys!em"ou!"&rin! #5 y 5$)

sAi!c>#unidades$+ case (: ys!em"ou!"&rin!ln#55$) brea')

case 1: ys!em"ou!"&rin!ln#5uno5$) brea')

case 2: ys!em"ou!"&rin!ln#5dos5$) brea')

case 3: ys!em"ou!"&rin!ln#5!res5$) brea')

case : ys!em"ou!"&rin!ln#5cua!ro5$)


33

brea')

case %: ys!em"ou!"&rin!ln#5cinco5$) brea')

case =: ys!em"ou!"&rin!ln#5seis5$) brea')

case : ys!em"ou!"&rin!ln#5sie!e5$) brea')

case : ys!em"ou!"&rin!ln#5oc>o5$) brea')

case : ys!em"ou!"&rin!ln#5nueva5$) brea') ? ?

?


3

&olet4n % Condicionales y bucles ).

A>ile#numI4($+ // re&e!imos el &roceso mien!ras el nDmero leHdo no sea nega!ivo cuadrado4num8num) ys!em"ou!"&rin!ln#num 5Z es igual a 5 cuadrado$) ys!em"ou!"&rin!#56n!rodu7ca o!ro nDmero: 5$) num4En!rada"en!ero#$) // volvemos a leer num ?

? ?


3%

(.

&ublic s!a!ic void main#!ring-. args$ + in! num) ys!em"ou!"&rin!#56n!rodu7ca un nDmero: 5$) num4En!rada"en!ero#$) A>ile#num4($ // mien!ras num sea dis!in!o de ( + i0#numI($ // mayor

// re&e!imos el &roceso y volvemos a leer num ys!em"ou!"&rin!#56n!rodu7ca o!ro nDmero: 5$) num4En!rada"en!ero#$)

? // al salir del mien!ras !enemos la cer!e7a
%.

3=

&ublic class *ain +

&ublic s!a!ic void main#!ring-. args$ + in! num) ys!em"ou!"&rin!#56n!rodu7ca un nDmero: 5$) num4En!rada"en!ero#$) A>ile#num4($ // mien!ras num sea dis!in!o de ( + i0#numG2 44 ($ // si el res!o de dividir en!re dos es cero: es!o indica

// re&e!imos el &roceso y volvemos a leer num ys!em"ou!"&rin!#56n!rodu7ca o!ro nDmero: 5$) num4En!rada"en!ero#$)

? // al salir del mien!ras !enemos la cer!e7a
0. edir números hasta que se teclee uno negativo, y mostrar cuántos números se han introducido. &ac'age bol(2ej() &ublic class *ain + &ublic s!a!ic void main#!ring-. args$ + in! num, con!ador)


3

// num guardar@ los nDmeros in!roducidos // y con!ador se incremen!ar@ &ara llevar la cuen!a de los nDmeros in!roducidos ys!em"ou!"&rin!#56n!rodu7ca un nDmero: 5$) num4En!rada"en!ero#$)

con!ador4()

// al comien7o el nDmero de nDmeros in!roducidos es (

A>ile#numI($ // mien!ras num sea &osi!iva + con!ador 4con!ador1) // con!ador !oma el valor
?

ys!em"ou!"&rin!ln#5e >an in!roducido: 5 con!ador  5 nDmeros5$) // sin !ener en cuen!a el Dl!imo nDmero nega!ivo" ? ?

8. Realizar un juego para adivinar un número. ara ello pedir un número O, y luego ir pidiendo números indicando SmayorT o SmenorT según sea mayor o menor con respecto a O. El proceso termina cuando el usuario acierta. &ac'age bol(2ej(%) &ublic class *ain + &ublic s!a!ic void main#!ring-. args$ + in! n, num)


3

// n es el nDmero ay
ys!em"ou!"&rin!#56n!roduce nDmero: 5$) num4En!rada"en!ero#$)

A>ile#num4n$ // mien!ras no coincidan ambos nDmeros + i0#numIn$ ys!em"ou!"&rin!ln#5menor5$) else ys!em"ou!"&rin!ln#5mayor5$) ys!em"ou!"&rin!#56n!roduce nDmero: 5$) num4En!rada"en!ero#$)

?

// al salir del mien!ras !enemos la cer!e7a ay

3

n4#in!$#*a!>"random#$81(($1) // en lugar de &edir n""" &odemos >acer

ys!em"ou!"&rin!#56n!roduce nDmero: 5$) num4En!rada"en!ero#$)

A>ile#num4n$ // mien!ras no coincidan ambos nDmeros + i0#numIn$ ys!em"ou!"&rin!ln#5menor5$) else ys!em"ou!"&rin!ln#5mayor5$) ys!em"ou!"&rin!#56n!roduce nDmero: 5$) num4En!rada"en!ero#$)

?

// al salir del mien!ras !enemos la cer!e7a
6. edir números hasta que se teclee un &, mostrar la suma de todos los números introducidos. &ac'age bol(2ej(=) &ublic class *ain + &ublic s!a!ic void main#!ring-. args$ +


(

in! num,suma) suma4()

do + ys!em"ou!"&rin!#56n!rodu7ca un nDmero: 5$) num4En!rada"en!ero#$)

suma4sumanum) ?

A>ile#num4($) ys!em"ou!"&rin!ln#5a suma de !odos los nDmeros es: 5suma$) ?

?

F. edir números hasta que se introduzca uno negativo, y calcular la media. &ac'age bol(2ej() &ublic class *ain + &ublic s!a!ic void main#!ring-. args$ + in! num, suma, elemen!os) 0loa! media) // la media &uede !ener decimales // num: guardar@ los nDmeros in!roducidos &or el usuario // suma: almacenar@ la suma de !odos los nDmeros in!roducidos // elemen!os: ser@ un con!ador

1

ys!em"ou!"&rin!#56n!rodu7ca un nDmero: 5$) num4En!rada"en!ero#$)

suma4 () elemen!os4 ()

A>ile#numI4($ // nos in!eresan los &osi!ivos y el cero + suma4num) elemen!os)

ys!em"ou!"&rin!#56n!rodu7ca o!ro nDmero: 5$) num4En!rada"en!ero#$) ? i0 #elemen!os 44 ($ // darHa un error de división &or cero ys!em"ou!"&rin!ln#56m&osible >acer la media5$) else + media4 #0loa!$suma/elemen!os) ys!em"ou!"&rin!ln#5a media es de: 5  media$) ?

? ?

G. edir un número O, y mostrar todos los números del del ) al O. &ac'age bol(2ej() &ublic class *ain + &ublic s!a!ic void main#!ring-. args$ +


2

in! i,num) ys!em"ou!"&rin!#56n!roduce un nDmero: 5$) num4En!rada"en!ero#$)

i41) // i es el con!ador

A>ile#i4num$+ ys!em"ou!"&rin!ln#i$) i) ? ?

?

. Escribir todos los los números números del )&& al & de F en F. &ac'age bol(2ej() &ublic class *ain + &ublic s!a!ic void main#!ring-. args$ + // iniciali7amos la i a 1(( // mien!ras la i sea mayor o igual a ( // y en cada vuel!a del 0or la i se decremen!a en  0or #in! i41(()iI4()i94$ ys!em"ou!"&rin!ln#i$)

// el 0or al llevar una sola ins!rucción en su cuer&o de ejecución // no &recisa de llaves + ? ? ?


3

)&. edir )8 números y escribir la suma total. total. &ac'age bol(2ej1() &ublic class *ain + &ublic s!a!ic void main#!ring-. args$ + in! num,sumaV!o!al)

sumaV!o!al4()

0or #in! i41)i41%)i$ + ys!em"ou!"&rin!#56n!rodu7ca nDmero: 5$) num4En!rada"en!ero#$)

sumaV!o!al4sumaV!o!alnum) ? ys!em"ou!"&rin!ln#5a suma !o!al es de: 5sumaV!o!al$) ?

?

)). ise;ar un programa que muestre el producto de los )& primeros números impares. &ac'age bol(2ej11) &ublic class *ain + &ublic s!a!ic void main#!ring-. args$ + long &roduc!o41) // &roduc!o guardar@ la mul!i&licación de los 1( &rimeros nDmeros im&ares" // es muy im&or!an!e acordarse de iniciali7arlo a 1" Ma acemos a (,




el &roduc!o siem&re valdr@ (" // &ara calcular los 1( &rimeros nDmeros im&ares u!ili7amos un 0or

? ys!em"ou!"&rin!ln#5a mul!i&licación de los 1( &rimeros im&ares: 5  &roduc!o$) ? ?

)(. edir un número y calcular su factorial. factorial. &ac'age bol(2ej12) &ublic class *ain + &ublic s!a!ic void main#!ring-. args$ + // long 0ac!orial) con long se &uede calcular >as!a el 0ac!orial de 2% double 0ac!orial) in! num)

ys!em"ou!"&rin!#56n!roduce un nDmero: 5$) num4En!rada"en!ero#$)


%

0ac!orial41) // es im&or!an!e iniciali7arlo a 1, ya

? ys!em"ou!"&rin!ln#5El 0ac!orial de 5  num  5 es: 5  0ac!orial$) ? ?

)%. edir )& números. +ostrar la media de los números positivos, la media de los números negativos y la cantidad de ceros. &ac'age bol(2ej13) &ublic class *ain + &ublic s!a!ic void main#!ring-. args$ + in! num) in! con!Vceros) // el con!ador de ceros in! con!V&os) // con!ador de &osi!ivos in! con!Vneg) // con!ador de nega!ivos in! sumaV&os,sumaVneg) // suma de los nDmeros &osi!ivos y nega!ivos 0loa! mediaV&os,mediaVneg) // las medias &osi!ivas y nega!iva &ueden !ener decimales


=

con!Vceros4() con!V&os4() con!Vneg4()

sumaV&os4() sumaVneg4()

0or #in! i41)i41()i$ + ys!em"ou!"&rin!#56n!roduce nDmero: 5$) num4En!rada"en!ero#$)

i0#num44($ con!Vceros) else + i0#numI($ + con!V&os) sumaV&os4num) ? else + con!Vneg) sumaVneg4num) ? ?

?

// !ra!amos los ceros ys!em"ou!"&rin!ln#5El nDmero de ceros in!roducidos es de: 5con!Vceros$) //Tra!amos los &osi!ivos i0 #con!V&os 44($ ys!em"ou!"&rin!ln#5;o se &uede >acer la media de los &osi!ivos5$)




else + mediaV&os4 #0loa!$sumaV&os/con!V&os) ys!em"ou!"&rin!ln#5*edia de los &osi!ivos: 5 mediaV&os$) ? // !ra!amos los nega!ivos i0 #con!V&os 44($ ys!em"ou!"&rin!ln#5;o se &uede >acer la media de los nega!ivos5$) else + mediaVneg4 #0loa!$sumaVneg/con!Vneg) ys!em"ou!"&rin!ln#5*edia de los nega!ivos: 5 mediaVneg$) ?

? ?

)0. edir )& sueldos. +ostrar su suma y cuantos hay mayores de )&&&U. &ac'age bol(2ej1) &ublic class *ain +

&ublic s!a!ic void main#!ring-. args$ + in! sueldo,suma,mayorV1((() suma4() mayorV1(((4() 0or #in! i41)i1()i$ + ys!em"ou!"&rin!#5Escribe un sueldo: 5$) sueldo 4En!rada"en!ero#$) i0#sueldoI1((($ mayorV1((()




suma4sumasueldo) ? ys!em"ou!"&rin!ln#5*ayores de 1((( >ay: 5mayorV1((($) ys!em"ou!"&rin!ln#5la suma es de: 5suma$) ?

?

)8. adas las edades y alturas de 8 alumnos, mostrar la edad y la estatura media, la cantidad de alumnos mayores de )G a;os, y la cantidad de alumnos que miden más de ).F8. &ac'age bol(2ej1%) &ublic class *ain + &ublic s!a!ic void main#!ring-. args$ + in! edad,mediaVedad,sumaVedad,mayorVedad,mayor V1%) //mayorVedad: mayores de 1 aNos double al!ura,mediaVal!ura,sumaVal!)

mayorVedad4() mediaVal!ura4() mayorV1%4() sumaVedad4() sumaVal!4() 0or #in! i41)i%)i$+ ys!em"ou!"&rin!ln#5Rlumno 5 i$) ys!em"ou!"&rin!#56n!rodu7ca edad: 5$) edad4En!rada"en!ero#$) ys!em"ou!"&rin!#56n!rodu7ca al!ura: 5$) al!ura4En!rada"real#$) i0#edadI1$ mayorVedad)




i0#al!uraI1"%$ mayorV1%)

sumaVedad4sumaVedadedad) sumaVal!4sumaVal!al!ura) ?

mediaVedad4sumaVedad/%) mediaVal!ura4sumaVal!/%) ys!em"ou!"&rin!ln#5[n[na edad media es de: 5 mediaVedad$) ys!em"ou!"&rin!ln#5a al!ura media es de: 5 mediaVal!ura$) ys!em"ou!"&rin!ln#5*ayor de 1 aNos: 5 mayorVedad$) ys!em"ou!"&rin!ln#5*ayor de 1"%: 5 mayorV1%$) ?

?

)6. ide un número 3que debe estar entre & y )&5 y mostrar la tabla de multiplicar de dicho número. &ac'age bol(2ej1=) &ublic class *ain + &ublic s!a!ic void main#!ring-. args$ + in! num) do + ys!em"ou!"&rin!#56n!roduce nDmero #de ( a 1($: 5$) num4En!rada"en!ero#$)

?


%(

A>ile # 

#(4num  num41($$)

ys!em"ou!"&rin!ln#5[n[nTabla del 5  num$) 0or #in! i41)i41()i$ + ys!em"ou!"&rin!ln#num  5  5  i  5 4 5  num8i$) ? ? ?

)F. @na empresa que se dedica a la venta de desinfectantes necesita un programa para gestionar las facturas. En cada factura figura: el c"digo del art2culo, la cantidad vendida en litros y el precio por litro. >e pide de 8 facturas introducidas: *acturaci"n total, cantidad en litros vendidos del art2culo ) y cuantas facturas se emitieron de más de 6&& U. &ac'age bol(2ej1) &ublic class *ain + &ublic s!a!ic void main#!ring-. args$ + in! codigo) // el código del ar!Hculo en cada 0ac!ura in! li!ros) // la can!idad de li!ros en cada 0ac!ura 0loa! &recio) // el &recio &or li!ro en cada 0ac!ura 0loa! im&or!eV0ac!ura) 0loa! 0ac!uracionV!o!al) in! li!rosVcod1)


// guardar@ el im&or!e de la 0ac!ura con la
%1

in! masV=(() m@s de =(( \

// con!ador ay de

0ac!uracionV!o!al 4 () li!rosVcod1 4 () masV=(( 4 ()

0or #in! i41)i4%)i$ + ys!em"ou!"&rin!ln#5Fac!ura n] 5  i$) ys!em"ou!"&rin!#5código de &roduc!o: 5$) codigo4En!rada"en!ero#$) ys!em"ou!"&rin!#5can!idad #li!ros$: 5$) li!ros4En!rada"en!ero#$) ys!em"ou!"&rin!#5&recio #li!ro$: 5$) &recio4 #0loa!$En!rada"real#$) im&or!eV0ac!ura 4 li!ros8&recio) 0ac!uracionV!o!al 4 im&or!eV0ac!ura) i0 #codigo 44 1$ li!rosVcod1 4 li!ros) i0#im&or!eV0ac!ura I4 =(($ masV=(( ) ? ys!em"ou!"&rin!ln#5[n[n[nSesumen de ven!as[n5$) // 0ac!uración !o!al ys!em"ou!"&rin!ln#5a 0ac!uración !o!al es de: 5 0ac!uracionV!o!al  5\5$)


%2

// li!ros del ar!iculo 1 ys!em"ou!"&rin!ln#5Xen!as del &roduc!o 1: 5  li!rosVcod1  5 li!ros5$) // 0ac!ura de mas de =(( euros ys!em"ou!"&rin!ln#5Fac!ura su&erior a =((\: 5  masV=(($) ? ?

)G. /gual que el anterior pero suponiendo que no se introduce el precio por litro. >olo e!isten tres productos con precios: )$ &,6 U#litro, ($ % U#litro y %$ ),(8 U#litro. &ac'age bol(2ej1) &ublic class *ain + &ublic s!a!ic void main#!ring-. args$ + in! codigo) // el código del ar!Hculo en cada 0ac!ura in! li!ros) // la can!idad de li!ros en cada 0ac!ura 0loa! &recio) // a>ora el &recio no se &ide &or !eclado 0loa! im&or!eV0ac!ura) 0loa! 0ac!uracionV!o!al) in! li!rosVcod1) in! masV=(() m@s de =(( \

// guardar@ el im&or!e de la 0ac!ura con la ay de

0ac!uracionV!o!al 4 ()


%3

li!rosVcod1 4 () masV=(( 4 ()

0or #in! i41)i4%)i$ + ys!em"ou!"&rin!ln#5Fac!ura n] 5  i$) ys!em"ou!"&rin!#5código de &roduc!o: 5$) codigo4En!rada"en!ero#$) ys!em"ou!"&rin!#5can!idad #li!ros$: 5$) li!ros4En!rada"en!ero#$) sAi!c> #codigo$ + case 1: &recio 4 ("=0) brea') case 2: &recio 4 30) brea')

case 3: &recio 4 1"2%0) brea') de0aul!: &recio 4 () // es!e caso no debe darse

?

im&or!eV0ac!ura 4 li!ros8&recio) 0ac!uracionV!o!al 4 im&or!eV0ac!ura) i0 #codigo 44 1$


%

li!rosVcod1 4 li!ros) i0#im&or!eV0ac!ura I4 =(($ masV=(( ) ? ys!em"ou!"&rin!ln #5[n[n[nSesumen de ven!as[n5$) // 0ac!uración !o!al ys!em"ou!"&rin!ln#5a 0ac!uración !o!al es de: 5 0ac!uracionV!o!al  5\5$) // li!ros del ar!iculo 1 ys!em"ou!"&rin!ln#5Xen!as del &roduc!o 1: 5  li!rosVcod1  5 li!ros5$) // 0ac!ura de mas de =(( euros ys!em"ou!"&rin!ln#5Fac!ura su&erior a =((\: 5  masV=(($) ? ?

). adas 6 notas, escribir la cantidad de alumnos aprobados, condicionados 3C05 y suspensos. &ac'age bol(2ej1) &ublic class *ain + &ublic s!a!ic void main#!ring-. args$ + in! no!a,a&robados,sus&ensos,condicionados)

a&robados4() sus&ensos4()


%%

condicionados4()

0or #in! i41)i4=)i$ + ys!em"ou!"&rin!#56n!rodu7ca no!a en!re ( y 1(: 5$) no!a4En!rada"en!ero#$) i0#no!a 44 $ condicionados) else i0#no!a I4 %$ a&robados) else i0#no!a  $ // es!e i0 sobra, ya
?

ys!em"ou!"&rin!ln#5R&robados: 5 a&robados$) ys!em"ou!"&rin!ln#5us&ensos: 5 sus&ensos$) ys!em"ou!"&rin!ln#5Condicionados: 5condicionados$) ? ?

(&. edir un número O, introducir O sueldos, y mostrar el sueldo má!imo. &ac'age bol(2ej2() &ublic class *ain + &ublic s!a!ic void main#!ring-. args$ +


%=

in! sueldo, sueldoVma) in! n) sueldoVma 4 () // como los sueldos son &osi!ivos, iniciali7amos el sueldo // m@imo a cero" ys!em"ou!"&rin!#5;Dmero de sueldos: 5$) n 4 En!rada"en!ero#$)

ys!em"ou!"&rin!ln#5999999995$)

0or #in! i41)i4n)i$ + ys!em"ou!"&rin!#56n!roduce sueldo: 5$) sueldo4En!rada"en!ero#$) i0 #sueldo I sueldoVma$ sueldoVma 4 sueldo) // si leemos un sueldo mayor
? &ac'age bol(2ej2() &ublic class *ain + &ublic s!a!ic void main#!ring-. args$ + in! sueldo, sueldoVma4() in! n)


%

boolean &rimerVsueldoVasignado) // es!a bandera indica si >emos asignado el &rimer sueldo como sueldo m@imo // con es!o &odremos !ener sueldos nega!ivos &rimerVsueldoVasignado 4 0alse) ys!em"ou!"&rin!#5;Dmero de sueldos: 5$) n 4 En!rada"en!ero#$)

ys!em"ou!"&rin!ln#5999999995$)

0or #in! i41)i4n)i$ + ys!em"ou!"&rin!#56n!roduce sueldo: 5$) sueldo4En!rada"en!ero#$) i0 #&rimerVsueldoVasignado 44 0alse$ + // asignamos como m@imo el &rimer sueldo leHdo sueldoVma 4 sueldo) &rimerVsueldoVasignado 4 !rue) ? i0 #sueldo I sueldoVma$ sueldoVma 4 sueldo) // si leemos un sueldo mayor
?


%

(). edir )& números, y mostrar al final si se ha introducido alguno negativo. &ac'age bol(2ej21) &ublic class *ain + &ublic s!a!ic void main#!ring-. args$ + in! num) boolean >ayVnega!ivo) // la variable >ayVnega!ivo segDn los dos &osibles valores indica: // 0alse: no se >a in!roducido ningDn nDmero nega!ivo // !rue: al menos >ay un nDmero nega!ivo >ayVnega!ivo 40alse) // su&onemos abr@ ningDn nega!ivo 0or #in! i41)i41()i$ + ys!em"ou!"&rin!#56n!roduce nDmero: 5$) num4En!rada"en!ero#$)

i0#num($ >ayVnega!ivo 4!rue) // si num es menor ayVnega!ivo a !rue ? i0#>ayVnega!ivo 44 !rue$ ys!em"ou!"&rin!ln#5e >a in!roducido algDn nDmero nega!ivo5$) else ys!em"ou!"&rin!ln#5;o >ay ningDn nDmero nega!ivo5$)

? ?


%

((. edir 8 calificaciones de alumnos y decir al final si hay algún suspenso. &ac'age bol(2ej22) &ublic class *ain + &ublic s!a!ic void main#!ring-. args$ + in! no!as) boolean sus&ensos) sus&ensos40alse) // su&onemos ay ningDn sus&enso 0or #in! i4()i%)i$ + ys!em"ou!"&rin!#56n!rodu7ca no!a #de ( a 1($: 5$) no!as4En!rada"en!ero#$)

i0#no!as%$ sus&ensos4!rue) ?

i0#sus&ensos$ ys!em"ou!"&rin!ln#5Way alumnos sus&ensos5$) else ys!em"ou!"&rin!ln#5;o >ay sus&ensos5$)

? ?

(%. edir 8 números e indicar si alguno es múltiplo de %. &ac'age bol(2ej23) &ublic class *ain +


=(

&ublic s!a!ic void main#!ring-. args$ + in! num) boolean mul!i&loV3)

mul!i&loV340alse)

0or #in! i4()i%)i$+ ys!em"ou!"&rin!#56n!rodu7ca nDmero: 5$) num4En!rada"en!ero#$) i0#num G3 44 ($ mul!i&loV34!rue) // si se ejecu!a es!a ins!rucción signi0ica ay un mDl!i&lo

de 3" ? i0#mul!i&loV3 44 0alse$ ys!em"ou!"&rin!ln#5no eis!en mDl!i&los de 35$) else ys!em"ou!"&rin!ln#5Way mDl!i&los de 35$)

? ?


=1

&olet4n 3 Bucles anidados ). Realiza detenidamente una traza al siguiente programa y muestra cual seria la salida por pantalla: RAVR-+- ejW) 4-R/-1 suma, i, j: EO9ERA 7A+/EOXA -R- i Y$ ) Z->9- 0 -R- j Y$ % Z->9- & /O7 $) suma Y$ iD)&[j escribir 3suma5 */O -R*/O -R*/O


=2

&ac'age bol(3ej(1) &ublic class *ain + &ublic s!a!ic void main#!ring-. args$ + in! suma) 0or #in! i4()i)i$+ 0or #in! j43)jI()j99$+ suma4i81(j) ys!em"ou!"&rin!ln#suma$) ? ? ? ? (. Realiza una traza del siguiente algoritmo y muestra la salida generada por pantalla.

RAVR-+- ejW) 4-R/-1 i, j: EO9ERA 7A+/EOXA -R- i Y$ ) Z->9- % j Y$ i[) +/EO9R-> j Y 0 escribir 3j$i5 j Y$ j[) */O +/EO9R-> */O -R*/O


=3

&ac'age bol(3ej(2) &ublic class *ain +

&ublic s!a!ic void main#!ring-. args$ + in! j) 0or #in! i4()i3)i$+ j4i1) A>ile#j$+ ys!em"ou!"&rin!ln#j9i$) j) ? ? ?

?

%. ise;a una aplicaci"n que muestre las tablas de multiplicar del ) al )&. &ac'age bol(3ej(3) &ublic class *ain + &ublic s!a!ic void main#!ring-. args$ + in! !abla,i) 0or #!abla41) !abla41() !abla$ + ys!em"ou!"&rin!ln #5[n[nTabla del 5 !abla$) ys!em"ou!"&rin!ln #59999999999999995$) 0or #i41)i41()i$


=

+ ys!em"ou!"&rin!ln #!abla  5  5  i  5 4 5  !abla8i$) ? ? ? ?

0. ibuja un cuadrado de n elementos de lado utilizando D. &ac'age bol(3ej() &ublic class *ain + &ublic s!a!ic void main#!ring-. args$ + in! n) // !amaNo del lado in! 0ila, col) ys!em"ou!"&rin! #5ado del cuadrado: 5$) n 4 En!rada"en!ero#$) 0or #0ila41) 0ila4n) 0ila$ + 0or #col41) col4n) col$ ys!em"ou!"&rin! #58 5$) ys!em"ou!"&rin!ln #55$) ? ? ?


=%

8. Oecesitamos mostrar un contador con 8 d2gitos 3\$\$\$\$\5, que muestre los números del &$&$&$&$& al $$$$, con la particularidad que cada vez que aparezca un % lo sustituya por una E. &ac'age bol(3ej(%) &ublic class *ain + &ublic s!a!ic void main#!ring-. args$ + 0or #in! i4()i4)i$+ 0or #in! j4()j4)j$+ 0or #in! '4()'4)'$+ 0or #in! l4()l4)l$+ 0or #in! m4()m4)m$+

i0#i443$ ys!em"ou!"&rin!#5E5$) else ys!em"ou!"&rin!#i$)

i0#j443$ ys!em"ou!"&rin!#5E5$) else ys!em"ou!"&rin!#j$)

i0#'443$ ys!em"ou!"&rin!#5E5$) else ys!em"ou!"&rin!#'$)

i0#l443$ ys!em"ou!"&rin!#5E5$) else ys!em"ou!"&rin!#l$)

i0#m443$


==

ys!em"ou!"&rin!#5E5$) else ys!em"ou!"&rin!#m$) ys!em"ou!"&rin!ln#5 5$) ? ? ? ? ? ?

?

6. Realizar un programa que nos pida un número n, y nos diga cuantos números hay entre ) y n que son primos. &ac'age bol(3ej(=) &ublic class *ain + &ublic s!a!ic void main#!ring-. args$ + in! j,num,con!V&ri) boolean &rimo)

con!V&ri4() ys!em"ou!"&rin!#56n!roduce numero: 5$) num4En!rada"en!ero#$) // vamos &rocesando !odos los nDmeros en!re 1""num 0or#in! i41)i4num)i$+


=

// &ara cada nDmero i, calcularemos si es &rimo // veremos si el nDmero i es divisible en el rango 2""i91 // El bucle A>ile se &uede >acer con menos vuel!a""" consul!ar algori!mos &ara &rimos

&rimo4!rue) j42) A>ile #j4i91  &rimo44!rue$ + i0 #iGj44($ &rimo40alse) j) ?

i0 #&rimo44!rue$+ con!V&ri) // si es &rimo incremen!amos el con!ador de &rimos ys!em"ou!"&rin!ln#i#5 es &rimo5$$) ? ? ys!em"ou!"&rin!ln#5En el rango 1""5  num  5, >ay 5 con!V&ri  5 nDmeros &rimos5$) ? ?


=

&olet4n * Tablas ).

ys!em"ou!"&rin!ln#5os nDmeros son:5$) 0or #in! i4()i%)i$ ys!em"ou!"&rin!ln#!-i.$)

? ?


=

(.

ys!em"ou!"&rin!ln#5os nDmeros #en orden inverso$:5$) 0or #in! i4)iI4()i99$ ys!em"ou!"&rin!ln#!-i.$) ? ?

%.

(

sumaV&os4() con!V&os4() sumaVneg4() con!Vneg4() con!Vcero4() // u!ili7amos un bucle &ara leer los da!os y o!ro &ara &rocesarlos // se &odrHan >acer ambas o&eraciones, leer y &rocesar, en un solo bucle 0or #in! i4()i%)i$+ ys!em"ou!"&rin!#56n!rodu7ca un nDmero: 5$) !-i.4En!rada"en!ero#$) ? 0or #in! i4()i%)i$+ i0#!-i.44($ con!Vcero) else+ i0#!-i.I($+ sumaV&os4sumaV&os!-i.) con!V&os) ? else+ sumaVneg4sumaVneg!-i.) con!Vneg) ? ? ? i0#con!V&os44($ ys!em"ou!"&rin!ln#5;o se &uede reali7ar la media de nDmeros &osi!ivos5$) else ys!em"ou!"&rin!ln#5a media de los &osi!ivos: 5#0loa!$sumaV&os/con!V&os$) i0#con!Vneg44($ ys!em"ou!"&rin!ln#5;o se &uede reali7ar la media de nDmeros nega!ivos5$) else


1

ys!em"ou!"&rin!ln#5a media de los nega!ivos: 5  #0loa!$sumaVneg/con!Vneg$) ys!em"ou!"&rin!ln#5a can!idad de cero es de: 5  con!Vcero$) ? ?

0.

0or #i4()i1()i$+ ys!em"ou!"&rin!#56n!rodu7ca numero: 5$) !-i.4En!rada"en!ero#$) ? ys!em"ou!"&rin!ln#5El resul!ado es:5$) 0or #i4()i4)i$+ ys!em"ou!"&rin!ln #!-i.$) // mos!ramos el i9Ksimo nDmero &or el &rinci&io ys!em"ou!"&rin!ln#!-9i.$) // y el i9Ksimo &or el 0inal ?


2

// como en cada vuel!a de 0or se mues!ran dos nDmeros // &ara mos!rarlos !odos, solo necesi!aremos la mi!ad de vuel!as" ? ?

8.

0or #i4()i1()i$+ ys!em"ou!"&rin!#5nDmero: 5$) a-i.4En!rada"en!ero#$) ? // leemos la !abla b


3

ys!em"ou!"&rin!ln#5eyendo la !abla b5$) 0or #i4()i1()i$+ ys!em"ou!"&rin!#5nDmero: 5$) b-i.4En!rada"en!ero#$) ?

// asignaremos los elemen!os de la !abla c // &ara las !ablas a y b u!ili7aremos como Hndice i // y &ara la !abla c u!ili7aremos como Hndice j"

j4() 0or #i4()i1()i$+ c-j.4a-i.) j) c-j.4b-i.) j) ?

ys!em"ou!"&rin!ln#5a !abla c
6.



&ublic class *ain + &ublic s!a!ic void main#!ring-. args$ + in! a-., b-., c-.) in! i,j) a4neA in!-12.) b4neA in!-12.) // la !abla c !endr@

0or #i4()i12)i$+ ys!em"ou!"&rin!#5nDmero: 5$) a-i.4En!rada"en!ero#$) ? // leemos la !abla b ys!em"ou!"&rin!ln#5eyendo la !abla b5$)

0or #i4()i12)i$+ ys!em"ou!"&rin!#5nDmero: 5$) b-i.4En!rada"en!ero#$) ? // asignaremos los elemen!os de la !abla c // &ara las !ablas a y b u!ili7aremos como Hndice i // y &ara la !abla c u!ili7aremos como Hndice j"

j4() i4()


%

A>ile #i12$ + // co&iamos 3 de a 0or #in! '4()'3) '$ + c-j.4a-i'.) j) ?

// co&iamos 3 de b 0or #in! '4()'3)'$ + c-j.4b-i'.) j) ?

// como >emos co&iado 3 de a y b, incremen!amos la i en 3" i43)

// la j se incremen!a cada ve7

=

F.



// leemos los nDmeros ys!em"ou!"&rin!ln#5eyendo nDmeros:5$) 0or #i4()i1()i$+ ys!em"ou!"&rin!#5nDmero: 5$) numeros-i.4En!rada"en!ero#$) ?

// com&robaremos el orden 0or #i4()i)i$ // usamos i e i1, &or lo as!a  #ó $ + i0 #numeros-i. I numeros-i1.$ // en es!e momen!o es decrecien!e decrecien!e 4 !rue) i0 #numeros-i.  numeros-i1.$ crecien!e 4 !rue)

// en es!e momen!o es crecien!e

? // de&endiendo de los valores de crecien!e y decrecien!e daremos un !i&o de ordenación i0 #crecien!e 44!rue  decrecien!e 440alse$ //!oda las &arejas es!@n en orden crecien!e ys!em"ou!"&rin!ln#5erie crecien!e"5$) i0 #crecien!e 440alse  decrecien!e 44!rue$ // !odas la &arejas es!@n en orden decrecien!e ys!em"ou!"&rin!ln#5erie decrecien!e"5$) i0 #crecien!e 44!rue  decrecien!e 44!rue$ // si >a !enido momen!os crecien!e y decrecien!es ys!em"ou!"&rin!ln#5erie desordenada"5$) i0 #crecien!e 440alse  decrecien!e 440alse$ // no >ay &arejas crecien!es ni decrecien!es ys!em"ou!"&rin!ln#5Todos los nDmeros iguales"5$) // lo



G. ise;ar una aplicaci"n que declare una tabla de )& elementos enteros.

// leemos  nDmeros ys!em"ou!"&rin!ln#5eyendo da!os"""5$) 0or #in! i4()i)i$+ ys!em"ou!"&rin!#56n!rodu7ca nDmero: 5$) !-i.4En!rada"en!ero#$) ? // &edimos el nuevo elemen!o y la &osición ys!em"ou!"&rin!#5;uevo elemen!o: 5$) elemen!o 4 En!rada"en!ero#$) ys!em"ou!"&rin!#5Posición donde inser!ar #de ( a $: 5$) &osicion 4 En!rada"en!ero#$) // su&ondremos ora des&la7aremos los elemen!os de la !abla // desde &osición >as!a el Dl!imo #en es!e caso $




0or #in! i4)iI4&osicion)i99$ !-i1.4!-i.)

//inser!amos el nuevo elemen!o !-&osicion. 4elemen!o) ys!em"ou!"&rin!ln#5a !abla
? ?

. 7rear un programa que lea por teclado una tabla de )& números enteros y la desplace una posici"n hacia abajo: el primero pasa a ser el segundo, el segundo pasa a ser el tercero y as2 sucesivamente. El último pasa a ser el primero. &ac'age bol(ej() &ublic class *ain + &ublic s!a!ic void main#!ring-. args$ + in! !-.4neA in!-1(.) in! ul!imo)

// leemos la !abla 0or #in! i4()i1()i$+ ys!em"ou!"&rin!#56n!rodu7ca nDmero: 5$) !-i.4En!rada"en!ero#$) ? // guardamos el Dl!imo elemen!o de la !abla ul!imo 4 !-.)


(

// des&la7amos >acia abajo #de ( >acia la Dl!ima &osición$ // al des&la7ar &erdemos el Dl!imo valor, &or eso lo >emos guardado an!es" 0or #in! i4)iI4()i99$ !-i1.4!-i.)

// el Dl!imo valor &asa a ser el &rimero !-(. 4ul!imo) ys!em"ou!"&rin!ln#5a !abla
? ?

)&. Qdem, desplazar O posiciones 3O es introducido por el

usuario5.

&ac'age bol(ej1() &ublic class *ain + &ublic s!a!ic void main#!ring-. args$ + in! !-.4neA in!-1(.) in! ul!imo) in! n)

// leemos la !abla 0or #in! i4()i1()i$+ ys!em"ou!"&rin!#56n!rodu7ca nDmero: 5$) !-i.4En!rada"en!ero#$) ? // ®un!amos cuan!as &osiciones se desea des&la7ar ys!em"ou!"&rin!#5Posiciones a des&la7ar:5 $)


1

n 4 En!rada"en!ero#$)

// // // //

del ejercicio an!erior !enemos una versión
0or #in! vuel!as41)vuel!as 4n) vuel!as$ + // guardamos el Dl!imo elemen!o de la !abla ul!imo 4 !-.) // des&la7amos >acia abajo #de ( >acia la Dl!ima &osición$ // al des&la7ar &erdemos el Dl!imo valor, &or eso lo !enemos guardado" 0or #in! i4)iI4()i99$ !-i1.4!-i.)

// el Dl!imo valor &asa a ser el &rimero !-(. 4ul!imo) ? ys!em"ou!"&rin!ln#5a !abla
? ?

// un algori!mo m@s e0icien!e &ac'age bol(ej1() &ublic class *ain +


2

&ublic s!a!ic void main#!ring-. args$ + in! !-.4neA in!-1(.) in! n) // leemos la !abla 0or #in! i4()i1()i$+ ys!em"ou!"&rin!#56n!rodu7ca nDmero: 5$) !-i.4En!rada"en!ero#$) ?

// ®un!amos cuan!as &osiciones desea des&la7ar ys!em"ou!"&rin!#5Posiciones a des&la7ar:5 $) n 4 En!rada"en!ero#$) // // // // // //

en el caso de des&la7ar una &osición: necesi!amos guardar solo un elemen!o #el Dl!imo acer una co&ia de la !abla com&le!a

in! co&ia-. 4 !"clone#$) // des&la7amos >acia abajo n &osiciones 0or #in! i4()i1()i$ !-i. 4co&ia-#in$G1(.) // la !abla 0unciona como si 0uese circular &or eso u!ili7amos el módulo ys!em"ou!"&rin!ln#5[n[na !abla
? ?


3

)).

0or #in! i4()i%)i$ + ys!em"ou!"&rin!#56n!rodu7ca nDmero #ordenado crecien!emen!e$: 5$) !-i.4En!rada"en!ero#$) ?

ys!em"ou!"&rin!ln#$) ys!em"ou!"&rin!#5;Dmero a inser!ar en!re los an!eriores: 5$) num4En!rada"en!ero#$)

si!ioVnum4() j4()

// buscaremos el si!io donde deberHa ir num A>ile#!-j.num  j4$+ si!ioVnum ) j) ? // des&la7aremos los elemen!os desde el si!ioVnum >as!a el 0inal // asH >aremos un >ueco &ara num




0or #in! i4) iI4si!ioVnum) i99$ !-i1.4!-i.)

// &or Dl!imo &onemos num en su si!io &ara
?

)(.

// leemos los 1( nDmeros 0or #in! i4()i1()i$ + ys!em"ou!"&rin!#5Elemen!o #5i5$: 5$) !-i.4En!rada"en!ero#$) ?


%

ys!em"ou!"&rin!ln#$)

// leemos la &osición
// des&la7amos desde &osición >as!a el 0inal !odos los elemen!os un lugar >acia la i7as!a la &enDl!ima &osición, !-i. 4 !-i1.) // ya ay ora >ay un ys!em"ou!"&rin!ln#!-i.$) // elemen!o D!il menos en la !abla ? ?

)%.

=

8/ &ublic s!a!ic void main#!ring-. args$ + in! !-.) in! con!V&ar, &ar-.) // con!ador de nDmeros &ares y !abla &ara guardarlos in! con!Vim&ar,im&ar-.) // Hdem &ara los im&ares ! 4 neA in!-1(.)

// eemos los valores de la !abla 0or #in! i4()i1()i$+ ys!em"ou!"&rin!#56n!rodu7ca un nDmero: 5$) !-i.4En!rada"en!ero#$) ?

// con!amos la can!idad de elemen!os &ares e im&ares // !ambiKn se &odHa con!ar solo lo &ares y calcular los im&ares41( 9&ares con!V&ar4() con!Vim&ar4()

0or #in! i4()i1()i$ i0#!-i.G244($ con!V&ar) else con!Vim&ar) // creamos las !ablas &ar e im&ar del !amaNo adecuado &ar4neA in!-con!V&ar.) im&ar4neA in!-con!Vim&ar.)

// volvemos a &rocesar &ara co&iar cada elemen!o en la !abla adecuada con!V&ar4() con!Vim&ar4() 0or #in! i4()i1()i$




i0#!-i.G244($ + &ar-con!V&ar.4!-i.) con!V&ar) ? else + im&ar-con!Vim&ar.4!-i.) con!Vim&ar) ?

ys!em"ou!"&rin!ln#5[n[nTabla &ar:5$) 0or #in! i4()icon!V&ar)i$ ys!em"ou!"&rin!ln#&ar-i.$)

ys!em"ou!"&rin!ln#5Tabla im&ar:5$) 0or #in! i4()icon!Vim&ar)i$ ys!em"ou!"&rin!ln#im&ar-i.$) ?

?

&ac'age bol(ej13) &ublic class *ain + /8 8 En es!a versión nos 0ijaremos en los Hndices &ares e im&ares 8 en &ar se incluir@ !-2.,!-.""" 8 en im&ar !-1., !-2.,""" 8/ &ublic s!a!ic void main#!ring-. args$ + in! !-.) in! &ar-.)




in! im&ar-.) ! 4 neA in!-1(.) // eemos los valores de la !abla 0or #in! i4()i1()i$+ ys!em"ou!"&rin!#56n!rodu7ca un nDmero: 5$) !-i.4En!rada"en!ero#$) ?

// creamos las !ablas &ar e im&ar del !amaNo adecuado #%$ &ar4neA in!-%.) im&ar4neA in!-%.) // co&iamos cada elemen!o en la !abla adecuada 0or #in! i4()i1()i42$ &ar-i/2. 4 !-i.) 0or #in! i41)i1()i42$ // la división en!era redondeada >acia el en!ero m@s &róimo &or im&ar-i/2. 4 !-i.) // debajo: 1/2 4(, 3/2 41, e!c"

ys!em"ou!"&rin!ln#5[n[nTabla &ar:5$) 0or #in! i4()i%)i$ ys!em"ou!"&rin!ln#&ar-i.$)

ys!em"ou!"&rin!ln#5Tabla im&ar:5$) 0or #in! i4()i%)i$ ys!em"ou!"&rin!ln#im&ar-i.$) ?

?




)0.
&ac'age bol(ej1) &ublic class *ain + &ublic s!a!ic void main#!ring-. args$ + in! a-., b-., c-.) in! i,j,') a 4neA in!-1(.) b 4neA in!-1(.)

// leemos a ys!em"ou!"&rin!ln#5Ua!os &ara a:5$) 0or #i4()i1()i$+ ys!em"ou!"&rin!#56n!rodu7ca numero #orden crecien!e$: 5$) a-i.4En!rada"en!ero#$) ? // leemos b ys!em"ou!"&rin!ln#5[nUa!os &ara b:5$) 0or #i4()i1()i$+ ys!em"ou!"&rin!#56n!rodu7ca numero #orden crecien!e$: 5$) b-i.4En!rada"en!ero#$) ? ys!em"ou!"&rin!ln#$) // creamos c


(

c 4 neA in! -2(.) // comen7amos a 0usionar i4() // u!ili7aremos i j4() // u!ili7aremos j '4() // u!ili7aremos '

a y b en c como Hndice de a) como Hndice de b) como Hndice de c

A>ile#i1(  j1($ + i0 #a-i.  b-j.$ // nos in!eresa el elemen!o de a + c-'. 4 a-i.) i) // incremen!amos i &ara !omar el siguien!e elemen!o de a ? else + c-'. 4 b-j.) j) // incremen!amos j &ara !omar el siguien!e elemen!o de b ? ')

// como >emos co&iado a c-'., incremen!amos ', &ara // en la siguien!e vuel!a, u!ili7ar el siguien!e >ueco de la !abla

? // cuando salimos de A>ile es &or a llegado al 0inal

i0#i441($ // >emos co&iado !oda la !abla a en c, ile #j1($ + c-'. 4 b-j.) j) ') ? else // >ay ile #i1($


1

+ c-'. 4 a-i.) i) ')

?

ys!em"ou!"&rin!ln#5*os!ramos la !abla c:5$) 0or #'4()'2()'$ ys!em"ou!"&rin!#c-'.  5

5$)

ys!em"ou!"&rin!ln#55$) ?

? )8. e debe mostrar la posici"n en que se encuentra. >i no está, indicarlo con un mensaje.

&ac'age bol(ej1%) &ublic class *ain + &ublic s!a!ic void main#!ring-. args$ + in! !-.4neA in!-1(.) in! num,j)

0or #in! i4()i1()i$+ ys!em"ou!"&rin!#56n!rodu7ca numero #orden crecien!e$: 5$) !-i.4En!rada"en!ero#$) ? ys!em"ou!"&rin!ln#$)


2

ys!em"ou!"&rin!ln#56n!rodu7ca numero a buscar: 5$) num4En!rada"en!ero#$) j4() A>ile#j1(  !-j.num$+ j) ?

// cuando me salgo del mien!ras &uede ser &or dos mo!ivos: // 9 emos llegado al 0inal y no >emos encon!rado nada" ys!em"ou!"&rin!ln#5;o encon!rado5$) else+ // si !-j.  num, >emos sobre&asado el lugar donde deberHa es!ar num, sin encon!rarlo i0#!-j.44num$ // num es!@ en la &osición i" En!onces si es!@ a>H ys!em"ou!"&rin!ln#5Encon!rado en la &osición 5  j$) else ys!em"ou!"&rin!ln#5;o encon!rado5$) ?

? ?

)6. ûeremos desarrollar una aplicaci"n que nos ayude a gestionar las notas de un centro educativo. 7ada grupo 3o clase5 está compuesto por 8 alumnos. >e pide leer las notas del primer, segundo y tercer trimestre de un grupo. ebemos mostrar al final: la nota media del grupo en cada trimestre, y la media del alumno que se encuentra en la posici"n O 3O se lee por teclado5.

&ac'age bol(ej1=) &ublic class *ain +


3

&ublic s!a!ic void main#!ring-. args$ + in! &rimer-., segundo-., !ercer-.) // no!as del &rimer, segundo y !ercer !rimes!re in! num,i) in! sumaV&rimer, sumaVsegundo, sumaV!ercer) double mediaValumno)

// creamos las !ablas necesarias &rimer 4 neA in! -%.) segundo 4 neA in! -%.) !ercer 4 neA in! -%.) // el &rograma cons!a de dos &ar!es: en!rada de da!os y &rocesado" e &odrHan &rocesar las // no!as mien!ras se leen" Pre0erimos u!ili7ar dos blo

// leemos las no!as del &rimer !rimes!re ys!em"ou!"&rin!ln#5;o!as de &rimer !rimes!re:5$) 0or #i4()i%)i$+ ys!em"ou!"&rin!#5Rlumnos #5i5$: 5$) &rimer-i.4En!rada"en!ero#$) ? // leemos las no!as del segundo !rimes!re ys!em"ou!"&rin!ln#5;o!as del segundo !rimes!re:5$) 0or #i4()i%)i$+ ys!em"ou!"&rin!#5Rlumno #5i5$: 5$) segundo-i.4En!rada"en!ero#$) ? // leemos las no!as del !ercer !rimes!re ys!em"ou!"&rin!ln#5;o!as del !ercer !rimes!re:5$) 0or #i4()i%)i$+ ys!em"ou!"&rin!#5Rlumnos #5i5$: 5$) !ercer-i.4En!rada"en!ero#$)




? // calculamos las medias sumaV&rimer 4 () // &onemos a ( los acumuladores sumaVsegundo 4 () sumaV!ercer 4 () 0or #i 4() i  %) i$ + sumaV&rimer 4 &rimer-i.) sumaVsegundo 4 segundo-i.) sumaV!ercer 4 !ercer-i.) ?

// mos!ramos da!os ys!em"ou!"&rin!ln#5*edia &rimer !rimes!re: 5 sumaV&rimer/%"($) ys!em"ou!"&rin!ln#5*edia segundo !rimes!re: 5 sumaVsegundo/%"($) ys!em"ou!"&rin!ln#5*edia !ercer !rimes!re: 5 sumaV!ercer/%"($) ys!em"ou!"&rin!ln#$)

// leemos la &osición del alumnos
?


%

&olet4n , Tablas n-dimensionales ). 7rear una tabla bidimensional bidimensional de tama;o 8!8 y rellenarla de la siguiente siguiente forma: la posici"n 9Jn,mK 9Jn,mK debe contener n[m. espués se debe mostrar su contenido. &ac'age bol(%ej(1) &ublic class *ain + &ublic s!a!ic void main#!ring-. args$ + in! !-.-.) // de0inimos ! como una !abla bidimensional ! 4 neA in! -%.-%.) // creamos la !abla de %%

0or #in! i4()i%)i$ // u!ili7amos i &ara la &rimera dimensión + 0or #in! j4()j%)j$ // u!ili7amos j &ara la segunda dimensión + !-i.-j.4ij) ? ? ys!em"ou!"&rin!ln#5TRBR: 5$)


=

0or #in! i4)iI4()i99$ + ys!em"ou!"&rin!ln#$) 0or #in! j4()j%)j$ + ys!em"ou!"&rin!#!-i.-j.5 5$)

? ? ? ?

(. 7rear y cargar una tabla tabla de tama;o 0!0 y decir si es simétrica simétrica o no, es decir si se obtiene obtiene la misma tabla al cambiar las filas por columnas. &ac'age bol(%ej(2) &ublic class *ain + &ublic s!a!ic void main#!ring-. args$ + in! !-.-.) boolean sime!rica) in! i,j) ! 4 neA in!-.-.)

0or #i4()i)i$ + 0or #j4()j)j$ + ys!em"ou!"&rin!#56n!rodu7ca elemen!o -5i5.-5j5.: 5$) !-i.-j.4En!rada"en!ero#$) ?




? sime!rica4!rue)

// su&onemos
//una solución es mirar !odos los elemen!os de la ma!ri7, &ero se >acen com&robaciones // dobles, un ejem&lo: com&robamos !-1.-2. con !-2.-1.""" &ero m@s !arde com&robaremos // !-2.-1. con !-1.-2. // la solución ser@ mirar solo la 7ona in0erior o su&erior a la diagonal &rinci&al" // En el momen!o
i4() A>ile#i  sime!rica44!rue$+ j4() A>ile#ji  sime!rica44!rue$+ i0#!-i.-j.4!-j.-i.$ sime!rica40alse)

j) ? i)

?

// si en algDn momen!o se da: !-i.-j.4!-j.-i. es emos encon!rado // ningDn valor
? ?




%. 7rear y cargar dos matrices de tama;o %!%, sumarlas y mostrar su suma. &ac'age bol(%ej(3) &ublic class *ain + &ublic s!a!ic void main#!ring-. args$ + in! a-.-., b-.-., suma-.-.) in! i,j) a 4 neA in!-3.-3.) b 4 neA in!-3.-3.) // eemos los da!os ys!em"ou!"&rin!ln #5*a!ri7 R:5$)

0or #i4()i3)i$ + 0or #j4()j3)j$ + ys!em"ou!"&rin!#5R-5i5.-5j5.: 5$) a-i.-j.4En!rada"en!ero#$) ? ? ys!em"ou!"&rin!ln #5*a!ri7 B:5$)

0or #i4()i3)i$ + 0or #j4()j3)j$ + ys!em"ou!"&rin!#5B-5i5.-5j5.: 5$) b-i.-j.4En!rada"en!ero#$) ? ?




// >acemos la suma suma 4 neA in!-3.-3.) 0or #i4()i3)i$ + 0or #j4()j3)j$ + suma-i.-j. 4 a-i.-j.  b-i.-j.) ? ? // mos!ramos los resul!ado ys!em"ou!"&rin!ln #5*a!ri7 uma:5$) 0or #i4()i3)i$ + 0or #j4()j3)j$ + ys!em"ou!"&rin! #suma-i.-j.  5 5$) ? ys!em"ou!"&rin!ln #$) ? ? ?

0. 7rear y cargar una tabla de tama;o %!%, trasponerla y mostrarla. &ac'age bol(%ej() &ublic class *ain + &ublic s!a!ic void main#!ring-. args$ + in! !-.-.4neA in!-3.-3.)


1((

in! au)

0or #in! i4()i3)i$+ 0or #in! j4()j3)j$+ ys!em"ou!"&rin!#56n!rodu7ca elemen!o-5i5.-5j5.: 5$) !-i.-j.4En!rada"en!ero#$) ? ? // mos!ramos la ma!ri7 original

ys!em"ou!"&rin! #5*a!ri7 original:5$) 0or #in! i4()i3)i$+ ys!em"ou!"&rin!ln#$) 0or #in! j4()j3)j$+ ys!em"ou!"&rin!#!-i.-j.5 5$) ? ? // // // //

!ras&onemos la ma!ri7 no &odemos !rans&oner !odos los elemen!os" n ejem&lo el elemen!o !-1.-2. se convier!e en el -2.-1.""" &ero cuando !rans&ongamos el elemen!o -2.-1. se convier!e en el -1.-2." Rl in!ercambiar dos veces los elemen!o, la ma!ri7 se
// solo !ras&ondremos los elemen!os &or debajo de la diagonal &rinci&al"

0or #in! i41)i3)i$+ 0or #in! j4()ji)j$+ au4!-i.-j.) !-i.-j.4!-j.-i.) !-j.-i.4au) ? ?


1(1

// mos!ramos la ma!ri7 !rans&ues!a

ys!em"ou!"&rin!ln#$) ys!em"ou!"&rin!ln#59999999999999999999995$) ys!em"ou!"&rin!ln #5*a!ri7 !rans&ues!a5$) 0or #in! i42)iI4()i99$+ ys!em"ou!"&rin!ln#$) 0or #in! j4()j3)j$+ ys!em"ou!"&rin!#!-i.-j.5 5$) ? ?

? ?

8. 7rear una tabla de tama;o F!F y rellenarla de forma que los elementos de la diagonal principal sean ) y el resto &. &ac'age bol(%ej(%) &ublic class *ain + &ublic s!a!ic void main#!ring-. args$ + in! !-.-.4neA in!-.-.) in! i,j)

0or #i4()i)i$ 0or #j4()j)j$ i0 #i44j$ !-i.-j. 4 1) else !-i.-j. 4 () // en java, al crear una !abla de en!eros, !odos los elemen!os se


1(2

// iniciali7an a (" Por lo
6. 7rear y cargar una tabla de tama;o )&!)&, mostrar la suma de cada fila y de cada columna. &ac'age bol(%ej(=) &ublic class *ain + &ublic s!a!ic void main#!ring-. args$ + in! !-.-.4neA in!-.-.) in! sumaV0ila,sumaVcol) in! i,j) 0inal in! !amaNo4) ! 4 neA in!-!amaNo.-!amaNo.) 0or #i4()i!amaNo)i$+ 0or #j4()j!amaNo)j$+ ys!em"ou!"&rin!#5Elemen!o -5i5.-5j5.: 5$)


1(3

!-i.-j.4En!rada"en!ero#$) ? ? // sumamos columna a columna ys!em"ou!"&rin!ln#$) 0or #i4()i!amaNo)i$+ sumaVcol4() 0or #j4()j!amaNo)j$+ sumaVcol4sumaVcol!-i.-j.) ? ys!em"ou!"&rin!ln#5Columna55 5i5:55 5sumaVcol$) ?

// sumamos 0ila a 0ila 0or #j4()j!amaNo)j$+ sumaV0ila4() 0or #i4()i!amaNo)i$+ sumaV0ila4sumaV0ila!-i.-j.) ? ys!em"ou!"&rin!ln#5Fila55 5j5:55 5sumaV0ila$) ?

? ?

F. utilizando dos tablas de tama;o 8! y !8, cargar la primera y trasponerla en la segunda. &ac'age bol(%ej() &ublic class *ain + &ublic s!a!ic void main#!ring-. args$ + in! a-.-., b-.-.)


1(

in! i,j) a 4 neA in!-%.-.) b 4 neA in! -.-%.) 0or #i4()i%)i$+ 0or #j4()j)j$+ ys!em"ou!"&rin!#5Elemen!o -5i5.-5j5.: 5$) a-i.-j.4En!rada"en!ero#$) // si orrarnos in!roducir % #%$ nDmeros, &odemos comen!ar las // dos lineas an!eriores y u!ili7ar #&or ejem&lo$: // a-i.-j. 4 1(8ij) ? ?

// !ras&onemos 0or #i4()i%)i$+ 0or #j4()j)j$+ b-j.-i. 4 a-i.-j.) ? ? // mos!ramos la ma!ri7 !ras&ues!a ys!em"ou!"&rin!ln#5*a!ri7 !ras&ues!a5$) 0or #i4()i)i$+ 0or #j4()j%)j$ ys!em"ou!"&rin! #b-i.-j.  5 5$) ys!em"ou!"&rin!ln #$) ? ? ?


1(%

G. 7rear una matriz SmarcoT de tama;o G!6: todos sus elementos deben ser & salvo los de los bordes que deben ser ). +ostrarla. &ac'age bol(%ej() &ublic class *ain + &ublic s!a!ic void main#!ring-. args$ + in! i,j) in! !-.-.) ! 4 neA in!-.-=.) // se iniciali7a !oda la !abla a (" // rellenamos la ma!ri7 marco 0or #i4()i)i$ 0or #j4()j=)j$ + i0#i44( QQ i44$ // si nos encon!ramos en la &rimera o Dl!ima columna !-i.-j.41) i0#j44( QQ j44%$ // si nos encon!ramos en la &rimera o Dl!ima 0ila !-i.-j.41) ?

ys!em"ou!"&rin!#5*a!ri7 marco: 5$) 0or #i4()i)i$+ ys!em"ou!"&rin!ln#$) 0or #j4()j=)j$+ ys!em"ou!"&rin! #!-i.-j.5 5$) ? ? ys!em"ou!"&rin!ln #$)

? ?

. Zacer lo mismo que el ejercicio anterior, pero con una matriz !!. 7reamos un cubo con las caras puestas a ) y el interior a &.


1(=

&ac'age bol(%ej() &ublic class *ain + &ublic s!a!ic void main#!ring-. args$ + in! !-.-.-.) in! i,j,') ! 4 neA in!-.-.-.)

0or #i4()i)i$+ 0or #j4()j)j$+ 0or #'4()')'$+ i0#i44( QQ i44 QQ j44( QQ j44 QQ '44( QQ '44$ // si es!amos en la &rimera o Dl!ima columna, 0ila o ca&a de la ma!ri7 !-i.-j.-'.41) ? ? ? // *os!ramos la ma!ri7 ca&a a ca&a ys!em"ou!"&rin!ln#5*a!ri7: 5$) 0or #i4()i)i$ + ys!em"ou!"&rin!ln#5Ca&a: 5 i$) 0or #j4()j)j$ + 0or #'4()')'$ + ys!em"ou!"&rin!#!-i.-j.-'.  5 5$) ? ys!em"ou!"&rin!ln #$) ? ys!em"ou!"&rin!ln #5 99999999999999 5$) ?


1(

? ?

)&. i, m, a: EO9ERA> t: 9-1<- J8K EO9ERA> 7A+/EOXA -R- i& Z->9- 0 leer 3tJiK5 */O -Rm  & -R- i  & Z->9- 0 >/ tJiK _ m m  tJiK */O >/ */O -Ra  tJ0$mK tJ0$mK  tJmK tJmK  a -R- i  & Z->9- 0 escribir 3tJiK5 */O -R*/O RAVR-+atos de entrada: $0, &, ), % y (.


RAVR-+- Ej)&b 4-R/-1 n, i: EO9ERA> a, b: 9-1<- J)&&K EO9ERA> 7A+/EOXA n  )& -R- i& Z->9- n$) leer 3aJiK5 */O -R-R- i  & Z->9- n#( bJiK  aJn$)$iK bJn$)$iK  aJiK */O -R-R- i  & Z->9- n$) >/ i mod ( C & escribir 3aJiK5 >/OA escribir 3bJiK5 */O >/ */O -R*/O RAVR-+atos de entrada: 6, (, G, , (, 8, G, (, 6 y ).

1(

&ac'age bol(%ej1() &ublic class *ain + &ublic s!a!ic void main#!ring-. args$ + in! i, m, a) // // // // // //

la idea de es!e ejercicio es >acer una !ra7a de 0orma manual, y !ras Ks!a, escribir el código eace nada en concre!o incluso con o!ros da!os de en!rada el algori!mo &uede dar un error, al u!ili7ar da!os como Hndices de !ablas sin las &er!inen!es com&robaciones"

in! ! 4 neA in! -%.) 0or #i4() i4) i$ !-i. 4 En!rada"en!ero#$) // &odemos sus!i!uir la lec!ura de da!os &or la siguien!e lHnea: //in! !-. 4 +9, (, 1, 3, 2?) m 4 () 0or #i4() i4) i$ i0 #!-i. I m $ m 4 !-i.) a 4 !-9m.) !-9m. 4 !-m.) !-m. 4 a) 0or #i4() i4) i$ ys!em"ou!"&rin!ln #!-i.$) ? ?


1(

&ac'age bol(%ej1() &ublic class *ain + &ublic s!a!ic void main#!ring-. args$ + in! n, i) /8 la idea de es!e ejercicio es >acer una !ra7a de 0orma manual, y !ras Ks!a, escribir el código eace nada en concre!o incluso con o!ros da!os de en!rada el algori!mo &uede dar un error, al u!ili7ar da!os como Hndices de !ablas sin las &er!inen!es com&robaciones" 8/ in! a-. 4 neA in! -1(.) in! b-. 4 neA in! -1(.) 0or #i4() i4n) i$ a-i. 4 En!rada"en!ero#$) // &odemos sus!i!uir la declaración de a y la lec!ura de da!os &or la siguien!e lHnea: // in! a-. 4 +=, 2, , , 2, %, , 2, =, 1?) n 4 1() 0or #i4() i4n/2) i$ + b-i. 4 a-n919i.) b-n919i. 4 a-i.) ? 0or #i4() in) i$ i0 #i G 2 44 ($ ys!em"ou!"&rin!ln #a-i.$) else ys!em"ou!"&rin!ln #b-i.$)

? ?


11(

))$>e pretende realizar un programa para gestionar la lista de participaciones en una competici"n de salto de longitud. El número de plazas disponible es de )&. >us datos se irán introduciendo en el mismo orden que vayan inscribiéndose los atletas. ise;ar el programa que muestre las siguientes opciones: )$ ($ %$ 0$

/nscribir un participante. +ostrar listado de datos. +ostrar listado por marcas. *inalizar el programa.

>i se selecciona ), se introducirán los datos de uno de los participantes: Oombre, mejor marca del (&&(, mejor marca del (&&) y mejor marca del (&&&. >i se elige la opci"n (, se debe mostrar un listado por número de dorsal.
in! &ar!-.-.4neA in!-TR*.-.) numc4() o&c4()


111

do+

ys!em"ou!"&rin!ln#$) ys!em"ou!"&rin!ln#5999999999999999999999999999999995$) ys!em"ou!"&rin!ln#51" 6nscribir &ar!ici&an!es5$) ys!em"ou!"&rin!ln#52" *os!rar lis!ado &or da!os5$) ys!em"ou!"&rin!ln#53" *os!rar lis!ado &or marcas5$) ys!em"ou!"&rin!ln#5" alir5$) ys!em"ou!"&rin!ln#5999999999999999999999999999999995$) ys!em"ou!"&rin!#5Por 0avor, in!rodu7ca una o&ción: 5$) o&c4En!rada"en!ero#$) ys!em"ou!"&rin!ln#$) sAi!c>#o&c$+ case 1: i0#numc442($ ys!em"ou!"&rin!ln#5is!ado com&le!o5$) else+ do+ ys!em"ou!"&rin!#56n!rodu7ca dorsal: 5$) dorsal4En!rada"en!ero#$)


dVre&40alse) i4() A>ile#inumc  dVre&440alse$+ i0#&ar!-i.-U.44dorsal$+ ys!em"ou!"&rin!#5Uorsal regis!rado"5$) ys!em"ou!"&rin!ln#5Por 0avor in!en!e de nuevo5$) dVre&4!rue) ? i) ? ?A>ile#dVre&44!rue$) i0#dVre&440alse$+ &ar!-numc.-U.4dorsal) ys!em"ou!"&rin!#56n!rodu7ca marca del 2(((: 5$) &ar!-numc.-*(.4En!rada"en!ero#$)

112

ys!em"ou!"&rin!#56n!rodu7ca marca del 2((1: 5$) &ar!-numc.-*1.4En!rada"en!ero#$) ys!em"ou!"&rin!#56n!rodu7ca marca del 2((2: 5$) &ar!-numc.-*2.4En!rada"en!ero#$) ys!em"ou!"&rin!ln#$) numc)

? ? brea') case 2: // mK!odo de ordenación &or burbuja, con!rolado &or in!ercambio in!er4!rue) A>ile#in!er44!rue$+ in!er40alse) 0or #in! j4()j4numc9191)j$+ i0#&ar!-j.-U.I&ar!-j1.-U.$+ 0or #in! '4()')'$+ au4&ar!-j.-'.) &ar!-j.-'.4&ar!-j1.-'.) &ar!-j1.-'.4au) ? in!er4!rue) ? ? ? ys!em"ou!"&rin!ln#56TRUL UE URTL,E^; ULSR:5$) ys!em"ou!"&rin!ln #5dorsal 9 marcas5$) 0or #in! j4()jnumc)j$+ ys!em"ou!"&rin!ln#$) 0or #in! '4()')'$+ ys!em"ou!"&rin!#&ar!-j.-'.5 5$) ? ? brea') case 3:


113

in!er4!rue) A>ile#in!er44!rue$+ in!er40alse) 0or #in! j4()j4numc9191)j$+ i0#&ar!-j.-*2.I&ar!-j1.-*2.$+ 0or #in! '4()')'$+ au4&ar!-j.-'.) &ar!-j.-'.4&ar!-j1.-'.) &ar!-j1.-'.4au) ? in!er4!rue) ? ? ? ys!em"ou!"&rin!ln#56TRUL PLS *RSCR :5$) ys!em"ou!"&rin!ln #5dorsal 9 marcas5$) 0or #in! j4()jnumc)j$+ ys!em"ou!"&rin!ln#$) 0or #in! '4()')'$+ ys!em"ou!"&rin!#&ar!-j.-'.5 5$) ? ? brea')

? ? A>ile#o&c4$)

? ?


11

&olet4n + Funciones ). Realizar una funci"n, a la que se le pase como parámetro un número O, y muestre por pantalla O d!lo e5ec!t6n doseT veces, el mensaje: S &ac'age bol(=ej(1) &ublic class *ain + &ublic s!a!ic void main#!ring-. args$ + in! num) ys!em"ou!"&rin!#56n!rodu7ca un numero: 5$) num4En!rada"en!ero#$) ys!em"ou!"&rin!ln#59999999999999999999999999995$) mos!rar#num$) ys!em"ou!"&rin!ln#59999999999999999999999999995$)

?

s!a!ic void mos!rar#in! num$+ 0or #in! i4()inum)i$+ ys!em"ou!"&rin!ln#5*ódulo ejecu!@ndose5$) ? ? ?


11%

(. ise;ar una funci"n que tenga como parámetros dos números, y que calcule el má!imo. &ac'age bol(=ej(2) &ublic class *ain + s!a!ic in! maimo#in! a, in! b$+ in! ma)

// su&onemos
i0#aIb$ ma4a) else ma4b)

re!urn#ma$) ? &ublic s!a!ic void main#!ring-. args$ + in! ma) in! a,b)

ys!em"ou!"&rin!#56n!rodu7ca un numero: 5$) a4En!rada"en!ero#$) ys!em"ou!"&rin!#56n!rodu7ca o!ro numero: 5$) b4En!rada"en!ero#$) ma 4maimo #a, b$) ys!em"ou!"&rin!ln#5El nDmero mayor es: 5 ma$) ?

?


11=

%. Qdem una versi"n que calcule el má!imo de % números. &ac'age bol(=ej(3) &ublic class *ain + s!a!ic in! maimo#in! a, in! b, in! c$+ in! ma) i0#aIb  aIc$ // si a es mayor

re!urn#ma$) ? &ublic s!a!ic void main#!ring-. args$ + in! ma) in! a, b, c)

ys!em"ou!"&rin!#56n!rodu7ca un numero: 5$) a4En!rada"en!ero#$)

ys!em"ou!"&rin!#56n!rodu7ca o!ro numero: 5$) b4En!rada"en!ero#$)

ys!em"ou!"&rin!#56n!rodu7ca el Dl!imo: 5$) c4En!rada"en!ero#$)


11

ys!em"ou!"&rin!ln#55$) ma 4maimo #a, b, c$) ys!em"ou!"&rin!ln#5El nDmero mayor es: 5 ma$) ?

?

0. Qdem una versi"n que calcule el má!imo de una tabla de n elementos. &ac'age bol(=ej() &ublic class *ain + /88 8 Es!o 0unciona solo &ara !ablas con un !amaNo mHnimo de 1 8 8/ s!a!ic in! maimo#in! !-.$+ in! ma) ma 4 !-(.) 0or #in! i 4 () i  !"leng!>) i$ i0 #!-i.Ima$ // si !-i. es mayor

re!urn#ma$) ? &ublic s!a!ic void main#!ring-. args$ + in! ma) in! !-.)


11

!4neA in! -=.)

0or #in! i 4 () i  !"leng!>) i$ // llenamos la !abla con valores alea!orios en!re 1 y 1(( !-i.4#in!$#*a!>"random#$81((1$) ys!em"ou!"&rin!ln#5os valores son:5$) 0or #in! i 4 () i  !"leng!>) i$ ys!em"ou!"&rin!#!-i. 5 5$)) ma 4 maimo #!$) ys!em"ou!"&rin!ln#5[nEl nDmero mayor es: 5 ma$) ?

?

8. *unci"n a la que se le pasan dos enteros y muestra todos los números comprendidos entre ellos, inclusive. &ac'age bo(l=ej(%) &ublic class *ain + s!a!ic void mos!rar#in! a,in! b$+ in! mayor, menor) // desconocemos el orden en el aremos es &oner los valores correc!os en mayor, menor"

i0#aIb$+ // a es el mayor" e &odrHa u!ili7ar la 0unción maimo#$ im&lemen!ada an!eriormen!e" mayor4a) menor4b) ? else+ // en es!e caso b ser@ el mayor


11

mayor4b) menor4a) ? 0or #in! i4menor)i4mayor)i$ ys!em"ou!"&rin!#i5 5$)

ys!em"ou!"&rin!ln#$) ? &ublic s!a!ic void main#!ring-. args$ + in! a,b) ys!em"ou!"&rin!#56n!rodu7ca &rimer numero: 5$) a4En!rada"en!ero#$) ys!em"ou!"&rin!#56n!rodu7ca segundo numero: 5$) b4En!rada"en!ero#$)

mos!rar#a,b$) ? ?

6. *unci"n que muestra en pantalla el doble del valor que se le pasa como parámetro. &ac'age bol(=ej(=) &ublic class *ain + s!a!ic void doble#in! num$ +


12(

in! doble) doble428num) // calculamos el doble de num ys!em"ou!"&rin!ln#5El doble es: 5 doble$) ? &ublic s!a!ic void main#!ring-. args$ + in! num) ys!em"ou!"&rin!#56n!rodu7ca un nDmero: 5$) num4En!rada"en!ero#$) doble#num$)

? ?

F. Realizar una funci"n que calcule 3muestre en pantalla5 el área o el volumen de un cilindro, según se especifique. ara distinguir un caso de otro se le pasará el carácter à` 3para área5 o `v` 3para el volumen5. -demás hemos de pasarle a la funci"n el radio y la altura. &ac'age bol(=ej() &ublic class *ain + s!a!ic void areaVoVvolumenVcilindro#double radio, double al!ura, c>ar o&cion$+ double volumen,area) sAi!c> #o&cion$ + case OvO: volumen 4*a!>"P68radio8radio8al!ura) // radio8radio es el radio al cuadrado ys!em"ou!"&rin!ln#5El volumen es de: 5 volumen$)


121

brea') case OaO: area 4 28*a!>"P68radio8al!ura  28*a!>"P68radio8radio) ys!em"ou!"&rin!ln#5El @rea es de: 5area$) brea') de0aul!: ys!em"ou!"&rin!ln#56ndicador del c@lculo erróneo5$)

? ?

&ublic s!a!ic void main#!ring-. args$ + double radio,al!) c>ar !i&oVcalculo) ys!em"ou!"&rin!#56n!rodu7ca radio: 5$) radio4En!rada"real#$) ys!em"ou!"&rin!#56n!rodu7ca al!ura: 5$) al!4En!rada"real#$) ys!em"ou!"&rin!#5_ue desea calcular #a/v$: 5$) !i&oVcalculo 4En!rada"carac!er#$)

ys!em"ou!"&rin!ln#55$) areaVoVvolumenVcilindro#radio,al!,!i&oVcalculo$) ?

?

G. Qdem que devuelva una tabla con el área y el volumen. &ac'age bol(=ej() &ublic class *ain +


122

s!a!ic double-. areaVyVvolumenVcilindro#double radio, double al!ura$ + double volumen,area) double calculo-.) calculo 4 neA double -2.) // -(. &ara el volumen y -1. &ara el @rea calculo-(. 4*a!>"P68radio8radio8al!ura) // radio8radio es el radio al cuadrado calculo-1. 428*a!>"P68radio8al!ura  28*a!>"P68radio8radio) re!urn #calculo$) ? &ublic s!a!ic void main#!ring-. args$ + double radio,al!) double resul!ado-.) //es!a !abla no necesi!a neA, ya

resul!ado 4areaVyVvolumenVcilindro#radio,al!$) // resul!ado >ace re0erencia a la !abla devuel!a // &or la 0unción" ys!em"ou!"&rin!ln#5El volumen es de: 5 resul!ado-(.$) ys!em"ou!"&rin!ln#5El @rea es de: 5 resul!ado-1.$) ? ?


123

. +"dulo al que se le pasa un número entero y devuelve el número de divisores primos que tiene. &ac'age bol(=ej() &ublic class *ain + // la 0unción esV&rimo indica si el nDmero &asado es o no &rimo // recordamos orrar muc>as vuel!as del A>ile &ara // nDmeros grandes

i42) A>ile#inum  &rimo44!rue$ // en realidad bas!arHa &robar >as!a la raH7 cuadrada de num + i0# num Gi 44 ($ // si es divisible &rimo40alse) // si >emos en!rado a

i) ?

re!urn#&rimo$) ?


12

// es!a 0unción devuelve el nDmero de divisores &rimos del nDmero &asado como &ar@me!ro" // // un ejem&lo: // los divisores de 2 son: 2 y 3 // aunabr@ un divisor seguro, el 1" 0or #in! i42)i4num)i$ i0#esV&rimo #i$  num Gi 44 ($ // si i es &rimo y divide a num con!) // incremen!amos el nDmero de divisores &rimos re!urn#con!$) ?

&ublic s!a!ic void main#!ring-. args$ + in! num,div) ys!em"ou!"&rin!#56n!roduce numero: 5$) num4En!rada"en!ero#$) div4numVdivisores#num$) ys!em"ou!"&rin!ln#5Tiene 5 div 5 divisores5$) ?

?


12%

)&.Qdem dise;ar una funci"n que devuelve una tabla con los divisores. &ac'age bol(=ej1() &ublic class *ain + // la 0unción esV&rimo indica si el nDmero &asado es o no &rimo // recordamos orrar muc>as vuel!as del A>ile &ara // nDmeros grandes

i42) A>ile#inum  &rimo44!rue$ + i0# num Gi 44 ($ // si es divisible &rimo40alse) // si >emos en!rado a

i) ?

re!urn#&rimo$) ?


12=

// es!a 0unción me devuelve el nDmero de divisores del nDmero // los divisores a !ener en cuen!a solo son aabr@ un divisor seguro, el 1" 0or #in! i42)i4num)i$ i0#esV&rimo #i$  num Gi 44 ($ // si i es &rimo y divide a num con!) // incremen!amos el nDmero de divisores re!urn#con!$) ?

s!a!ic in! -. divisores#in! num$+ in! con!4() in! div-.) // !abla donde guardaremos los divisores) in! numVdiv) // nDmero de divisores &rimos

12

+ div-con!. 4i) con!)

// incremen!amos el nDmero de divisores

?

re!urn#div$) ?

&ublic s!a!ic void main#!ring-. args$ + in! num, divisores-.) ys!em"ou!"&rin!#56n!roduce numero: 5$) num4En!rada"en!ero#$) divisores 4divisores#num$) ys!em"ou!"&rin!ln#5os divisores de 5  num  5 son:5$) 0or #in! i 4 () i  divisores"leng!>) i$ ys!em"ou!"&rin!#divisores-i.  5 5$)


?

)).Escribir una funci"n que calcule el má!imo común divisor de dos números. &ac'age bol(=ej11) &ublic class *ain + // // // //

el m@imo comDn divisor de dos nDmeros es el nDmero m@s grande acerlo un &oco &or la 5cuen!a de la vieja5"


12

// a idea es dividir &or !odos los nDmeros desde 1 >as!a mHnimo#a, b$ // y
re!urn#mcd$) ? s!a!ic in! minimo#in! a, in! b$+ in! min)

i0#aIb$ min4b) else min4a)

re!urn#min$) ?

&ublic s!a!ic void main#!ring-. args$ + in! a, b, mcd)


12

ys!em"ou!"&rin!#56n!roduce numero: 5$) a4En!rada"en!ero#$)

ys!em"ou!"&rin!#56n!roduce o!ro: 5$) b4En!rada"en!ero#$)

ys!em"ou!"&rin!ln#55$) mcd 4 maVcomunVdivisor #a, b$) ys!em"ou!"&rin!ln#5El mcd de 5a5 y 5b5 es: 5mcd$) ?

?

)(.Qdem con tres números. &ac'age bol(=ej12) &ublic class *ain + // // // // // //

el m@imo comDn divisor de !res nDmeros es el nDmero m@s grande acerlo un &oco &or la 5cuen!a de la vieja5" a idea es dividir &or !odos los nDmeros desde 1 >as!a mHnimo#a, b, c$ y
s!a!ic in! maVcomunVdivisor #in! a, in! b, in! c$ + in! mcd41) in! min) // &ara no im&lemen!ar la 0unción mHnimo &ara !res nDmeros


13(

// u!ili7aremos la 0unción con solo dos &ar@me!ros) min 4 minimo #a,minimo#b,c$$) mcd41) // eis!e un mcd seguro, el 1,


re!urn#min$) ?

&ublic s!a!ic void main#!ring-. args$ + in! a, b,c , mcd)

ys!em"ou!"&rin!#56n!roduce a: 5$) a4En!rada"en!ero#$)

ys!em"ou!"&rin!#56n!roduce b: 5$) b4En!rada"en!ero#$) ys!em"ou!"&rin!#56n!roduce c: 5$)


131

c4En!rada"en!ero#$)

ys!em"ou!"&rin!ln#55$) mcd 4 maVcomunVdivisor #a, b, c$) ys!em"ou!"&rin!ln#5El mcd de #5a5, 5b5, 5c5$ es: 5mcd$) ?

?

)%.Qdem con una tabla. &ac'age bol(=ej13) &ublic class *ain + /8 el m@imo comDn divisor es el nDmero m@s grande acerlo un &oco &or la 5cuen!a de la vieja5" a idea es dividir &or !odos los nDmeros desde 1 >as!a mHnimo#a, b, c$ y

132

// es!o 0unciona &ara !abla con al menos un valor min 4 !-(.) // u!ili7aremos la 0unción con solo dos &ar@me!ros) 0or #in! i 4 () i  !"leng!>) i$ min 4 minimo #min,!-i.$) // al !erminar el 0or, min debe !ener el valor mHnimo de !oda la !abla" mcd41) // eis!e un mcd seguro, el 1" 0or #in! i42)i4min)i$ + divideVaV!odos 4!rue) 0or #in! '4()'!"leng!>)'$ i0# !-'.Gi4($ // si i divide a !-i. divideVaV!odos40alse) // en!onces la i no divide a !odos los elemen!os de !" i0 #divideVaV!odos 44 !rue$ // i es ca&a7 de dividir a !odos los elemen!os de ! mcd 4i) // en!onces i es el nuevo mcd ?



re!urn#min$)


133

? &ublic s!a!ic void main#!ring-. args$ + in! !-., mcd) ! 4 neA in! -.) 0or #in! i 4 () i  !"leng!>) i$ !-i. 4 #in!$#*a!>"random#$81(((1$) // llenamos ! con nDmeros alea!orios en!re 1 y 1((( ys!em"ou!"&rin!ln#5os nDmeros son: 5$) 0or #in! i 4 () i  !"leng!>) i$ ys!em"ou!"&rin!#!-i. 5 5$)

ys!em"ou!"&rin!ln#55$) mcd 4 maVcomunVdivisor #!$) ys!em"ou!"&rin!ln#5El mcd es: 5 mcd$) ?

?

)0.Escribir una funci"n que calcule el m2nimo común múltiplo de dos números. &ac'age bol(=ej1) &ublic class *ain +


13

/8 el mHnimo comDn mDl!i&lo de a y b, es el nDmero m@s &eacerlo un &oco &or la 5cuen!a de la vieja5" a idea es elegir el mayor de a y b, y mul!i&licarlo &or i, >as!a

// en &rinci&io el mcm es el mayor de los dos nDmeros

A>ile #mcmGa4( QQ mcmGb4($ // si el mcm no es divisible &or a y b + i) mcm4ma8i) // el nuevo mcm sera el mayor &or i

? re!urn#mcm$) ? s!a!ic in! maimo #in! a, in! b$+ in! ma)

i0#aIb$ ma4a)


13%

else ma4b)

re!urn#ma$) ?

&ublic s!a!ic void main#!ring-. args$ + in! a, b, mcm)

ys!em"ou!"&rin! #56n!roduce a: 5$) a4En!rada"en!ero#$)

ys!em"ou!"&rin! #56n!roduce b: 5$) b4En!rada"en!ero#$)

ys!em"ou!"&rin!ln#55$) mcm 4 minVcomunVmul!i&lo #a,b$) ys!em"ou!"&rin!ln#5El mcm es: 5 mcm$) ?

?

&ac'age bol(=ej1) &ublic class *ain + // a&rovec>ando ec>a la 0unción maVcomunVdivisor, calcularemos


13=

// el mHnimo comDn mDl!i&lo de dos nDmeros como la mul!i&licación de ambos // divido &or el mcd s!a!ic in! minVcomunVmul!i&lo #in! a, in! b$ + in! mcm) mcm 4 a8b / maVcomunVdivisor #a,b$) re!urn #mcm$) ? s!a!ic in! maVcomunVdivisor #in! a, in! b$ + in! mcd41) in! min) min 4 minimo #a,b$) mcd41) // eis!e un mcd seguro, el 1,

i0#aIb$ min4b) else


13

min4a)

re!urn#min$) ?

&ublic s!a!ic void main#!ring-. args$ + in! a, b, mcm)


ys!em"ou!"&rin!#56n!roduce b: 5$) b4En!rada"en!ero#$)

ys!em"ou!"&rin!ln#55$) mcm 4 minVcomunVmul!i&lo #a, b$) ys!em"ou!"&rin!ln#5El mcm de 5a5 y 5b5 es: 5mcm$) ?

?

)8.Qdem con tres números. &ac'age bol(=ej1%) &ublic class *ain + // el mHnimo comDn mDl!i&lo de a, b y c, es el nDmero m@s &e

13

// // // //

Para calcularlo &odrHamos u!ili7ar algDn algori!mo eis!en!e o >acerlo un &oco &or la 5cuen!a de la vieja5" a idea es elegir el mayor de ellos, y mul!i&licarlo &or i #1""$, >as!a
s!a!ic in! minVcomunVmul!i&lo #in! a, in! b, in! c$ + in! mcm41) in! ma) in! i) ma 4 maimo #a, maimo#b,c$$) mcm 4ma) i41)


A>ile #mcmGa4( QQ mcmGb4( QQ mcmGc4($ // mien!ras el mcm no sea divisible &or !odos + i) mcm4ma8i) // el nuevo mcm sera el mayor &or i




13

re!urn#ma$) ?

&ublic s!a!ic void main#!ring-. args$ + in! a, b, c, mcm)



ys!em"ou!"&rin! #56n!roduce c: 5$) c4En!rada"en!ero#$)

ys!em"ou!"&rin!ln#55$) mcm 4 minVcomunVmul!i&lo #a, b, c$) ys!em"ou!"&rin!ln#5El mcm es: 5 mcm$) ?

?

&ac'age bol(=ej1%) &ublic class *ain + // el mHnimo comDn mDl!i&lo de a y b, es el nDmero m@s &e

1(

// // // // //

es divisible &or a y b" Para calcularlo &odrHamos u!ili7ar algDn algori!mo eis!en!e o >acerlo un &oco &or la 5cuen!a de la vieja5" a idea es elegir el mayor de a y b, y mul!i&licarlo &or i, >as!a
s!a!ic in! minVcomunVmul!i&lo #in! a, in! b$ + in! mcm41) in! ma) in! i) ma 4 maimo #a, b$) mcm 4ma) i41)


A>ile #mcmGa4( QQ mcmGb4($ // si el mcm no es divisible &or a y b + i) mcm4ma8i) // el nuevo mcm sera el mayor &or i


i0#aIb$ ma4a) else


11

ma4b)

re!urn#ma$) ?

&ublic s!a!ic void main#!ring-. args$ + in! a, b, c, mcm)



ys!em"ou!"&rin! #56n!roduce c: 5$) c4En!rada"en!ero#$)

ys!em"ou!"&rin!ln#55$) // reu!ili7amos la 0unción mcm &ensada &ara dos nDmeros y a&rovec>amos // la &ro&iedad conmu!a!iva del mcm" mcm 4 minVcomunVmul!i&lo #a, b$) mcm 4 minVcomunVmul!i&lo #mcm, c$) ys!em"ou!"&rin!ln#5El mcm es: 5 mcm$) ?

?


12

)6.Qdem con una tabla. &ac'age bol(=ej1=) &ublic class *ain + // // // // // //

el mHnimo comDn mDl!i&lo de a y b, es el nDmero m@s &eacerlo un &oco &or la 5cuen!a de la vieja5" a idea es elegir el mayor de ellos, y mul!i&licarlo &or i #1""$, >as!a
s!a!ic in! minVcomunVmul!i&lo #in! a, in! b$ + in! mcm41) in! ma) in! i) ma 4 maimo #a, b$)

mcm 4ma) i41)


A>ile #mcmGa4( QQ mcmGb4($ // mien!ras el mcm no sea divisible &or !odos + i) mcm4ma8i) // el nuevo mcm sera el mayor &or i ? re!urn#mcm$)


13

? s!a!ic in! maimo #in! a, in! b$+ in! ma)


re!urn#ma$) ?

&ublic s!a!ic void main#!ring-. args$ + in! !-., mcm) ! 4 neA in!-.)

0or #in! i 4 () i  !"leng!>) i$ !-i.4#in!$#*a!>"random#$81((1$) ys!em"ou!"&rin!ln#5os da!os son:5$) 0or #in! i 4 () i  !"leng!>) i$ ys!em"ou!"&rin!#!-i.5 5$))

ys!em"ou!"&rin!ln#55$) mcm 4 !-(.) 0or #in! i 4 () i  !"leng!>) i$ mcm 4 minVcomunVmul!i&lo #!-i.,mcm$)


1

ys!em"ou!"&rin!ln#5El mcm es: 5 mcm$) ? ?

)F.Escriba una funci"n que decida si dos números enteros positivos son amigos. os números son amigos, si la suma de sus divisores 3distintos de ellos mismos5 son iguales. &ac'age bol(=ej1) &ublic class *ain + // la 0unción esV&rimo indica si el nDmero &asado es o no &rimo // recordamos orrar muc>as vuel!as del A>ile &ara // nDmeros grandes

i42) A>ile#inum  &rimo44!rue$ +


1%

i0# num Gi 44 ($ // si es divisible &rimo40alse) // si >emos en!rado a
i) ?

re!urn#&rimo$) ?

// es!a 0unción me devuelve la suma de los divisores &ro&ios" // Es decir cual
suma4() 0or #in! i41)inum)i$ // al ser >as!a inum no !enemos en cuen!a el &ro&io num i0#num Gi 44 ($ // si i divide a num suma4i) // acumulamos i re!urn#suma$) ?

&ublic s!a!ic void main#!ring-. args$ + in! a,b)


1=


ys!em"ou!"&rin!#56n!roduce b: 5$) b4En!rada"en!ero#$) i0 #a44sumaVdivisoresV&ro&ios #b$  b44sumaVdivisoresV&ro&ios #a$$ ys!em"ou!"&rin!ln#a 5 y 5 b 5 son amigos"5$) else ys!em"ou!"&rin!ln#a5 y 5b5 no son amigos"""[na siguien!e ve7 &rueba con 22(, 2"5$)

? ?

)G.ise;a una funci"n 3en adelante D75 que decida si un número es primo. &ac'age bol(=ej1) &ublic class *ain + s!a!ic boolean esV&rimo#in! num$+ boolean &rimo) in! i)

&rimo4!rue)

i42) A>ile#inum  &rimo44!rue$ + i0#numGi44($ // si num es divisible &or i &rimo40alse) // si llego a

1

i) ?

re!urn#&rimo$) ? &ublic s!a!ic void main#!ring-. args$ + boolean res) in! num) ys!em"ou!"&rin!#56n!roduce numero: 5$) num4En!rada"en!ero#$)

i0#esV&rimo#num$$ ys!em"ou!"&rin!ln#5Es &rimo5$) else ys!em"ou!"&rin!ln#5;o es &rimo5$)

? ?

).@* que calcule a n. &ac'age bol(=ej1) &ublic class *ain + s!a!ic in! aVelevadoVn#in! a, in! n$+ in! res) res41) // el resul!ado se iniciali7a a 1, ya
// &or de0inición cual

1

res41) else 0or #in! i41)i4n)i$ res4res8a)

re!urn#res$) ? &ublic s!a!ic void main#!ring-. args$ + in! num,e&,res)

ys!em"ou!"&rin!#56n!rodu7ca base: 5$) num4En!rada"en!ero#$)

ys!em"ou!"&rin!#56n!rodu7ca su e&onen!e: 5$) e&4En!rada"en!ero#$) res4aVelevadoVn #num,e&$) ys!em"ou!"&rin!ln#num  5 elevado a 5  e& 5 4 5 res$) ?

?

(&.@* que muestre en binario un número entre & y (88. &ac'age bol(=ej2() &ublic class *ain + s!a!ic void binario#in! num$ +


1

in! !-.) in! con!)

// en ! guardaremos los dHgi!os binarios

! 4 neA in! -.)

// un nDmero en binario en!re ( y 2%% !iene  bi!s

i0 #num( QQ 2%%num$ ys!em"ou!"&rin!ln#5;Dmero 0uera de rango #(""2%%$5$) else + con! 4() i0 #num44($ + !-con!.4() con!) ? // iremos dividiendo y cogiendo el res!o A>ile#num4($ + !-con!. 4numG2) num 4num/2) con!) ?

ys!em"ou!"&rin!ln#5En binario: 5$) // como ! !iene los dHgi!os en orden inverso 0or #in! i4con!91)iI4()i99$ ys!em"ou!"&rin!#!-i.$)



1%(

? &ublic s!a!ic void main#!ring-. args$ + in! num) ys!em"ou!"&rin!#56n!rodu7ca un numero #(""2%%$: 5$) num4En!rada"en!ero#$)

binario#num$) ?

?

(). Escriba una funci"n que sume los n primeros números impares. &ac'age bol(=ej21) &ublic class *ain + s!a!ic in! sumaVnVim&ares #in! n$ + in! suma4() 0or #in! i 41) i 4n ) i$ suma 4 28i91) // asH calculamos el i9Ksimo im&ar re!urn #suma$) ? &ublic s!a!ic void main#!ring-. args$ + in! n) ys!em"ou!"&rin!#56n!rodu7ca un numero: 5$)


1%1

n 4En!rada"en!ero#$) ys!em"ou!"&rin!ln#5a suma de los 5 n 5 &rimeros im&ares es: 5 sumaVnVim&ares #n$$) ? ? &ac'age bol(=ej21) &ublic class *ain + s!a!ic in! sumaVnVim&ares #in! n$ + in! suma4() 0or #in! i 41) i 4 28n91 ) i42$

// el 0or ir@ 1, 3, %, """" // >as!a 28n91 #el n9Ksimo im&ar$

suma 4 i) re!urn #suma$) ? &ublic s!a!ic void main#!ring-. args$ + in! n) ys!em"ou!"&rin!#56n!rodu7ca un numero: 5$) n 4En!rada"en!ero#$) ys!em"ou!"&rin!ln#5a suma de los 5 n 5 &rimeros im&ares es: 5 sumaVnVim&ares #n$$) ? ?


1%2

((. ado el valor de un ángulo, ser2a interesante saber su seno, coseno y tangente. Escribir una funci"n que muestre en pantalla los datos anteriores. &ac'age bol(=ej22) &ublic class *ain + s!a!ic void in0ormacionVangulo #double n$ + // como las 0unciones emos de &asar n de grados a radianes n 4 *a!>"P6/1(8n)

// o!ra 0orma serHa n 4 *a!>"!oSadians#n$)

ys!em"ou!"&rin!ln#5seno: 5  *a!>"sin#n$$) ys!em"ou!"&rin!ln#5coseno: 5  *a!>"cos#n$$) ys!em"ou!"&rin!ln#5!angen!e: 5  *a!>"!an#n$$) ? &ublic s!a!ic void main#!ring-. args$ + double angulo) ys!em"ou!"&rin!#56n!rodu7ca un @ngulo #(""3=($: 5$) angulo 4En!rada"real#$) in0ormacionVangulo #angulo$) ? ?

(%. ise;ar una funci"n que calcule la distancia eucl2dea de dos puntos.


1%3

&ac'age bol(=ej23) &ublic class *ain + s!a!ic double dis!anciaVeuclidea #in! 1, in! y1, in! 2, in! y2$ + // aay m@s "s"&oA #192, 2$  *a!>"&oA #y19y2, 2$$$) ? &ublic s!a!ic void main#!ring-. args$ + in! 1, y1) // &rimer &un!o in! 2, y2) // el o!ro &un!o double l) // dis!ancia euclHdea ys!em"ou!"&rin!ln#5Pun!o 15$) ys!em"ou!"&rin!#5: 5$) 1 4 En!rada"en!ero#$) ys!em"ou!"&rin!#5y: 5$) y1 4 En!rada"en!ero#$) ys!em"ou!"&rin!ln#5[nPun!o 25$) ys!em"ou!"&rin!#5: 5$) 2 4 En!rada"en!ero#$) ys!em"ou!"&rin!#5y: 5$) y2 4 En!rada"en!ero#$) l 4dis!anciaVeuclidea #1,y1, 2,y2$)


1%

ys!em"ou!"&rin!ln#5[nUis!ancia euclHdea: 5 l$) ? ?

(0. @* a la que se le pasa como parámetro una tabla que debe rellenar. >e leerá por teclado una serie de números: guardaremos solo los pares e ignoraremos los impares. 9ambién hay que devolver la cantidad de impares ignorados. &ac'age bol(=ej2) &ublic class *ain + s!a!ic in! rellenaV!ablaV&ares#in! !-.$+ in! i,num, im&aresVignorados) i 4 () im&aresVignorados 4 () A>ile #i!"leng!>$

// !erminaremos de rellenar la !abla cuando el nDmero // de &ares sea igual
+ ys!em"ou!"&rin!#56n!rodu7ca nDmero: 5$) num 4 En!rada"en!ero#$) i0#num G2 44 ($ // si es &ar + !-i. 4 num) // lo guardamos i) ? else im&aresVignorados)

?


1%%

re!urn#im&aresVignorados$) ? &ublic s!a!ic void main#!ring-. args$ + in! igno,!-.) ! 4 neA in!-%.) igno 4 rellenaV!ablaV&ares#!$) ys!em"ou!"&rin!ln#5El numero de im&ares ignorados es de: 5 igno$) ys!em"ou!"&rin!ln#5a !abla

5$)


?

(8. @* a la que se le pasa una tabla de enteros y un número. ebemos buscar el número en la tabla e indicar si se encuentra o no. &ac'age bol(=ej2%) &ublic class *ain + s!a!ic boolean busca#in! !-.,in! n$ + in! i)


1%=

boolean es!a) i4() A>ile #i!"leng!>  !-i.4n$ // si no es !-i., &aso al siguien!e // con cuidado de no salirme de la !abla i)

// cuando !ermina el mien!ras, &uede ser &or dos mo!ivos: // 9 e buscado &or !oda la !abla sin encon!rarlo y al 0inal me salgo de la !abla // 9 o e encon!rado i0 #i!"leng!>$ // si no llego al 0inal de la !abla es &or e encon!rado // !-i. 44 num no es v@lido, ya

re!urn#es!a$) ? &ublic s!a!ic void main#!ring-. args$ + in! a-.4+1, 12, 3, %, 11?) // es un ejem&lo de &osibles valores in! num) boolean es!a)

ys!em"ou!"&rin!ln#5a !abla es: 5$) 0or #in! i4()i%)i$ ys!em"ou!"&rin!ln#a-i.$)

ys!em"ou!"&rin!#5[in!roduce numero a buscar: 5$) num4En!rada"en!ero#$)


1%

es!a4busca#a,num$) i0 #es!a$ ys!em"ou!"&rin!ln#5E nDmero es!@5$) else ys!em"ou!"&rin!ln#5El nDmero no es!@5$)

? ?

(6. /gual que el ejercicio anterior, pero suponiendo que la tabla no está siempre llena, y el número de elementos se pasa también como parámetro. &ac'age bol(=ej2=) &ublic class *ain + s!a!ic boolean busca#in! !-.,in! n, in! !am$ + in! i) boolean es!a) i4()

A>ile #i!am  !-i.4n$ // si no es !-i., &aso al siguien!e // con cuidado de no salirme de la !abla i) // cuando !ermina el mien!ras, &uede ser &or dos mo!ivos: // 9 e buscado &or !oda la !abla sin encon!rarlo y al 0inal me salgo de la !abla // 9 o e encon!rado


1%

i0 #i!am$ // si no llego al 0inal de la !abla es &or e encon!rado // !-i. 44 num no es v@lido, ya

re!urn#es!a$) ? &ublic s!a!ic void main#!ring-. args$ + in! a-.4 neA in! -2(.) in! !am) in! num) boolean es!a) a-(. a-1. a-2. a-3. a-.

4 4 4 4 4

1) 12) 3) %) 11)

!am 4 %)

ys!em"ou!"&rin!ln#5a !abla es: 5$) 0or #in! i4()i!am)i$ ys!em"ou!"&rin!ln#a-i.$)

ys!em"ou!"&rin!#5[n6n!roduce numero a buscar: 5$) num4En!rada"en!ero#$) es!a4busca#a, num, !am$)


1%

i0 #es!a$ ys!em"ou!"&rin!ln#5El nDmero es!@5$) else ys!em"ou!"&rin!ln#5El nDmero no es!@5$)

? ?

(F.ise;ar la funci"n operaWtabla, a la que se le pasa dos tablas, el número de elementos útiles y que operaci"n se desea realizar: sumar, restar, multiplicar o dividir 3mediante un carácter: `s`, `r`, `m`, `d`5. ar o&c, in! nelem$+ in! i, resul!-.) resul! 4 neA in!-nelem.)

sAi!c>#o&c$ + case OsO: 0or#i4()i4nelem91)i$ resul!-i. 4 a-i.  b-i.) brea') case OrO: 0or#i4()i4nelem91)i$ resul!-i. 4 a-i. 9 b-i.) brea')


1=(

case OmO: 0or#i4()i4nelem91)i$ resul!-i. 4a-i. 8 b-i.) brea')

case OdO: 0or#i4()i4nelem91)i$ resul!-i. 4 a-i. / b-i.) brea')

?

re!urn #resul!$) ? &ublic s!a!ic void main#!ring-. args$ + in! numVda!osVu!iles) c>ar o&eracion) in! !abla1-., !abla2-., resul!ado-.) !abla1 4 neA in!-1(.) !abla2 4 neA in!-1%.) !abla1-(. !abla1-1. !abla1-2. !abla1-3.

4) 4) 42) 4)

!abla2-(. !abla2-1. !abla2-2. !abla2-3.

493) 43) 4=) 41)

numVda!osVu!iles 4) ys!em"ou!"&rin!ln#5!abla1

!abla25$)

0or#in! i4()inumVda!osVu!iles)i$


1=1

ys!em"ou!"&rin!ln #!abla1-i. 5

5 !abla2-i.$)

ys!em"ou!"&rin!ln#5L&eración #s, r, m, d$: 5$) o&eracion 4 En!rada"carac!er#$) resul!ado 4o&eraV!abla #!abla1, !abla2, o&eracion, numVda!osVu!iles$) ys!em"ou!"&rin!ln#5El resul!ado de la o&eración es:5$) 0or#in! i4()inumVda!osVu!iles)i$ ys!em"ou!"&rin!ln #resul!ado-i.$) ? ?

(G. @* que ordene la tabla que se le pasa. pacHage bol&6ej(G? public class +ain I static void ordenar3int aJK5I int tamCa.length? int au!? ## ordenaremos utilizando la ordenaci"n por intercambio for 3int iC&?iYtam$)$)?i[[5I for 3int jC&?jYtam$i$)?j[[5I if3aJjK_aJj[)K5 ## si el elemento j es mayor que el j[) I au!CaJjK? ## los intercambiamos


1=2

aJjKCaJj[)K? aJj[)KCau!? P P P P static void mostrarWtabla3int tJK5I int tamCt.length? for 3int iC&?iYtam?i[[5I >ystem.out.print3tJiK [ L P

L5?

P

public static void main3>tringJK args5 I int tJKCne intJGK? for 3int iC&?iYG?i[[5I tJiKC3int53+ath.random35D)&&5[)? P >ystem.out.println3L9abla aleatoriaL5? mostrarWtabla3t5? >ystem.out.println3Lnn9abla ordenadaL5? ordenar3t5? mostrarWtabla3t5?

P P


1=3

(. @* que toma como parámetros dos tablas. ay nDmeros re&e!idos en las !ablas 8 9 com&robar
// u!ili7aremos a como Hndice de la !abla a&ues!a // y & &ara recorrer &remiado

acier!os4() 0or #a4()aa&ues!a"leng!>)a$ // recorremos la !abla de a&ues!a + &4() // &ara cada nDmero de la a&ues!a recorremos &remiado // se &odrHa >acer con un 0or, &ero con el A>ile evi!amos vuel!as innecesarias A>ile#&&remiado"leng!>  a&ues!a-a.4&remiado-&.$ &)

i0#&&remiado"leng!>$ acier!os)

// si & indica un elemen!o de la !abla // !enemos un acier!o m@s

?


1=

re!urn#acier!os$) ? &ublic s!a!ic void main#!ring-. args$ + in! &rimi!iva-.4neA in!-=.) in! a&ues!a-.4neA in!-=.) in! acier!os4() ys!em"ou!"&rin!ln#5u a&ues!a es: 5$) 0or #in! i4()i&rimi!iva"leng!>)i$ + &rimi!iva-i.4#in!$#*a!>"random#$81$) ys!em"ou!"&rin!#&rimi!iva-i.  5 5$) ?

ys!em"ou!"&rin!ln#5[na combinación ganadora es: 5$) 0or #in! i4()ia&ues!a"leng!>)i$ + a&ues!a-i.4#in!$#*a!>"random#$81$) ys!em"ou!"&rin!#a&ues!a-i. 5 5$) ?

acier!os4&rimi!iva#&rimi!iva,a&ues!a$) ys!em"ou!"&rin!ln#5[n[nTiene 5acier!os5 acier!os[n5$) i0 #acier!os 44 ($ ys!em"ou!"&rin!ln#5o im&or!an!e no es ganar""" es &ar!ici&ar"[n5$) ?

?


1=%

%&. @* recursiva que calcule a n. &ac'age bol(=ej3() &ublic class *ain + /8 sobrecargamos la 0unción &ara

res 4 a 8 &o!encia#a, n 9 1$) re!urn #res$) ?

s!a!ic double &o!encia #double a, in! n$ + double res) i0 #n 44 ($ res 4 1) else res 4 a 8 &o!encia#a, n 9 1$) re!urn #res$) ?


1==

&ublic s!a!ic void main#!ring-. args$ + double num, resul!ado) in! &o!encia) ys!em"ou!"&rin!#56n!rodu7ca base #real$: 5$) num 4 En!rada"real#$) ys!em"ou!"&rin!#56n!rodu7ca la &o!encia: 5$) &o!encia 4 En!rada"en!ero#$) resul!ado 4 &o!encia#num, &o!encia$) ys!em"ou!"&rin!ln#5El resul!ado es: 5  resul!ado$) ? ?

%). 7alcular el factorial de n recursivamente. &ac'age bol(=ej31) &ublic class *ain + s!a!ic in! 0ac!orial#in! num$+ in! res) i0#num44($ // caso base: ( es igual a 1 res41) else res4num80ac!orial#num91$) // n4 n8#n91$8#n92$""" un ejem&lo 3438281 // !ambiKn ocurre

re!urn#res$) ?


1=

&ublic s!a!ic void main#!ring-. args$ + in! num,resul!ado) ys!em"ou!"&rin!#56n!rodu7ca el numero: 5$) num4En!rada"en!ero#$)

resul!ado40ac!orial#num$) ys!em"ou!"&rin!ln#num5 es igual a 5resul!ado$) ? ?

%(. @* que calcule el valor má!imo de una tabla de forma recursiva. &ac'age bol(=ej32) &ublic class *ain + /88 la 0unción m@imo busca el mayor nDmero en!re los elemen!os de !, 8 a &ar!ir de las &osición &os" 8/ s!a!ic in! maimo #in! !-., in! &os$ + in! res) i0#&os44!"leng!>91$

// caso base: &os indica el Dl!imo elemen!o de ! // en es!e caso es!e ser@ el m@imo

res4!-&os.) else + in! ')


1=

' 4 maimo #!,&os1$) // ' ser@ el mayor desde la &osición &os1 >as!a el Dl!imo elemen!o i0 #!-&os.I'$ // si !-&os. es mayor
?

re!urn#res$) ? // el usuario u!ili7ar@ es!a 0unción &or comodidad s!a!ic in! maimo #in! !-.$ + re!urn #maimo #!,($$) ? &ublic s!a!ic void main#!ring-. args$ + in! da!os-.) in! ma) da!os 4 neA in!-1(.) 0or #in! i 4 () i  da!os"leng!>) i$ da!os-i. 4 #in!$ #*a!>"random#$81(((1$) ys!em"ou!"&rin!ln#5os da!os son:5$) 0or #in! i 4 () i  da!os"leng!>) i$ ys!em"ou!"&rin!#da!os-i.  5 5$) ma 4maimo#da!os$)


1=

ys!em"ou!"&rin!ln#5[n[nEl m@imo es: 5  ma$) ? ?

&ac'age bol(=ej32) &ublic class *ain + &ublic s!a!ic void main#!ring-. args$ + in! !-.4+, 2, 1(, %, 1, ?) // un ejem&lo &ara &robar la 0unción in! ma) ma 4maimo#!$) ys!em"ou!"&rin!ln#5El m@imo es: 5 ma$) ? // El m@imo de una !abla ser@ el m@imo en!re el &rimer elemen!o de la // !abla y el res!o de la !abla #es decir del segundo elemen!o >as!a el // Dl!imo$" // // Xamos acor!ando la !abla, indicando el &rimer Hndice donde se em&e7ar@ a // buscar el m@imo" // El caso base ser@ una !abla donde solo se busca en un elemen!o elemen!o" // Es!@ claro 91 $$) ?


1(

s!a!ic in! maimo#in! !-., in! desde, in! >as!a$ + in! mayor) i0 #desde 44 >as!a$ // caso base // la !abla solo !iene un elemen!o mayor4!-desde.) else + mayor 4 maimo#!, desde1, >as!a$) i0 #mayor  !-desde.$ mayor 4 !-desde.) ? re!urn #mayor$)

? ?

%%. @* que calcule el n$ésimo término de la serie de *ibonacci. En esta serie el n$ésimo valor se calcula sumando los dos valores anteriores. Es decir fibonacci3n5 C fibonacci3n$ )5[fibonacci3n$(5, siendo fibonacci3&5C) y fibonacci3)5C). &ac'age bol(=ej33) &ublic class *ain + s!a!ic in! 0ibo#in! num$ + in! res)

i0#num44($ res4() else+ i0#num441$


// &rimer caso base // segundo caso base

11

res41) else res40ibo#num91$0ibo#num92$)

// caso general recursivo

?

re!urn#res$) ? &ublic s!a!ic void main#!ring-. args$ + in! num,resul!ado) ys!em"ou!"&rin!#5Xamos calcular 0ibonacci#n$"[n6n!rodu7ca n #se recomienda n($: num4En!rada"en!ero#$)

5$)

resul!ado40ibo#num$) // si n es muy grande es!o &uede !ardar bas!an!e" ys!em"ou!"&rin!ln#5[n0ibonacci#5  num  5$ 4 5 resul!ado$) ? ?

%0. /gual que el ejercicio anterior, pero pudiendo configurar los valores de los dos primeros término de la serie. &ac'age bol(=ej3) &ublic class *ain + /88 8 sobrecargamos la 0unción &ara

12

8 9 se le &uede &asar los valores de los casos bases: 0ibo#($ y 0ibo#1$ 8/ s!a!ic in! 0ibo#in! num$ + in! res) i0#num44($ // &rimer caso base res4() else+ i0#num441$ // segundo caso base res41) else res40ibo#num91$0ibo#num92$) ?

// caso general recursivo

re!urn#res$) ? s!a!ic in! 0ibo#in! num, in! 0ibo(, in! 0ibo1$ + in! res)

i0#num44($ // &rimer caso base, emos de acordarnos de u!ili7ar la 0unción 0ibo

13

re!urn#res$) ? &ublic s!a!ic void main#!ring-. args$ + in! num,resul!ado) in! 0ibo(,0ibo1) ys!em"ou!"&rin!ln#5Xamos calcular 0ibonacci#n$[n5$) ys!em"ou!"&rin!#56n!rodu7ca el valor de 0ibonacci#($: 5$) 0ibo( 4 En!rada"en!ero#$) ys!em"ou!"&rin!#56n!rodu7ca el valor de 0ibonacci#1$: 5$) 0ibo1 4 En!rada"en!ero#$) ys!em"ou!"&rin! #5[n6n!rodu7ca n #se recomienda n($: num4En!rada"en!ero#$)

5$)

// si n es muy grande es!o &uede !ardar bas!an!e" resul!ado40ibo#num, 0ibo(, 0ibo1$) ys!em"ou!"&rin!ln#5[n0ibonacci#5  num  5$ 4 5 resul!ado$) ? ?

%8. @* que realice la búsqueda dicot"mica en una tabla, de forma recursiva. &ac'age bol(=ej3%) &ublic class *ain +


1

// a la 0unción se le &asa, la !abla, el elemen!o a buscar, y la &rimera // y Dl!ima &osición donde buscar" s!a!ic in! busca #in! !-., in! elem, in! &rimero, in! ul!imo$ + in! &os) i0#&rimero I4 ul!imo$

// caso base: solo >ay un elemen!o donde buscar

i0 #!-&rimero.44elem$ &os 4&rimero) else &os 491) else + in! &os1, &os2) // llamada recursiva //buscamos en la &rimera mi!ad de la !abla: (""mi!ad &os1 4 busca #!, elem, &rimero, #&rimeroul!imo$/2$) // buscamos en la segunda &ar!e de la !abla: mi!ad1""ul!imo // se &one mi!ad1, &or

// en caso de no encon!rarse &os1 y &os2 ser@n 91, y se coger@ el valor de &os2 #91$ ?

re!urn#&os$)


1%

? // el usuario u!ili7ar@ es!a 0unción &or comodidad // solo es necesario &asarle la !abla y el elemen!o a buscar // devuelve el Hndice del elemen!o si lo encuen!ra o 91 en caso con!rario s!a!ic in! busca #in! !-., in! elem$ + re!urn #busca #!, elem, (, !"leng!>91$$) ? &ublic s!a!ic void main#!ring-. args$ + in! da!os-.) in! num) in! &os) da!os 4 neA in!-1(.) // &ara no !eclearlos, cagamos da!os alea!orios 0or #in! i 4 () i  da!os"leng!>) i$ da!os-i. 4 #in!$ #*a!>"random#$81(((1$) ys!em"ou!"&rin!ln#5os da!os son:5$) 0or #in! i 4 () i  da!os"leng!>) i$ ys!em"ou!"&rin!#da!os-i.  5 5$) ys!em"ou!"&rin!#5[n[nElemen!o a buscar: 5$) num 4En!rada"en!ero#$) // llamamos a la 0unción buscar &os 4busca#da!os, num$) i0 #&os 44 91$


1=

ys!em"ou!"&rin!ln#5[n[n;o encon!rado5$) else ys!em"ou!"&rin!ln#5[n[nEncon!rado en la &osición: 5 &os$)

? ?

%6. @* que toma una tabla bidimensional de enteros, representando un tablero de ajedrez. isponemos de las constantes 1 3pe"n blanco5, 9O 3torre negra5, etc. 3, 9, 7, -, R, 5. icho m"dulo debe devolver un valor booleano, que indique si el rey negro está amenazado. &ac'age bol(=ej3=) &ublic class *ain + 0inal 0inal 0inal 0inal 0inal 0inal 0inal

s!a!ic s!a!ic s!a!ic s!a!ic s!a!ic s!a!ic s!a!ic

in! in! in! in! in! in! in!

X491) P4() T41) C42) R43) U4) S4%)

// // // // // // //

esca
0inal 0inal 0inal 0inal 0inal 0inal

s!a!ic s!a!ic s!a!ic s!a!ic s!a!ic s!a!ic

// igual &ara los negros in! P;41() in! T;411) in! C;412) in! R;413) in! U;41) in! S;41%)

&ublic s!a!ic void main#!ring-. args$ +


1

0inal in! !ablero-.-. 4 +

+X, +X, +X, +X, +X, +X, +X, +X,

X, X, X, X, X, X, X, X,

X, X, X, X, X, X, X, X, U;, X, X, C;, P, P, S, X,

X, X, X, X, X, X, X, X,

X, X, X, X, X, X, X, X,

X, X?, X, X?, X, R;?, T, X?, X, X?, X, X?, X, X?, X, X??)

// >ay emos de imaginarlo // ro!ado ( grados >acia la i7
// // // //

una &osible mejora es indicar en la variable amena7a la &rimera &ie7a con!raria nos es!@ acec>ando e indicar con un esca
amena7a 4 jaora iremos viendo las &osibles amena7as una a una:


1

// en &rimer lugar veremos si nos amena7a un caballo: amena7a 4amena7aVcaballo #!ablero, &osVrey$)

// RWLSR // miraremos >acia la derec>a #d:1, dy:($ // a

// miraremos >acia la i7

// miraremos >acia arriba #d:(, dy:1$ // a

// miraremos >acia abajo #d:(, dy:91$ // a

// miraremos en la diagonal derec>a arriba #d:1, dy:1$ // aa abajo #d:1, dy:91$ // a

1

&ie7a 4&rimeraV&ie7a#!ablero, &osVrey, 1, 91$) i0 #&ie7a 44U; QQ &ie7a 44R;$ amena7a4!rue)

// miraremos en la diagonal i7

// miraremos en la diagonal i7a o a la i7

re!urn #amena7a$) ? // es!a 0unción busca el rey blanco y devuelve su &osición // en una !abla de dos elemen!os" iendo &osicion-(. la columna y // &osicion-1. la 0ila" s!a!ic in!-. buscaVrey #in! !ablero-.-.$ + in! i,j) in! &osicion-.)


1(

&osicion 4 neA in! -2.) 0or #i4() i ) i$ 0or #j4() j ) j$ i0 #!ablero-i.-j.44S$ + &osicion-(. 4i) &osicion-1. 4j) ? re!urn #&osicion$) ? // es!a 0unción busca la &rimera &ie7a a arriba // 1 ( derec>a // 1 91 diagonal derec>a abajo // ( 1 >acia arriba // ( ( ETE CRL ;L E URS` ;;CR // ( 91 >acia abajo // 91 1 diagonal i7acia la i7

11

&ie7a 4 X)

// en &rinci&io su&onemos ay ninguna &ie7a

// damos el &rimer &aso: es decir &asamos a la &rimera casilla // des&uKs del rey" &os 4d) &osy 4dy) // mien!ras no nos salgamos del !ablero y no encon!remos una &ie7a A>ile # (4&os  &os4  (4&osy  &osy4  &ie7a 44X$ + &ie7a 4 !ablero-&os.-&osy.) &os 4 d) &osy 4 dy) ? re!urn #&ie7a$) ? s!a!ic boolean amena7aVcaballo #in! !ablero-.-., in! &os-.$ + boolean amena7a40alse) // Way
Uesde la &osición ac!ual vemos los &uede amena7arnos un caballo" Rlgunas de es!as &osiciones &ueden # # &os-(.2   &os-1.1 # &os-(.2   (4 &os-1.91 #(4 &os-(.92  &os-1.1 #(4 &os-(.92  (4 &os-1.91


&osibles oc>o &osiciones desde donde es!ar      

50uera5 del !ablero !ablero-&os-(.2.-&os-1.1. !ablero-&os-(.2.-&os-1.91. !ablero-&os-(.92.-&os-1.1. !ablero-&os-(.92.-&os-1.91.

12

44C;$ 44C;$ 44C;$ 44C;$

QQ QQ QQ QQ

# &os-(.1   &os-1.2   !ablero-&os-(.1.-&os-1.2. 44C;$ # &os-(.1   (4 &os-1.92  !ablero-&os-(.1.-&os-1.92. 44C;$ #(4 &os-(.91  &os-1.2   !ablero-&os-(.91.-&os-1.2. 44C;$ #(4 &os-(.91  (4 &os-1.92  !ablero-&os-(.91.-&os-1.92. 44C;$ amena7a 4 !rue)

QQ QQ QQ $

re!urn #amena7a$) ? ?

%F. /gual que el ejercicio anterior, pero indicando si e!iste jaque mate a las negras. &ac'age bol(=ej3) &ublic class *ain + 0inal 0inal 0inal 0inal 0inal 0inal 0inal

s!a!ic s!a!ic s!a!ic s!a!ic s!a!ic s!a!ic s!a!ic

in! in! in! in! in! in! in!

X491) P4() T41) C42) R43) U4) S4%)

0inal 0inal 0inal 0inal 0inal 0inal

s!a!ic s!a!ic s!a!ic s!a!ic s!a!ic s!a!ic

// igual &ara los negros in! P;41() in! T;411) in! C;412) in! R;413) in! U;41) in! S;41%)


// // // // // // //

esca
13

&ublic s!a!ic void main#!ring-. args$ + in! !ablero-.-. 4 + + X, X, + X, X, + X, X, + X, X, + X, X, +C;, X, + X, P, + X, X,

X, X, X, X, X, X, P, S,

X, X, X, X, X, U;, P;, X,

X, X, X, X, X, X, X, X,

X, X, X, X, X, X, X, X,

X, X, X, X, X, X, X, X,

X?, X?, X?, U;?, X?, X?, X?, X??)

// >ay emos de imaginarlo // ro!ado ( grados >acia la i7
// // // //

una &osible mejora es indicar en la variable amena7a la &rimera &ie7a con!raria nos es!@ acec>ando e indicar con un esca
&osVrey 4 buscaVrey#!ablero$)

i0 # ja

1

numVja
4 4 4 4 4

moverVrey moverVrey moverVrey moverVrey moverVrey

#!ablero, 1, ($) #!ablero, 1, 1$) #!ablero, 91, 91$) #!ablero, 91, ($) #!ablero, 91, 1$)

? // mos!ramos se eis!e amena7a i0 #amena7a$ i0 #numVja
?

s!a!ic boolean jaora iremos viendo las &osibles amena7as una a una: // en &rimer lugar veremos si nos amena7a un caballo: amena7a 4amena7aVcaballo #!ablero, &osVrey$) // RWLSR // miraremos >acia la derec>a #d:1, dy:($ // a

1%

&ie7a 4&rimeraV&ie7a#!ablero, &osVrey, 1, ($) i0 #&ie7a 44U; QQ &ie7a 44T;$ amena7a4!rue)

// miraremos >acia la i7

// miraremos >acia arriba #d:(, dy:1$ // a

// miraremos >acia abajo #d:(, dy:91$ // a

// miraremos en la diagonal derec>a arriba #d:1, dy:1$ // aa abajo #d:1, dy:91$ // a

1=

&ie7a 4&rimeraV&ie7a#!ablero, &osVrey, 91, 1$) i0 #&ie7a 44U; QQ &ie7a 44R;$ amena7a4!rue)

// miraremos en la diagonal i7

// el &osible &eón se encuen!ra arriba a la derec>a o a la i7
? // es!a 0unción busca el rey blanco y devuelve su &osición // en una !abla de dos elemen!os" iendo &osicion-(. la columna y // &osicion-1. la 0ila" s!a!ic in!-. buscaVrey #in! !ablero-.-.$ + in! i,j) in! &osicion-.) &osicion 4 neA in! -2.) 0or #i4() i ) i$ 0or #j4() j ) j$ i0 #!ablero-i.-j.44S$


1

+ &osicion-(. 4i) &osicion-1. 4j) ? re!urn #&osicion$) ? // es!a 0unción busca la &rimera &ie7a a arriba // 1 ( derec>a // 1 91 diagonal derec>a abajo // ( 1 >acia arriba // ( ( ETE CRL ;L E URS` ;;CR // ( 91 >acia abajo // 91 1 diagonal i7acia la i7
// en &rinci&io su&onemos ay ninguna &ie7a

// damos el &rimer &aso: es decir &asamos a la &rimera casilla // des&uKs del rey" &os 4d) &osy 4dy)


1

// mien!ras no nos salgamos del !ablero y no encon!remos una &ie7a A>ile # (4&os  &os4  (4&osy  &osy4  &ie7a 44X$ + &ie7a 4 !ablero-&os.-&osy.) &os 4 d) &osy 4 dy) ? re!urn #&ie7a$) ? s!a!ic boolean amena7aVcaballo #in! !ablero-.-., in! &os-.$ + boolean amena7a40alse) // Way
Uesde la &osición ac!ual vemos los &uede amena7arnos un caballo" Rlgunas de es!as &osiciones &ueden # # &os-(.2   &os-1.1 # &os-(.2   (4 &os-1.91 #(4 &os-(.92  &os-1.1 #(4 &os-(.92  (4 &os-1.91 # &os-(.1   &os-1.2 # &os-(.1   (4 &os-1.92 #(4 &os-(.91  &os-1.2 #(4 &os-(.91  (4 &os-1.92 amena7a 4 !rue)


&osibles oc>o &osiciones desde donde es!ar            

50uera5 del !ablero !ablero-&os-(.2.-&os-1.1. !ablero-&os-(.2.-&os-1.91. !ablero-&os-(.92.-&os-1.1. !ablero-&os-(.92.-&os-1.91. !ablero-&os-(.1.-&os-1.2. !ablero-&os-(.1.-&os-1.92. !ablero-&os-(.91.-&os-1.2. !ablero-&os-(.91.-&os-1.92.

1

44C;$ 44C;$ 44C;$ 44C;$ 44C;$ 44C;$ 44C;$ 44C;$

QQ QQ QQ QQ QQ QQ QQ $

re!urn #amena7a$) ? s!a!ic in! moverVrey #in! !ablero-.-., in! d, in! dy$ + in! eis!eVjaay &eligro y 1 si // el rey es!@ amena7ado o no &uede moverse a es!a // casilla" in! &os-.) &os 4 neA in! -2.) &os 4 buscaVrey#!ablero$)

i0 # (4&os-(.d  &os-(.d  (4&os-1.dy  &os-1.dy  # !ablero-&os-(.d.-&os-1.dy.44X !ablero-&os-(.d.-&os-1.dy.44P; !ablero-&os-(.d.-&os-1.dy.44T; !ablero-&os-(.d.-&os-1.dy.44C; !ablero-&os-(.d.-&os-1.dy.44R; !ablero-&os-(.d.-&os-1.dy.44U; + in! &ie7a)

QQ QQ QQ QQ QQ $ $

// guardamos la &ie7a

1(

//volvemos el rey a su &osición inicial !ablero-&os-(..-&os-1.. 4S) !ablero-&os-(.d.-&os-1.dy. 4&ie7a)

? else // no &odemos mover el rey, en la &rac!ica es!a casilla no es u!ili7able // &or el rey &ara esca&ar""" es lo mismo
? ?


11

Ap8ndice I

Boletines completos

&O2E/N $ Variables y condicionales

). edir los coeficientes de una ecuaci"n se (B grado, y muestre sus soluciones reales. >i no e!isten, debe indicarlo. (. edir el radio de un c2rculo y calcular su área. -C/Dr(. %. edir el radio de una circunferencia y calcular su longitud.

12

)&. edir tres números y mostrarlos ordenados de mayor a menor. )). edir un número entre & y . y decir cuantas cifras tiene. )(. edir un número entre & y . y mostrarlo con las cifras al revés. )%. edir un número entre & y ., decir si es capicúa. )0. edir una nota de & a )& y mostrarla de la forma: /nsuficiente, >uficiente, 1ien... )8. edir el d2a, mes y a;o de una fecha e indicar si la fecha es correcta. >uponiendo todos los meses de %& d2as. )6. edir el d2a, mes y a;o de una fecha e indicar si la fecha es correcta. 7on meses de (G, %& y %) d2as. >in a;os bisiestos. )F. edir el d2a, mes y a;o de una fecha correcta y mostrar la fecha del d2a siguiente. suponer que todos los meses tienen %& d2as. )G. Qdem que el ej. )F, suponiendo que cada mes tiene un número distinto de d2as 3suponer que febrero tiene siempre (G d2as5. ). edir dos fechas y mostrar el número de d2as que hay de diferencia. >uponiendo todos los meses de %& d2as. (&. edir una hora de la forma hora, minutos y segundos, y mostrar la hora en el segundo siguiente. (). edir una nota numérica entera entre & y )&, y mostrar dicha nota de la forma: cero, uno, dos, tres... ((. edir un número de & a  y mostrarlo escrito. or ejemplo, para 86 mostrar: cincuenta y seis.


13

&O2E/N % Condicionales y bucles

).

1

)8. adas las edades y alturas de 8 alumnos, mostrar la edad y la estatura media, la cantidad de alumnos mayores de )G a;os, y la cantidad de alumnos que miden más de ).F8. )6. ide un número 3que debe estar entre & y )&5 y mostrar la tabla de multiplicar de dicho número. )F. @na empresa que se dedica a la venta de desinfectantes necesita un programa para gestionar las facturas. En cada factura figura: el c"digo del art2culo, la cantidad vendida en litros y el precio por litro. >e pide de 8 facturas introducidas: *acturaci"n total, cantidad en litros vendidos del art2culo ) y cuantas facturas se emitieron de más de 6&& U. )G. /gual que el anterior pero suponiendo que no se introduce el precio por litro. >olo e!isten tres productos con precios: )$ &,6 U#litro, ($ % U#litro y %$ ),(8 U#litro. ). adas 6 notas, escribir la cantidad de alumnos aprobados, condicionados 3C05 y suspensos. (&. edir un número O, introducir O sueldos, y mostrar el sueldo má!imo. (). edir )& números, y mostrar al final si se ha introducido alguno negativo. ((. edir 8 calificaciones de alumnos y decir al final si hay algún suspenso. (%. edir 8 números e indicar si alguno es múltiplo de %.


1%

&O2E/N 3 Bucles anidados

). Realiza detenidamente una traza al siguiente programa y muestra cual seria la salida por pantalla: RAVR-+- ejW) 4-R/-1 suma, i, j: EO9ERA 7A+/EOXA -R- i Y$ ) Z->9- 0 -R- j Y$ % Z->9- & /O7 $) suma Y$ iD)&[j escribir 3suma5 */O -R*/O -R*/O (. Realiza una traza del siguiente algoritmo y muestra la salida generada por pantalla. RAVR-+- ejW) 4-R/-1 i, j: EO9ERA 7A+/EOXA -R- i Y$ ) Z->9- % j Y$ i[) +/EO9R-> j Y 0 escribir 3j$i5 j Y$ j[) */O +/EO9R-> */O -R*/O %. ise;a una aplicaci"n que muestre las tablas de multiplicar del ) al )&.


1=

0. ibuja un cuadrado de n elementos de lado utilizando D. 8. Oecesitamos mostrar un contador con 8 d2gitos 3\$\$\$\$\5, que muestre los números del &$&$&$&$& al $$$$, con la particularidad que cada vez que aparezca un % lo sustituya por una E. 6. Realizar un programa que nos pida un número n, y nos diga cuantos números hay entre ) y n que son primos.


1

&O2E/N * /ablas ).

1

)&. Qdem, desplazar O posiciones 3O es introducido por el

usuario5.

)). e debe mostrar la posici"n en que se encuentra. >i no está, indicarlo con un mensaje. )6. ûeremos desarrollar una aplicaci"n que nos ayude a gestionar las notas de un centro educativo. 7ada grupo 3o clase5 está compuesto por 8 alumnos. >e pide leer las notas del primer, segundo y tercer trimestre de un grupo. ebemos mostrar al final: la nota media del grupo en cada trimestre, y la media del alumno que se encuentra en la posici"n O 3O se lee por teclado5.


1

&O2E/N , Tablas n-dimensionales

). 7rear una tabla bidimensional de tama;o 8!8 y rellenarla de la siguiente forma: la posici"n 9Jn,mK debe contener n[m. espués se debe mostrar su contenido. (. 7rear y cargar una tabla de tama;o 0!0 y decir si es simétrica o no, es decir, si se obtiene la misma tabla al cambiar filas por columnas. %. 7rear y cargar dos matrices de tama;o %!%, sumarlas y mostrar su suma. 0. 7rear y cargar una tabla de tama;o %!%, trasponerla y mostrarla. 8. 7rear una tabla de tama;o F!F y rellenarla de forma que los elementos de la diagonal principal sean ) y el resto &. 6. 7rear y cargar una tabla de tama;o )&!)&, mostrar la suma de cada fila y de cada columna. F. utilizando dos tablas de tama;o 8! y !8, cargar la primera y trasponerla en la segunda. G. 7rear una matriz SmarcoT de tama;o G!6: todos sus elementos deben ser & salvo los de los bordes que deben ser ). +ostrarla. . Zacer lo mismo que el ejercicio anterior, pero con una matriz !!. Es decir, creamos un cubo con las caras puestas a ) y el interior a &. )&. i, m, a: EO9ERA> t: 9-1<- J8K EO9ERA> 7A+/EOXA -R- i& Z->9- 0 leer 3tJiK5


RAVR-+- Ej)&b 4-R/-1 n, i: EO9ERA> a, b: 9-1<- J)&&K EO9ERA> 7A+/EOXA n  )&

2((

*/O -Rm  & -R- i  & Z->9- 0 >/ tJiK _ m m  tJiK */O >/ */O -Ra  tJ0$mK tJ0$mK  tJmK tJmK  a -R- i  & Z->9- 0 escribir 3tJiK5 */O -R*/O RAVR-+atos de entrada: $0, &, ), % y (.

-R- i& Z->9- n$) leer 3aJiK5 */O -R-R- i  & Z->9- n#( bJiK  aJn$)$iK bJn$)$iK  aJiK */O -R-R- i  & Z->9- n$) >/ i mod ( C & escribir 3aJiK5 >/OA escribir 3bJiK5 */O >/ */O -R*/O RAVR-+atos de entrada: 6, (, G, , (, 8, G, (, 6 y ).

))$>e pretende realizar un programa para gestionar la lista de participaciones en una competici"n de salto de longitud. El número de plazas disponible es de )&. >us datos se irán introduciendo en el mismo orden que vayan inscribiéndose los atletas. ise;ar el programa que muestre las siguientes opciones: )$ ($ %$ 0$

/nscribir un participante. +ostrar listado de datos. +ostrar listado por marcas. *inalizar el programa.

>i se selecciona ), se introducirán los datos de uno de los participantes: Oombre, mejor marca del (&&(, mejor marca del (&&) y mejor marca del (&&&. >i se elige la opci"n (, se debe mostrar un listado por número de dorsal.

2(1

&O2E/N + Funciones

). Realizar una funci"n, a la que se le pase como parámetro un número O, y muestre por pantalla O veces, el mensaje: S+"dulo ejecutándoseT (. ise;ar una funci"n que tenga como parámetros dos números, y que calcule el má!imo. %. Qdem una versi"n que calcule el má!imo de % números. 0. Qdem una versi"n que calcule el má!imo de una tabla de n elementos. 8. *unci"n a la que se le pasan dos enteros y muestra todos los números comprendidos entre ellos, inclusive. 6. *unci"n que muestra en pantalla el doble del valor que se le pasa como parámetro. F. Realizar una funci"n que calcule 3muestre en pantalla5 el área o el volumen de un cilindro, según se especifique. ara distinguir un caso de otro se le pasará el carácter à` 3para área5 o `v` 3para el volumen5. -demás hemos de pasarle a la funci"n el radio y la altura. G. Qdem que devuelva una tabla con el área y el volumen. . +"dulo al que se le pasa un número entero y devuelve el número de divisores primos que tiene. )&.Qdem dise;ar una funci"n que devuelve una tabla con los divisores. )).Escribir una funci"n que calcule el má!imo común divisor de dos números. )(.Qdem con tres números.


2(2

)%.Qdem con una tabla. )0.Escribir una funci"n que calcule el m2nimo común múltiplo de dos números. )8.Qdem con tres números. )6.Qdem con una tabla. )F.Escriba una funci"n que decida si dos números enteros positivos son amigos. os números son amigos, si la suma de sus divisores 3distintos de ellos mismos5 son iguales. )G.ise;a una funci"n 3en adelante D75 que decida si un número es primo. ).@* que calcule a n. (&.@* que muestre en binario un número entre & y (88. (). Escriba una funci"n que sume los n primeros números impares. ((. ado el valor de un ángulo, ser2a interesante saber su seno, coseno y tangente. Escribir una funci"n que muestre en pantalla los datos anteriores. (%. ise;ar una funci"n que calcule la distancia eucl2dea de dos puntos. (0. @* a la que se le pasa como parámetro una tabla que debe rellenar. >e leerá por teclado una serie de números: guardaremos solo los pares e ignoraremos los impares. 9ambién hay que devolver la cantidad de impares ignorados. (8. @* a la que se le pasa una tabla de enteros y un número. ebemos buscar el número en la tabla e indicar si se encuentra o no.


2(3

(6. /gual que el ejercicio anterior, pero suponiendo que la tabla no está siempre llena, y el número de elementos se pasa también como parámetro. (F.ise;ar la funci"n operaWtabla, a la que se le pasa dos tablas, el número de elementos útiles y que operaci"n se desea realizar: sumar, restar, multiplicar o dividir 3mediante un carácter: `s`, `r`, `m`, `d`5.

2(

icho m"dulo debe devolver un valor booleano, que indique si el rey negro está amenazado. %F. /gual que el ejercicio anterior, pero indicando si e!iste jaque mate a las negras.


2(%

Ap8ndice II Clase Entrada im&or! java"io"8) &ublic class En!rada + s!a!ic !ring iniciali7ar#$+ !ring bu7on455) 6n&u!!reamSeader 0lujo4neA 6n&u!!reamSeader#ys!em"in$) Bu00eredSeader !eclado4neA Bu00eredSeader#0lujo$) !ry+ bu7on4!eclado"readine#$) ? ca!c>#Ece&!ion e$+ ys!em"ou!"a&&end#5En!rada incorrec!a$5$) ? re!urn bu7on) ? s!a!ic in! en!ero#$+ in! valor46n!eger"&arse6n!#iniciali7ar#$$) re!urn valor) ? s!a!ic double real#$+ double valor4Uouble"&arseUouble#iniciali7ar#$$)


2(=

Ejercicios-de-Programacion-en-Java.pdf

Recommend Documents