i := getMonth(getCurrentTime);
k:=0;
while i<>2 do //<<-----------------------
begin
k := k + mm[i];
i := i - 1;
end;
На стрелке код зацикливается, если
i < 3, естественно, до вывода дело не доходит.
Похоже, в j2me месяцы с нуля нумереются, сейчас февраль и у меня единицу выдает, а если в указанную точку подать i=1, то i никогда не станет равно 2.