Pascal/Turbo Pascal - Control por tiempo

Necesito hacer un reloj que esté como guardian para poder validar en base a el un programa que registre vuelos comerciales.

Yo supongo que "reloj" será una function con 3 for anidados, así que quiero que me corrijan si me equivoco

function reloj;
var i,j,k:integer;
begin
for i:= 0 to 12 do
for j:=0 to 59 do
for k:= o to 59 do
begin
reloj:=(i,j,k);
delay(1000);
end;
end;

Y luego valido, agradecería que me indicaran las faltas de sintaxis, y laforma correcta para validarlo en el if, la funcion "reloj"

Gracias.

Errores tienes varios.
La declaración de la function no tiene tipo de retorno, esa es la primera.
Esta sentencia:
reloj:=(i,j,k);
no es válida.
Ignoro cuál es tu estrategia para abordar el problema por lo que no te puedo dar solución a estor errores.