Postagens
Não informado
como fazer uma arvore utilizando a estrutura abaixo (criarArvore ,inserir na arvore e imprimir
Pno = ^Tno ;
Tno = record
valor : String ;
filhos : array[1..2] of Pno ;
end;
TArvore = record
raiz : Pno ;
end;
e nao utilizando esta
TINfo = string;
PNo = ^TNo;
TNo = record
info : TINfo;
esq, dir : PNo;
