Отсортировать в лексикографическом порядке последовательность слов одинаковой длины (сортировкой Хоара)

include "stdafx.h"
#include <iostream>
#include <fstream>
#include <string>
#include <algorithm>
#include "string.h"
using namespace std;
int srav=0, per=0, size=20;
int const z=20, x=20;
char arr[z][x];
 
void input_file();
void hoarasort(); 
 
int _tmain(int argc, _TCHAR* argv[])
{
    setlocale(LC_ALL,"Russian");
    cout<<"Дання программа сортирует слова с помощью сортировки Хоора"<<endl;
    cout<<endl<<"Исходная последовательность слов:"<<endl;
    input_file();   
    
    for (int i = 0; i < z; i++)
        cout<<arr[i]<<endl;
 
    hoarasort(arr,0);
    cout<<endl<<endl<<endl;
    system("pause");
    return 0;
}
 
void input_file()
{
    ifstream file("String.txt");
    for(int p = 0; p < z; p++)
        file>>arr[p];
    file.close();
}
 
 
void hoarasort(char* arr, int l, int r)
{
 
char tmp, x = arr[(l + r) / 2];//серединый элемент
int ml = l, mr = r; 
do {
   while (arr[ml] < x)
     ml++;
   while (arr[mr] > x)
     mr--;
 
   if (ml <= mr) 
   {
     if (ml < mr)
     {
       tmp=arr[ml];
       arr[ml]=arr[mr];
       arr[mr]=tmp;
     }
     ml++;
     mr--;
   }
} while (ml <= mr);
 
if (ml < r)
   hoarasort(arr, ml, r);
if (ml < mr)
   hoarasort(arr, l,mr);
}

 
void hoarasort(char* arr, int l, int r)
{
 
char tmp, x = arr[(l + r) / 2];//серединый элемент
int ml = l, mr = r; 
do {
   while (strcmp(arr[ml],x)<0)
     ml++;
   while (strcmp(arr[mr],x)<0)
     mr--;
 
   if (strcmp(arr[mr],arr[ml]) && strcpy(arr[mr],arr[ml])) 
   {
     if (strcmp(arr[ml],arr[mr])<0)
     {
       tmp=arr[ml];
       arr[ml]=arr[mr];
       arr[mr]=tmp;
     }
     ml++;
     mr--;
   }
} while (strcmp(arr[ml],arr[mr]) && strcpy(arr[ml],arr[mr]));
 
if (strcmp(arr[mr],r)<0)
   hoarasort(arr, ml, r);
if (strcmp(arr[ml],arr[mr])<0)
   hoarasort(arr, l,mr);
}