首先强烈鄙视出题人，题目描述不清导致哥重复提交多次不对。。。

然后对部分不负责任的出题解和出讨论的人表示强烈谴责！！！

其实该题的意思就是比较字符串大小，从小到大排序，输出第K【小】的字符串即可。C语言直接使用strcmp函数来比较即可，不需要判断字符串长度！判断长度的情况下长度小的排前边，而strcmp函数是把长度小的排后边。

排序按照从小到大，输出第K个即可。

回答

我有FP的：

var

a:array[1..1500] of string;

n,i,j,k:integer;

t:string;

begin

readln(n,k);

for i:=1 to n do readln(a[i]);

for i:=1 to n-1 do

for j:=i+1 to n do

f a[i]>a[j] then begin t:=a[i];a[i]:=a[j];a[j]:=t;end;

writeln(a[k]);

end.