Программа метеостанция - Turbo Pascal

Формулировка задачи:

На трёх метеостанциях в течение 4-х дней измеряли температуру. Показания термометров свели в таблицу. Требуется: 3) Распечатать всю таблицу. 4) Распечатать, в какие дни и на каких метеостанциях температура была в диапазоне 24 – 26 градусов тепла.

uses Crt;
Var t: array [1..3, 1..4] of Integer;
          i, j: Integer;
begin  {Значения эл. массива задаём примитивным присваиванием}
ClrScr;
  t[1,1]:= -8;  t[1,2]:= -14;  t[1,3]:= -19;  t[1,4]:= -18;
t[2,1]:= 25;  t[2,2]:= 28;   t[2,3]:= 26;   t[2,4]:= 20;
t[3,1]:= 11;  t[3,2]:= 18;   t[3,3]:= 20;   t[3,4]:= 25;
      {Распечатаем всю таблицу]
for i:= 1 to 3 do begin   for j:= 1 to 4 begin
    Write('  ', t[i, j]:3);
    end;  WriteLn;  end;
       {Распечатаем станции и дни с  t- ой 24 – 26 градусов}
for i:= 1 to 3 do begin   for j:= 1 to 4 do begin
if (t[i,j] > 24) AND (t[i, j]  < = 26) then
    end;  end;
Writeln(' Номера МетеоСт и дни с t- ой 24 – 26 град.: ');
WriteLn(' Станция ' , i,  '  дни  ' , j);
ReadLn
end.

На выходе имеем:

-8  -14  -19  -18
25   28   26   20
11   18   20   25
Номера МетеоСт и дни с t- ой 24 – 26 град.:
Станция  3   дни  4

Почему же для температуры 25 и 26 второго ряд не вышли соответствующие номера? Условия то выполняются.

Решение задачи: «Программа метеостанция»

Листинг программы

  WriteLn('Метеостанции с t 24-26 C':);
  for i:=1 to 3 do
    for j:=1 to 4 do
      if (t[i,j]>=24) and (t[i,j]<=26) then
        WriteLn('Станция: ',i,' день: ',j);

Объяснение кода листинга программы

Программа выводит текст Метеостанции с t 24-26 C
Затем происходит два вложенных цикла. Первый цикл выполняется 3 раза, второй - 4 раза.
Переменная i в первом цикле изменяется от 1 до 3, а переменная j во втором цикле изменяется от 1 до 4.
Если условие (t[i,j]>=24) and (t[i,j]<=26) истинно, то происходит вывод на экран информации о станции и дне.
Значение переменной t находится в массиве с именем t.
Выводится название станции (i) и номер дня (j).
Значения переменных i и j соответствуют индексам массива t.
Значение переменной t находится в ячейке массива, соответствующей индексам i и j.
Выводится на экран информация о станции и дне, если значение t находится в диапазоне от 24 до 26.
Если условие ложно, то информация о станции и дне не выводится на экран.
В конце программы нет команды остановки или завершения работы.