clc

clear

n=input( Total node= )

if n > 6

error( not <6 )

end

alphabets= char(65:1:65+n)

adj=zeros(n,n)

for p=1:n

for q=1:n

adj(p,q)=input([ Enter Weight between [ ,alphabets(p), ] , [ ,alphabets(q), ] = ])

end

end

for p=1:n

a(p).status=0 -clc

clear

n=input( Total node=　)

if n > 6

　　error( not <6　 )

end

alphabets= char(65:1:65+n)

adj=zeros(n,n)

for p=1:n

　　for q=1:n

　　　　adj(p,q)=input([ Enter Weight between [ ,alphabets(p), ] , [ ,alphabets(q), ] =　])

　　end

end

for p=1:n

　　a(p).status=0