[maxmaslo]

1
2
3
4
5
6
7
8
9
10 - содержимое memo, про кавычки понял еще давно, не первый день в среде delphi. выводит нормально, только не меняя местами, если убрать эти две строчки:
m[j]:=min;
m[p]:=min;