Валенок, так вы же копируете область памяти в массив word , нет ? p : pointer to array[4096..5000] of word