все делал из 
lazarus 0,9,20 но думаю это сюда
Free Pascal Compiler version 2.0.4 [2006/09/22] for i386
var vNum: word;
begin
  WriteLn('error 1');
  vNum := 1;
  Write('pred(1)=');
  WriteLn(Pred(vNum)); // на экране pred(1)=0
  vNum := 0;
  Write('pred(0)=');
  WriteLn(Pred(vNum)); // на экране pred(0)=65535
  ReadLn;
  WriteLn('error 2');
  for vNum := 0 to 0 do
   WriteLn('good');    // показывается на экране
  ReadLn;
  for vNum := 0 to -1 do
   WriteLn('bad');     // тоже показывается на экране, но не должно + зацыкливается
  ReadLn;   
end.
PS а нет ли какой команды аля  WriteLn(VersionFpcAdnLazarus) ? чтоб проще отписывать такие баги.
			
		




 
 


 точно про word  снимаю вопрос.
  точно про word  снимаю вопрос.