Todos los grafos completos son balanceados:

gr_balanceado(gr_completo(7b))

Booleano: verdadero

Grafo en JMEScriptGUI con visor de grafos v0.1:

Digrafo de 8 nodos no balanceado:

gr_balanceado(dic('etiquetas',['v1','v5','v3','v4','v8','v2','v7','v6'],'ady',[[0,1,0,0,0,0,0,0],[0,0,1,0,0,0,0,0],[0,0,0,1,0,0,0,0],[0,1,0,0,1,0,0,0],[1,0,0,0,0,1,0,1],[0,0,0,0,0,0,1,0],[0,0,1,0,1,0,0,0],[1,0,0,0,0,0,0,0]],'esDirigido',verdadero))

Booleano: falso

Grafo en JMEScriptGUI con visor de grafos v0.1: