[ertyuo]

Здравствуйте, я на странице http://www.mir-koda.ru/full_leson.php?id=3 нашел сортировку вставками, написанную на языке С++. Вот код примера:

Код:

int main(int argc, char* argv[])
{
    int arr[8] = {35, 698, 74, 81, 67, 11, 184, 89},i,j;

    for (j=1;j<8;j++){
        if (arr[j]< arr[j-1]) {         
            i=j;         
            do{
                swap(arr[i],arr[i-1]);
                i--;               
                if (i == 0) break;
            }
            while (arr[i]< arr[i-1]) ;
        }       
    }
    getch();
return 0;
}

Трудность заключается в том, что я вообще без понятия как писать пользовательские функции на дельфи. Просто практически весь код данной сортировки уже перенёс в дельфи, а вот как создать функцию swap не представляю. Она должна менять значения смежных элементов.