(Click en la imagen para descargar las 3 unidades y el ejecutable)
Alumno=Record
Matricula:Integer;
Nombre:Str30;
Promedio:Integer;
Creditos:Integer;
Semestre:Integer;
Procedure CreaIndice
Procedure AgregaAlumno
ProcedureConsultaAlumno
ProcedureEliminaAlumno
En otro archivo, escribir el programa principal. El programa principal va a hacer uso de las dos unidades, la que tiene el codigo de acceso al archivo y la que tiene los codigos para el acceso al arbol.
el programa principal hace las siguientes tareas:
Verifica que exista el archivo con los registros, si no existe, lo crea.
Llama ala funcion que crea el indice, la que crea el arbol ABB. Hay que tener declarado el apuntador al arbol, por ejemplo: VAR ARBOL: ApNodo.
Escribe el menu con las opciones para el acceso al archivo, Agregar, consultar, eliminar y mostrar indice.
No hay comentarios:
Publicar un comentario