Pascal/Turbo Pascal - Necesito el Codigo

Necesito un codigo que simule lo de una biblioteca.
EJ:

Menu
1)Ingresar un libro nuevo
2)Buscar libro
3)Listar todos los libros
4)Borrar libro
5)Salir

Si la opcion es 1:
Codigo:
Nombre del libro:
Autor:
Materia:
Fecha:
Si la opcion es 2:
Buscar libro por codigo
Si la opcion es 3:
Listar todos los libros
Si la opcion es 4:
Borrar libro por codigo
Si la opcion es 5:
Salir del programa

Tiene que ser solo con arreglos.
Les agradezco de antemano su ayuda