значения индекса, массив, указатель и не только... Опции

[compiler]

есть програмка (на FP)

program PointerArray;  
//на основе doc/ref/Types(3) / Pointers(3.4) 
var i : Longint;  
	p : ^Longint;  
	pp : array[0..100] of Longint;  
function proc():boolean;
var j: longint;
begin
	proc:=true;
	for j := 0 to 105 do  
		if p[j]<>pp[j] then  proc:=false ; 
		
end;
begin  
	for i := 0 to 100 do pp:= i; { Fill array }  
	p := @pp;
	WriteLn (i:3);
	if proc() then  
		WriteLn ('YES !')  
	else 	WriteLn ('Ohoh, problem !');		
	for i := 0 to 105 do begin
		p := @pp[i];
		WriteLn (i:3);
		if proc() then  
			WriteLn ('YES !')  
		else 	WriteLn ('Ohoh, problem !');		
	end;
	readln;
	read;
end. 

интересует строчка [i]p := @pp[0]; что знасит этот индекс(0)? если пишем p := @pp; все работает так-же, но если указываем другой индекс получаем проблемку...

Сообщение отредактировано: compiler - 18.07.2007 16:35