Convers в паскале

[PRIVIDENIE18]

Народ подскажите пожалуйста, что делает Convers в данном тексте программы....

Program zadanie1;
uses TekcT; {подключаем модуль}
var stroka,q: string[200]; i,max,kol:integer;
begin
Writeln('‚Введите предложение:');
Readln(stroka);
max:=MaxText(stroka); {находим длину максимального слова}
kol:=0;
For i:=1 To MyLen(stroka) do begin
If stroka[i]=' ' then kol:=0
else kol:=kol+1; {считаем количество букв в каждом слове}
If kol=max then begin
q:=Convers(MyCopy(stroka,i-kol+1,kol)); {если слово равно по длине максимальному, переворачиваем его}
stroka:=NewPos(stroka,q,i-kol+1,max); {заменяем это слово в тексте на перевернутое}
end;
end;
Writeln('Измененное предложение :');
Writeln(stroka);
end.

[GetMax]

q:=Convers(MyCopy(stroka,i-kol+1,kol)); {если слово равно по длине максимальному, переворачиваем его}

Очевидно данная процедура переворачивает слово, если оно равно по длине самому большому слову в тексте.

[PRIVIDENIE18]

Сообщение от GetMax

Очевидно данная процедура переворачивает слово, если оно равно по длине самому большому слову в тексте.

А если не брать текст программы, какую фунцию выполняет Convers?

[GetMax]

Convers не является стандартной функцией для паскаля(например как Pos или Length). Поэтому в каждой отдельно взятой программе она может выполнять различные действия. Повторюсь, в данной программе она инвертирует слово.

[PRIVIDENIE18]

Сообщение от GetMax

Convers не является стандартной функцией для паскаля(например как Pos или Length). Поэтому в каждой отдельно взятой программе она может выполнять различные действия. Повторюсь, в данной программе она инвертирует слово.

Спасибо большое))))