Diagrama de Dijkstra

# # # #

include include include include

#

struct vertice { char nod; int marca; struct vertice *sig; struct arco *arc; }; struct arco { struct vertice *ver; int marca; int suma; int clave; struct arco *sig; };

struct vertice *pri, *nue, *aux, *ult, *aux2; struct arco *nueArc, *auxArc, *arcen, *auxArc2, *antArc; char aux!od, aux!od2, ban2, let; int ban, enlace, ban", ban, num$er; void void void void void void void void

actuali%ar&os '(; crear$ertice'(; enla%ar$ertices'(; enla%ar'(; listarAd)acencia'(; obtenerArcoenor'(; listarAd)acenciarim '(; suma&aminos'(;

void crear$ertice '( { s)stem '+cls+(; i 'pri -- !//({ pri - ne0 vertice; cout << +1l rao no tiene vertices3n4igite la letra del rimer !odo5 +; cin >> pri6>nod; pri6>marca - 7; pri6>arc - !//; pri6>sig - !//; ult - pri; cout << +3n!odo registrado correctamente.+; } else { cout << +4igite la letra del vertice5 +; cin >> let; do { aux - pri; ban - 7; 0hile 'aux 8- !//({ i 'aux6>nod -- let({ ban - 9; }

aux - aux6>sig; } i 'ban -- 9( { cout << +3n1sa letra clave )a ue usada, igual :ue las siguientes53n+; aux - pri; 0hile 'aux 8- !//( { cout << aux6>nod << + +; aux - aux6>sig; } cout << +3n4igita una letra dierente5 +; cin >> let; } }0hile 'ban -- 9(; nue - ne0 vertice; nue6>nod - let; nue6>marca - 7; nue6>sig - !//; nue6>arc - !//; ult6>sig - nue; ult - nue; cout << +3n!odo registrado correctamente.+; *cout << +3nAhora :ue existe un nuevo vertice desea crear enlaces sn5 +; cin >> ban2; 0hile 'ban2 -- =s=({ enla%ar$ertices'(; cout << +3n� 4esea crear otro enlace sn5 +; cin >> ban2; } * } getch'(; } void enla%ar$ertices '( { s)stem '+cls+(; i 'pri 8- !//({ aux - pri; 0hile 'aux 8- !//({ cout << aux6>nod << +3n+; aux - aux6>sig; } cout << +3n4igite la letra del nodo al cual desea enla%ar5 +; cin >> aux!od; ban - 7; 0hile 'ban -- 7({ aux - pri; 0hile 'aux 8- !//  ban -- 7({ i 'aux6>nod -- aux!od({ ban - 9; } aux - aux6>sig; } i 'ban -- 7({ cout << +3n1l nodo no existe3nor avor digite uno de los listados anteriormente5 +; cin >> aux!od; }

} cout << +3n1stos son los nodos disponibles para hacer el respectivo enlace53n+; aux - pri; aux2 - pri; 0hile 'aux26>nod 8- aux!od({ aux2 - aux26>sig; } 0hile 'aux 8- !//({ i 'aux6>nod 8- aux!od({ auxArc - aux26>arc; ban - 7; 0hile 'auxArc 8- !//  ban -- 7({ i 'aux6>nod -- auxArc6>ver6>nod({ ban - 9; } auxArc - auxArc6>sig; } i 'ban -- 7({ cout << aux6>nod << +3n+; } } aux - aux6>sig; } cout << +3n4igite la letra del nodo al cual desea enla%ar el nodo elegido5 +; cin >> aux!od2; ban - 7; 0hile 'ban -- 7({ aux - pri; 0hile 'aux!od2 -- aux!od({ cout << +3n!o se puede hacer ese enlace3n4igite otro nodo disponible5 +; cin >> aux!od2; } 0hile 'aux 8- !//  ban -- 7({ i 'aux6>nod -- aux!od2({ ban - 9; } aux - aux6>sig; } i 'ban -- 7({ cout << +3n1l nodo no existe3nor avor digite uno de los listados anteriormente5 +; cin >> aux!od2; } } aux - pri; 0hile 'aux6>nod 8- aux!od({ aux - aux6>sig; } auxArc - aux6>arc; ban" - 7; 0hile 'auxArc 8- !//  ban" -- 7({ i 'auxArc6>ver6>nod -- aux!od2({ ban" - 9; } auxArc - auxArc6>sig;

} i 'ban" -- 7({ enla%ar'(; cout << +3n1nlace creado correctamente.+; } else { cout << +3n1se enlace )a existe. &ompruebe el enlace la proxima ve%.+; }

} } void enla%ar '({ aux - pri; 0hile 'aux6>nod 8- aux!od({ aux - aux6>sig; } aux2 - pri; 0hile 'aux26>nod 8- aux!od2({ aux2 - aux26>sig; } i 'aux6>arc -- !//({ nueArc - ne0 arco; nueArc6>ver - aux2; cout << +3n4igite el valor del enlace5 +; cin >> enlace; 0hile 'nueArc6>clave < 7({ cout << +3n1l valor debe ser positivo3n4igite el valor del enlace5 +; cin >> enlace; } nueArc6>clave - enlace; nueArc6>marca - 7; nueArc6>suma - 7; nueArc6>sig - !//; aux6>arc - nueArc; i 'aux26>arc -- !//({ nueArc - ne0 arco; nueArc6>ver - aux; nueArc6>clave - enlace; nueArc6>marca - 7; nueArc6>suma - 7; nueArc6>sig - !//; aux26>arc - nueArc; } else { nueArc - ne0 arco; nueArc6>ver - aux; nueArc6>clave - enlace; nueArc6>marca - 7; nueArc6>suma - 7; nueArc6>sig - !//; auxArc - aux26>arc; 0hile 'auxArc6>sig 8- !//({ auxArc - auxArc6>sig; } auxArc6>sig - nueArc; } } else {

nueArc - ne0 arco; nueArc6>ver - aux2; cout << +3n4igite el valor del enlace5 +; cin >> enlace; 0hile 'enlace < 7({ cout << +3n1l valor debe ser positivo3n4igite el valor del enlace5 +; cin >> enlace; } nueArc6>clave - enlace; nueArc6>marca - 7; nueArc6>suma - 7; nueArc6>sig - !//; auxArc - aux6>arc; 0hile 'auxArc6>sig 8- !//({ auxArc - auxArc6>sig; } auxArc6>sig - nueArc; i 'aux26>arc -- !//({ nueArc - ne0 arco; nueArc6>ver - aux; nueArc6>clave - enlace; nueArc6>marca - 7; nueArc6>suma - 7; nueArc6>sig - !//; aux26>arc - nueArc; } else { nueArc - ne0 arco; nueArc6>ver - aux; nueArc6>clave - enlace; nueArc6>marca - 7; nueArc6>suma - 7; nueArc6>sig - !//; auxArc - aux26>arc; 0hile 'auxArc6>sig 8- !//({ auxArc - auxArc6>sig; } auxArc6>sig - nueArc; } } } void obtenerArcoenor '( { aux2 - pri; arcen - !//; 0hile 'aux2 8- !//({ i 'aux26>marca -- 9({ auxArc - aux26>arc; 0hile 'auxArc 8- !//({ i 'auxArc6>marca -- 9({ i 'arcen -- !//({ arcen - auxArc; } else{ i 'auxArc6>clave < arcen6>clave({ arcen - auxArc; } }

} auxArc - auxArc6>sig; } } aux2 - aux26>sig; } arcen6>marca - "; arcen6>ver6>marca - 9; } void obtener?umaenor '( { aux2 - pri; arcen - !//; 0hile 'aux2 8- !//({ i 'aux26>marca -- 9({ auxArc - aux26>arc; 0hile 'auxArc 8- !//({ i 'auxArc6>marca -- 9({ i 'arcen -- !//({ arcen - auxArc; } else{ i 'auxArc6>suma < arcen6>suma({ arcen - auxArc; } } } auxArc - auxArc6>sig; } } aux2 - aux26>sig; } arcen6>marca - "; arcen6>ver6>marca - 9; auxArc - arcen6>ver6>arc; 0hile 'auxArc 8- !//({ auxArc6>suma - arcen6>suma @ auxArc6>clave; auxArc - auxArc6>sig; } } void paso2 '({ obtenerArcoenor'(; cout << +3n1l arco menor es5 +<< arcen6>ver6>nod << + vale5 + << arcen6>clave; getch'(; aux - arcen6>ver; auxArc - aux6>arc; 0hile 'auxArc 8- !//({ i 'auxArc6>ver6>marca -- 7({ aux2 - pri; 0hile 'aux2 8- !//({ i 'aux2 8- aux  aux26>marca -- 9({ auxArc2 - aux26>arc; 0hile 'auxArc2 8- !//({ i 'auxArc6>ver6>nod -- auxArc26>ver6 >nod({ i 'auxArc6>clave < auxArc26 >clave({

auxArc26>marca - 2; auxArc6>marca - 9; } else { auxArc6>marca - 2; auxArc26>marca - 9; } } auxArc2 - auxArc26>sig; } } aux2 - aux26>sig; } i 'auxArc6>marca -- 7({ auxArc6>marca - 9; } } else { auxArc6>marca - 2; } auxArc - auxArc6>sig; } }

void paso24iBstra '( { obtener?umaenor'(; cout << +3n/a sumatoria hasta el arco + << arcen6>ver6>nod << + es5 +<< arcen6>suma; getch'(; aux - arcen6>ver; auxArc - aux6>arc; 0hile 'auxArc 8- !//({ i 'auxArc6>ver6>marca -- 7({ aux2 - pri; 0hile 'aux2 8- !//({ i 'aux2 8- aux  aux26>marca -- 9({ auxArc2 - aux26>arc; 0hile 'auxArc2 8- !//({ i 'auxArc6>ver6>nod -- auxArc26>ver6 >nod({ i 'auxArc6>suma < auxArc26 >suma({ auxArc26>marca - 2; auxArc6>marca - 9; } else { auxArc6>marca - 2; auxArc26>marca - 9; } } auxArc2 - auxArc26>sig; } } aux2 - aux26>sig; } i 'auxArc6>marca -- 7({ auxArc6>marca - 9; auxArc6>suma - arcen6>suma @ auxArc6>clave;

} } else { auxArc6>marca - 2; } auxArc - auxArc6>sig; } } void algoritmorim '( { s)stem'+cls+(; i 'pri 8- !//({ actuali%ar&os'(; cout << +4igite el vertice inicial5 +; cin >> aux!od; ban - 7; 0hile 'ban -- 7({ aux - pri; 0hile 'aux 8- !//({ i 'aux6>nod -- aux!od({ ban - 9; } aux - aux6>sig; } i 'ban -- 7({ cout << +3n!o existe un nodo con esa letra.+; aux - pri; cout << +3n666/ista de !odos6663n+; 0hile 'aux 8- !//({ cout << aux6>nod << + +; aux - aux6>sig; } cout << +3n4igite uno de los anteriores nodos5 +; cin >> aux!od; } } aux - pri; 0hile 'aux6>nod 8- aux!od({ aux - aux6>sig; } aux6>marca - 9; auxArc - aux6>arc; 0hile 'auxArc 8- !//({ auxArc6>marca - 9; auxArc - auxArc6>sig; } cout << +3n?e han marcado todos los arcos para el vertice elegido.+; ban2 - 9; 0hile 'ban2 -- 9({ paso2'(; ban2 - 7; aux - pri; 0hile 'aux 8- !//({ i 'aux6>marca -- 7({ ban2 - 9; } aux - aux6>sig; } }

}

listarAd)acenciarim '(; suma&aminos'(; } getch'(;

void listarAd)acencia '( { s)stem '+cls+(; i 'pri 8- !//({ aux - pri; cout << +666/ista de Ad)acencia6663n+; 0hile 'aux 8- !//({ auxArc - aux6>arc; cout << +3nC3n+ << aux6>nod << +6>+; 0hile 'auxArc 8- !//({ cout << auxArc6>ver6>nod << + +; auxArc - auxArc6>sig; } aux - aux6>sig; } getch'(; } } void suma&aminos '( { aux - pri; int suma - 7; 0hile 'aux 8- !//({ auxArc - aux6>arc; 0hile 'auxArc 8- !//({ i 'auxArc6>marca -- "({ suma - suma @ auxArc6>clave; } auxArc - auxArc6>sig; } aux - aux6>sig; } cout << +3n/a suma de los caminos es5 + << suma; } void listarAd)acenciarim '( { i 'pri 8- !//({ aux - pri; cout << +3n666/ista de Ad)acencia6663n+; 0hile 'aux 8- !//({ auxArc - aux6>arc; cout << +3nC3n+ << aux6>nod << +6>+; 0hile 'auxArc 8- !//({ i 'auxArc6>marca -- "( cout << auxArc6>ver6>nod << + +; auxArc - auxArc6>sig; } aux - aux6>sig; } } }

void liberaremoria '( {

}

