Delphi - arboles binarios

   
Vista:

arboles binarios

Publicado por Roxana (3 intervenciones) el 10/10/2008 02:21:31
Alguien me puede decir como se trabajan los arboles binarios en delphi?
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:arboles binarios

Publicado por E.T. (1108 intervenciones) el 10/10/2008 19:03:03
Aqui en la web, te encuentras un ejemplo muy bueno:

http://www.lawebdelprogramador.com/codigo/enlace.php?idp=1030&id=23&texto=Delphi

El árbol funciona más o menos así:

Si insertamos un 10, éste será el nodo raiz, luego numeros

El arbol se vería así: más o menos como lo siguiente

Al insertar el 10
**********************************************10

Al insertar 1:
**********************************************10
*********************************************/
*******************************************1

Al insertar 19:
**********************************************10
*********************************************/ ***
*******************************************1******19

Al insertar 5:
**********************************************10
*********************************************/ ***
*******************************************1******19
********************************************
*********************************************5

Al insertar 0:
**********************************************10
*********************************************/ ***
*******************************************1******19
******************************************/ *
*****************************************0***5

Al insertar 18:
**********************************************10
*******************************************/ ******
****************************************1**********19
***************************************/ * *********/
*************************************0****5*****18

Al insertar -1:
**********************************************10
*******************************************/ ******
****************************************1**********19
***************************************/ * *********/
*************************************0****5*****18
************************************/
**********************************-1

Al insertar 17:
**********************************************10
*******************************************/ ******
****************************************1**********19
***************************************/ * *********/
*************************************0****5*****18
************************************/***********/
**********************************-1**********17

Al insertar 20:
**********************************************10
*******************************************/ ******
****************************************1**********19
***************************************/ * ********/ ***
*************************************0****5*****18****20
*********************************** / ***********/
**********************************-1**********17
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
Te mando un link de mi código fuente en delphi, hay 2 ejemplos uno de visualizacion normal y otro real.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
Te mando un link de mi código fuente en delphi, hay 2 ejemplos uno de visualizacion normal y otro real.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar