Нетипизированные указатели. Динамические данные (Pascal)

[prince_joha]

Доброго времени суток !
Не получается создать программу с динамическим массивом и матрицей.
В первом случае нужно определить в созданном одномерном массиве максимальный элемент и его порядковый номер в массиве.
Во втором создать матрицу, вывести её на экран, а потом обменять местами её первую и последнюю строки.

Вот пример программы (с массивом), но без вышеуказанных условий:

Program n4;
var
mas,pointer;
i:byte;
intsize,massize,x,n:integer;
begin
write('chislo elementov= ');
readln(n);
intsize:=sizeof(integer);
massize:=n*intsize;
GetMem(mas,massize);
randomize;
for i:=1 to n do
begin
x:=random(100);
ptr(seg(mas^),ofs(mas^)+(i-1)*intsize);
move(x,p^,intsize);
end;
for i:= 1 to n do
begin
ptr(seg(mas^),ofs(mas^)+(i-1)*intsize);
move(p^,x,intsize);
write(x:4);
end;
writeln;
readln;
freemem(mas,massize);
end.

Я не могу понять, зачем после заполнения массива числами писать ещё один цикл:

for i:= 1 to n do
begin
ptr(seg(mas^),ofs(mas^)+(i-1)*intsize);
move(p^,x,intsize);
write(x:4);
end;

Ведь без него программа тоже работает.
______________________

Также непонятно как сослаться на элементы массива (строку матрицы), чтобы потом выполнить над ними нужные действия.
Мне посоветовали опереться на это действие:

x:=random(100);
ptr(seg(mas^),ofs(mas^)+(i-1)*intsize);
move(x,p^,intsize);
end;

Здесь (как я понял) значение "Х" передается в массив для заполнения его случайными числами, но я не пойму как это происходит.

Заранее благодарю за помощь !