Заданы три числа hh, mm, ss. Определите, является ли hh : mm : ss - корректным показанием электронных часов, т.е. число hh должно быть в диапазоне от 0 до 23, числа mm и ss должны быть в диапазоне от 0 до 59.

Var
  hh, mm, ss: integer;
begin
   readln(hh, mm, ss);
   if (hh in [0..23]) and (mm in [0..59]) and (ss in [0..59]) then
         writeln(Корректно)
   else
         writeln(Не корректно);
end.

Либо можно так:

var
  hh, mm, ss: integer;
begin
   readln(hh, mm, ss);
   if (hh >= 0) and (hh = 0) and (mm = 0) and (ss          writeln(Корректно)
   else
         writeln(Не корректно);
end.