Pascal/Turbo Pascal - como uso el goto?

Necesito ayuda con el Goto en Turbo Pascal 7.0.
Yo sé que tengo poner Label antes que las constantes y las variables pero no se cómo definir la label, no sé que ponerle.
Es que estoy haciendo un programa que tiene un menú de opciones y un case. Yo quiero que el programa haga todo en orden normal y que cuando realice una de las opciones, le pregunte al usuario que si quiere realizar algo más y si responde que "No", el programa acabe como siempre; pero si responde que "Sí" el programa haga un goto para regresarse al menú de opciones.
PD: El menú de opciones y las opciones las ingresé con writeln
mi correo es: [email protected]

hola
no es muy recomendable usar goto, por que mejor no usas un repeat until y en medio l agregas un case por ejemplo

repeat
{por ejemplo}
write("Altas -----------------------[1]");
write("bajas-----------------------[2]");
write("modificaciones----------[3]");
write("Consultas-----------------[4]");
write("Salir-------------------------[5]");

read(opcion);

case opcion of
1:begin
end;
2:begin
end;
3:begin
end;
4:begin
end;
until opcion = 5;

saludos
es solo un ejemplo , podrías idear algo mejor