Заданы три числа 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 gt;= 0) and (hh lt;= 23) and (mm gt;= 0) and (mm lt;= 59) and (ss gt;= 0) and (ss lt;= 59) then
         writeln(Корректно)
   else
         writeln(Не корректно);
end.