Pascal/Turbo Pascal - Ayuda urgente por favor

Tengo que trabajar si o si con Listas montadas sobre arreglos y no entiendo algunos procedimientos o funciones como hacerlos.

Tengo declarado

Type TNodo=Record
valor:integer;
sig:integer;
End;

TLista=Array[0..1000] of TNodo;

Var Lista:TLista;
cabeza:integer;

y necesitaria hacer

Procedure InsertarAlFinal(var Lista:TLista; var cabeza:integer; Elemento:Integer);
Procedure BorrarNodoPorContenido(var Lista:TLista; var cabeza:integer; valor:Integer);
Procedure BorrarUltimoNodo(var Lista:TLista; var cabeza:Integer);

Necesitario tenerlo si o si para mañana!!!! Gracias