[ALexandr555]

Код:

type
  TZombi = record
    liv : Boolean;
    distanse: real;
    poyavlenie: integer;
 end;
var
m: array of TZombi;

Код:

for i:=1 to zomb do
 begin
  if i<>zomb  then m[i].poyavlenie:=StrToInt(copy(moment,1,pos(' ',moment)-1)) else m[i].poyavlenie:=StrToInt(moment);
  m[i].liv:=true;
  m[i].distanse:=10.5;
  moment:=copy(moment,pos(' ',moment)+1,length(moment));
 end;

ругается [Warning] conprg.dpr(32): Variable 'm' might not have been initialized
какая еще инициализация?
пишу консольную программу раньше с оконной такого не было

[Aristarh Dark]

Да дело не в консоли, ты длину массиву m не задал однако.

[Страдалецъ]

Перед циклом добавьте строчку:

Код:

SetLength(m, zomb);

И массив отсчитывается с 0-элемента поэтому:

Код:

for i:=0 to zomb-1 do