tytuł mojej pracy domowej brzmi: porządkowanie ciągu metodą wyboru. iteracja algorytmu 4. nie mam o tym pojęcia!!
czy chodzi o to:

program sort_wybor;
uses crt;
const n:=20
Var
d:array[1..N]of integer;
i,j,x,min:integer;
Begin
clrscr;
randomize;
for i:=1 to N do d[i]:=random(100);
writeln('Przed sortowaniem:');
for i:=1 to N do writeln(d[i]);

for j:=1 to N-1 do
begin
min:=j;
for i:=j+1 to N do
if d[i] < d[min] then min:=i;
x:=d[min];
d[min]:=d[j];
d[j]:=x;
end;
Writeln('Po sortowaniu:');
for i:=1 to N do
writeln(d[i]);
repeat until keypressed;
End.


prosze o pomoc!!