Turbo Pascal

also ich habe ein Program das heißt liste, das ist auch komplett richitg und dann ein program das heißt schlange, dass ist mit liste verbunden und auch komplet richitg:
naja die probleme hab ich dann bei dem program wo die ganzen Procedures drinnen stehen und zwar sieht das so aus, aber ich bin mir jez ncith sicher ob noch ein Hauptprogram fehlt oder ob ich es erst gar nicht brauch und mit welchen abkürzung ich es hinten speicher, zb. inc oder so :s

Program Schlangestart;
TYPE s_elementtyp = CHAR;
{$ I Schlange.INC }
VAR s: schlangentyp;
b: char;
PROCEDURE eingabe;
BEGIN s_create (s);
REPEAT
write (`Buchstabe: `);
readln (b);
s_enqueue (s, element);
write (`noch ein Buchstabe? <j/n>`);
readln (taste);
UNTIL taste = `n`;
END;

PROCEDUR ausgabe;
BEGIN clrscr;
REPEAT
s_show (s, element);
writeln (element);
s_dequeue (s);
UNTIL s_empty;
readln;
END;