i 'pri 8- !//({ aux - pri; 0hile 'aux 8- !//({ auxArc - aux6>arc; 0hile 'auxArc 8- !//({ aux6>arc - aux6>arc6>sig; delete auxArc; auxArc - aux6>arc; } pri - pri6>sig; delete aux; aux - pri; } } cout << +emoria /ibre+; getch'(;

void algoritmo4iBstra '( { s)stem'+cls+(; i 'pri 8- !//({ actuali%ar&os '(; cout << +4igite el vertice inicial5 +; cin >> aux!od; ban - 7; 0hile 'ban -- 7({ aux - pri; 0hile 'aux 8- !//({ i 'aux6>nod -- aux!od({ ban - 9; } aux - aux6>sig; } i 'ban -- 7({ cout << +3n!o existe un nodo con esa letra.+; aux - pri; cout << +3n666/ista de !odos6663n+; 0hile 'aux 8- !//({ cout << aux6>nod << + +; aux - aux6>sig; } cout << +3n4igite uno de los anteriores nodos5 +; cin >> aux!od; } } aux - pri; 0hile 'aux6>nod 8- aux!od({ aux - aux6>sig; } aux6>marca - 9; auxArc - aux6>arc; 0hile 'auxArc 8- !//({ auxArc6>marca - 9; auxArc6>suma - auxArc6>clave; auxArc - auxArc6>sig; } cout << +3n?e han tra%ado todos los arcos para el vertice elegido.+; ban2 - 9;

}

0hile 'ban2 -- 9({ paso24iBstra'(; ban2 - 7; aux - pri; 0hile 'aux 8- !//({ i 'aux6>marca -- 7({ ban2 - 9; } aux - aux6>sig; } } listarAd)acenciarim '(; } getch'(;

void actuali%ar&os '( { aux - pri; 0hile 'aux 8- !//({ auxArc - aux6>arc; 0hile 'auxArc 8- !//({ auxArc6>marca - 7; auxArc6>suma - 7; auxArc - auxArc6>sig; } aux6>marca - 7; aux - aux6>sig; } } main '({ int op - 7; do{ s)stem'+cls+(; cout<<+666!D$1E?D4A4 41 &AFA/D666+; cout<<+3n666GA&/HA4 41 D!1!D1EDA666+; cout<<+3n D!1!D1EDA 41 ?D?H1A?+; cout<<+3n666HA//1E 7". EAGI?666+; cout<<+3nEeali%ado or5+; cout<<+3n3nario Glore%+; cout<<+3narcelo Habango+; cout<<+3n3n666661!66666+; cout<<+3n9. &rear $ertices.+; cout<<+3n2. 1nla%ar $ertices.+; cout<<+3n". /istar $ertices con su lista de ad)acencia.+; cout<<+3n. Algoritmo de rim.+; cout<<+3nJ. Algoritmo de 4iBstra.+; cout<<+3nK. /iberar emoria.+; cout<<+3nL. ?alir+; cout<<+3n3n4igite la Ipcion5-->+; cin>>op; 0hile 'op>L({ cout << +1sa opcion no existe digite un numero del 9 al L5 +; cin >> op; } s0itch'op({ case 95 crear$ertice'(; breaB; case 25 enla%ar$ertices'(; getch'(; breaB; case "5 listarAd)acencia'(; breaB;

case case case case }

} }0hile'op
5 J5 K5 L5

algoritmorim'(; breaB; algoritmo4iBstra'(; breaB; liberaremoria '(; breaB; exit '7(;

Diagrama de Dijkstra

Recommend Documents