#define NULL ((void *)0)
typedef unsigned long size_t; // Customize by platform.
typedef long intptr_t;
typedef unsigned long uintptr_t;
typedef long scalar_t__; // Either arithmetic or pointer type.
/* By default, we understand bool (as a convenience). */
typedef int bool;
#define false 0
#define true 1

/* Forward declarations */

/* Type definitions */

/* Variables and functions */
scalar_t__ EOF;
scalar_t__ is_brother(char *, char *);
scalar_t__ malloc(int);
int /*<<< orphan*/ printf(char *, ...);
int /*<<< orphan*/ q_sort(char **, int /*<<< orphan*/, int);
scalar_t__ scanf(char *, ...);
int strlen(char *);
int /*<<< orphan*/ strncpy(char *, char *, int);
int main() {
  int n, id;
  char find[51];
  char *finding = NULL;
  while (scanf("%d", &n) != EOF) {
    char **arr = (char **)malloc(sizeof(char *) * n);
    for (int i = 0; i < n; i++) {
      char tmp[51];
      scanf("%s", tmp);
      arr[i] = (char *)malloc(sizeof(char) * (strlen(tmp) + 1));
      strncpy(arr[i], tmp, strlen(tmp) + 1);
    }
    q_sort(arr, 0, n - 1);
    scanf("%s", find);
    scanf("%d", &id);
    int cnt = 0;
    for (int i = 0; i < n; i++) {
      if (is_brother(arr[i], find)) {
        cnt++;
        if (cnt == id)
          finding = arr[i];
      }
    }
    printf("%d\n", cnt);
    if (id <= cnt) {
      printf("%s\n", finding);
    }
    finding = NULL;
  }
  return 0;
}


x86 assembly (clang, -O0):
<main>:
push   %rbp
mov    %rsp,%rbp
sub    $0xb0,%rsp
movl   $0x0,-0x4(%rbp)
movq   $0x0,-0x48(%rbp)
lea    0xe6f(%rip),%rdi
lea    -0x8(%rbp),%rsi
mov    $0x0,%al
call   1080 <scanf@plt>
mov    0x2e45(%rip),%rcx
cmp    (%rcx),%rax
je     1370 <main+0x200>
movslq -0x8(%rbp),%rax
shl    $0x3,%rax
mov    %eax,%edi
call   1070 <malloc@plt>
mov    %rax,-0x50(%rbp)
movl   $0x0,-0x54(%rbp)
mov    -0x54(%rbp),%eax
cmp    -0x8(%rbp),%eax
jge    1265 <main+0xf5>
lea    -0x90(%rbp),%rsi
lea    0xe23(%rip),%rdi
mov    $0x0,%al
call   1080 <scanf@plt>
lea    -0x90(%rbp),%rdi
call   1040 <strlen@plt>
add    $0x1,%eax
cltq
shl    $0x0,%rax
mov    %eax,%edi
call   1070 <malloc@plt>
mov    %rax,%rdx
mov    -0x50(%rbp),%rax
movslq -0x54(%rbp),%rcx
mov    %rdx,(%rax,%rcx,8)
mov    -0x50(%rbp),%rax
movslq -0x54(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
mov    %rax,-0xa8(%rbp)
lea    -0x90(%rbp),%rax
mov    %rax,-0xa0(%rbp)
lea    -0x90(%rbp),%rdi
call   1040 <strlen@plt>
mov    -0xa8(%rbp),%rdi
mov    -0xa0(%rbp),%rsi
mov    %eax,%edx
add    $0x1,%edx
call   1030 <strncpy@plt>
mov    -0x54(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x54(%rbp)
jmp    11c6 <main+0x56>
mov    -0x50(%rbp),%rdi
mov    -0x8(%rbp),%edx
sub    $0x1,%edx
xor    %esi,%esi
call   1060 <q_sort@plt>
lea    -0x40(%rbp),%rsi
lea    0xd82(%rip),%rdi
mov    $0x0,%al
call   1080 <scanf@plt>
lea    0xd71(%rip),%rdi
lea    -0xc(%rbp),%rsi
mov    $0x0,%al
call   1080 <scanf@plt>
movl   $0x0,-0x94(%rbp)
movl   $0x0,-0x98(%rbp)
mov    -0x98(%rbp),%eax
cmp    -0x8(%rbp),%eax
jge    132e <main+0x1be>
mov    -0x50(%rbp),%rax
movslq -0x98(%rbp),%rcx
mov    (%rax,%rcx,8),%rdi
lea    -0x40(%rbp),%rsi
call   1090 <is_brother@plt>
cmp    $0x0,%rax
je     1315 <main+0x1a5>
mov    -0x94(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x94(%rbp)
mov    -0x94(%rbp),%eax
cmp    -0xc(%rbp),%eax
jne    1310 <main+0x1a0>
mov    -0x50(%rbp),%rax
movslq -0x98(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
mov    %rax,-0x48(%rbp)
jmp    1315 <main+0x1a5>
jmp    131a <main+0x1aa>
mov    -0x98(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x98(%rbp)
jmp    12ae <main+0x13e>
mov    -0x94(%rbp),%esi
lea    0xccb(%rip),%rdi
mov    $0x0,%al
call   1050 <printf@plt>
mov    -0xc(%rbp),%eax
cmp    -0x94(%rbp),%eax
jg     1363 <main+0x1f3>
mov    -0x48(%rbp),%rsi
lea    0xcae(%rip),%rdi
mov    $0x0,%al
call   1050 <printf@plt>
movq   $0x0,-0x48(%rbp)
jmp    118a <main+0x1a>
xor    %eax,%eax
add    $0xb0,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<main>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x88,%rsp
lea    0xe68(%rip),%rdi
lea    0x8(%rsp),%rsi
xor    %eax,%eax
call   1090 <scanf@plt>
mov    0x2e3d(%rip),%rcx
cmp    (%rcx),%rax
jne    11c4 <main+0x44>
xor    %eax,%eax
add    $0x88,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret
lea    0xe38(%rip),%r12
lea    0x10(%rsp),%r14
lea    0x50(%rsp),%rbp
jmp    1206 <main+0x86>
nopw   0x0(%rax,%rax,1)
lea    0xe19(%rip),%rdi
lea    0x8(%rsp),%rsi
xor    %eax,%eax
call   1090 <scanf@plt>
mov    0x2dee(%rip),%rcx
cmp    (%rcx),%rax
lea    0xdff(%rip),%r12
je     11b0 <main+0x30>
mov    0x8(%rsp),%edi
shl    $0x3,%edi
call   1080 <malloc@plt>
mov    %rax,%r15
mov    0x8(%rsp),%edx
test   %edx,%edx
jle    127b <main+0xfb>
mov    %rbp,%r13
xor    %ebp,%ebp
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax)
mov    %r12,%rdi
mov    %r14,%rsi
xor    %eax,%eax
call   1090 <scanf@plt>
mov    %r14,%rdi
call   1050 <strlen@plt>
lea    0x1(%rax),%edi
call   1080 <malloc@plt>
mov    %rax,%rbx
mov    %rax,(%r15,%rbp,8)
mov    %r14,%rdi
call   1050 <strlen@plt>
lea    0x1(%rax),%edx
mov    %rbx,%rdi
mov    %r14,%rsi
call   1030 <strncpy@plt>
add    $0x1,%rbp
movslq 0x8(%rsp),%rdx
cmp    %rdx,%rbp
jl     1230 <main+0xb0>
mov    %r13,%rbp
add    $0xffffffff,%edx
xor    %r13d,%r13d
mov    %r15,%rdi
xor    %esi,%esi
call   1070 <q_sort@plt>
mov    %r12,%rdi
mov    %rbp,%rsi
xor    %eax,%eax
call   1090 <scanf@plt>
lea    0xd61(%rip),%rdi
lea    0xc(%rsp),%rsi
xor    %eax,%eax
call   1090 <scanf@plt>
cmpl   $0x0,0x8(%rsp)
jle    12f0 <main+0x170>
xor    %ebx,%ebx
xor    %r13d,%r13d
xor    %r12d,%r12d
jmp    12ce <main+0x14e>
nopl   0x0(%rax)
add    $0x1,%rbx
movslq 0x8(%rsp),%rax
cmp    %rax,%rbx
jge    12f3 <main+0x173>
mov    (%r15,%rbx,8),%rdi
mov    %rbp,%rsi
call   10a0 <is_brother@plt>
test   %rax,%rax
je     12c0 <main+0x140>
add    $0x1,%r13d
cmp    0xc(%rsp),%r13d
jne    12c0 <main+0x140>
mov    (%r15,%rbx,8),%r12
jmp    12c0 <main+0x140>
xor    %r12d,%r12d
lea    0xd0c(%rip),%rdi
mov    %r13d,%esi
xor    %eax,%eax
call   1060 <printf@plt>
cmp    %r13d,0xc(%rsp)
jg     11e0 <main+0x60>
mov    %r12,%rdi
call   1040 <puts@plt>
jmp    11e0 <main+0x60>

LLVM IR (-O0):
@.str = [3 x i8] c"%d\00"
@EOF = global i64 0
@.str.1 = [3 x i8] c"%s\00"
@.str.2 = [4 x i8] c"%d\0A\00"
@.str.3 = [4 x i8] c"%s\0A\00"
define i32 @main() {
%1 = alloca i32
%2 = alloca i32
%3 = alloca i32
%4 = alloca [51 x i8]
%5 = alloca i8*
%6 = alloca i8**
%7 = alloca i32
%8 = alloca [51 x i8]
%9 = alloca i32
%10 = alloca i32
store i32 0, i32* %1
store i8* null, i8** %5
br label %11
11: ; preds = %101, %0
%12 = call i64 (i8*, ...) @scanf(i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str, i64 0, i64 0), i32* %2)
%13 = load i64, i64* @EOF
%14 = icmp ne i64 %12, %13
br i1 %14, label %15, label %102
15: ; preds = %11
%16 = load i32, i32* %2
%17 = sext i32 %16 to i64
%18 = mul i64 8, %17
%19 = trunc i64 %18 to i32
%20 = call i64 @malloc(i32 %19)
%21 = inttoptr i64 %20 to i8**
store i8** %21, i8*** %6
store i32 0, i32* %7
br label %22
22: ; preds = %51, %15
%23 = load i32, i32* %7
%24 = load i32, i32* %2
%25 = icmp slt i32 %23, %24
br i1 %25, label %26, label %54
26: ; preds = %22
%27 = getelementptr inbounds [51 x i8], [51 x i8]* %8, i64 0, i64 0
%28 = call i64 (i8*, ...) @scanf(i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str.1, i64 0, i64 0), i8* %27)
%29 = getelementptr inbounds [51 x i8], [51 x i8]* %8, i64 0, i64 0
%30 = call i32 @strlen(i8* %29)
%31 = add nsw i32 %30, 1
%32 = sext i32 %31 to i64
%33 = mul i64 1, %32
%34 = trunc i64 %33 to i32
%35 = call i64 @malloc(i32 %34)
%36 = inttoptr i64 %35 to i8*
%37 = load i8**, i8*** %6
%38 = load i32, i32* %7
%39 = sext i32 %38 to i64
%40 = getelementptr inbounds i8*, i8** %37, i64 %39
store i8* %36, i8** %40
%41 = load i8**, i8*** %6
%42 = load i32, i32* %7
%43 = sext i32 %42 to i64
%44 = getelementptr inbounds i8*, i8** %41, i64 %43
%45 = load i8*, i8** %44
%46 = getelementptr inbounds [51 x i8], [51 x i8]* %8, i64 0, i64 0
%47 = getelementptr inbounds [51 x i8], [51 x i8]* %8, i64 0, i64 0
%48 = call i32 @strlen(i8* %47)
%49 = add nsw i32 %48, 1
%50 = call i32 @strncpy(i8* %45, i8* %46, i32 %49)
br label %51
51: ; preds = %26
%52 = load i32, i32* %7
%53 = add nsw i32 %52, 1
store i32 %53, i32* %7
br label %22
54: ; preds = %22
%55 = load i8**, i8*** %6
%56 = load i32, i32* %2
%57 = sub nsw i32 %56, 1
%58 = call i32 @q_sort(i8** %55, i32 0, i32 %57)
%59 = getelementptr inbounds [51 x i8], [51 x i8]* %4, i64 0, i64 0
%60 = call i64 (i8*, ...) @scanf(i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str.1, i64 0, i64 0), i8* %59)
%61 = call i64 (i8*, ...) @scanf(i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str, i64 0, i64 0), i32* %3)
store i32 0, i32* %9
store i32 0, i32* %10
br label %62
62: ; preds = %89, %54
%63 = load i32, i32* %10
%64 = load i32, i32* %2
%65 = icmp slt i32 %63, %64
br i1 %65, label %66, label %92
66: ; preds = %62
%67 = load i8**, i8*** %6
%68 = load i32, i32* %10
%69 = sext i32 %68 to i64
%70 = getelementptr inbounds i8*, i8** %67, i64 %69
%71 = load i8*, i8** %70
%72 = getelementptr inbounds [51 x i8], [51 x i8]* %4, i64 0, i64 0
%73 = call i64 @is_brother(i8* %71, i8* %72)
%74 = icmp ne i64 %73, 0
br i1 %74, label %75, label %88
75: ; preds = %66
%76 = load i32, i32* %9
%77 = add nsw i32 %76, 1
store i32 %77, i32* %9
%78 = load i32, i32* %9
%79 = load i32, i32* %3
%80 = icmp eq i32 %78, %79
br i1 %80, label %81, label %87
81: ; preds = %75
%82 = load i8**, i8*** %6
%83 = load i32, i32* %10
%84 = sext i32 %83 to i64
%85 = getelementptr inbounds i8*, i8** %82, i64 %84
%86 = load i8*, i8** %85
store i8* %86, i8** %5
br label %87
87: ; preds = %81, %75
br label %88
88: ; preds = %87, %66
br label %89
89: ; preds = %88
%90 = load i32, i32* %10
%91 = add nsw i32 %90, 1
store i32 %91, i32* %10
br label %62
92: ; preds = %62
%93 = load i32, i32* %9
%94 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([4 x i8], [4 x i8]* @.str.2, i64 0, i64 0), i32 %93)
%95 = load i32, i32* %3
%96 = load i32, i32* %9
%97 = icmp sle i32 %95, %96
br i1 %97, label %98, label %101
98: ; preds = %92
%99 = load i8*, i8** %5
%100 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([4 x i8], [4 x i8]* @.str.3, i64 0, i64 0), i8* %99)
br label %101
101: ; preds = %98, %92
store i8* null, i8** %5
br label %11
102: ; preds = %11
ret i32 0
}

LLVM IR (-O2):
@.str = [3 x i8] c"%d\00"
@EOF = global i64 0
@.str.1 = [3 x i8] c"%s\00"
@.str.2 = [4 x i8] c"%d\0A\00"
define i32 @main() {
%1 = alloca i32
%2 = alloca i32
%3 = alloca [51 x i8]
%4 = alloca [51 x i8]
%5 = bitcast i32* %1 to i8*
%6 = bitcast i32* %2 to i8*
%7 = getelementptr inbounds [51 x i8], [51 x i8]* %3, i64 0, i64 0
%8 = call i64 (i8*, ...) @scanf(i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str, i64 0, i64 0), i32* %1)
%9 = load i64, i64* @EOF
%10 = icmp eq i64 %8, %9
br i1 %10, label %76, label %11
11: ; preds = %0
%12 = getelementptr inbounds [51 x i8], [51 x i8]* %4, i64 0, i64 0
br label %13
13: ; preds = %11, %72
%14 = load i32, i32* %1
%15 = shl i32 %14, 3
%16 = call i64 @malloc(i32 %15)
%17 = inttoptr i64 %16 to i8**
%18 = load i32, i32* %1
%19 = icmp sgt i32 %18, 0
br i1 %19, label %28, label %20
20: ; preds = %28, %13
%21 = phi i32 [ %18, %13 ], [ %40, %28 ]
%22 = add nsw i32 %21, -1
%23 = call i32 @q_sort(i8** %17, i32 0, i32 %22)
%24 = call i64 (i8*, ...) @scanf(i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str.1, i64 0, i64 0), i8* %7)
%25 = call i64 (i8*, ...) @scanf(i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str, i64 0, i64 0), i32* %2)
%26 = load i32, i32* %1
%27 = icmp sgt i32 %26, 0
br i1 %27, label %49, label %43
28: ; preds = %13, %28
%29 = phi i64 [ %39, %28 ], [ 0, %13 ]
%30 = call i64 (i8*, ...) @scanf(i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str.1, i64 0, i64 0), i8* %12)
%31 = call i32 @strlen(i8* %12)
%32 = add nsw i32 %31, 1
%33 = call i64 @malloc(i32 %32)
%34 = inttoptr i64 %33 to i8*
%35 = getelementptr inbounds i8*, i8** %17, i64 %29
store i8* %34, i8** %35
%36 = call i32 @strlen(i8* %12)
%37 = add nsw i32 %36, 1
%38 = call i32 @strncpy(i8* %34, i8* %12, i32 %37)
%39 = add nuw nsw i64 %29, 1
%40 = load i32, i32* %1
%41 = sext i32 %40 to i64
%42 = icmp slt i64 %39, %41
br i1 %42, label %28, label %20
43: ; preds = %63, %20
%44 = phi i8* [ null, %20 ], [ %64, %63 ]
%45 = phi i32 [ 0, %20 ], [ %65, %63 ]
%46 = call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([4 x i8], [4 x i8]* @.str.2, i64 0, i64 0), i32 %45)
%47 = load i32, i32* %2
%48 = icmp sgt i32 %47, %45
br i1 %48, label %72, label %70
49: ; preds = %20, %63
%50 = phi i64 [ %66, %63 ], [ 0, %20 ]
%51 = phi i32 [ %65, %63 ], [ 0, %20 ]
%52 = phi i8* [ %64, %63 ], [ null, %20 ]
%53 = getelementptr inbounds i8*, i8** %17, i64 %50
%54 = load i8*, i8** %53
%55 = call i64 @is_brother(i8* %54, i8* %7)
%56 = icmp eq i64 %55, 0
br i1 %56, label %63, label %57
57: ; preds = %49
%58 = add nsw i32 %51, 1
%59 = load i32, i32* %2
%60 = icmp eq i32 %58, %59
br i1 %60, label %61, label %63
61: ; preds = %57
%62 = load i8*, i8** %53
br label %63
63: ; preds = %49, %61, %57
%64 = phi i8* [ %62, %61 ], [ %52, %57 ], [ %52, %49 ]
%65 = phi i32 [ %58, %61 ], [ %58, %57 ], [ %51, %49 ]
%66 = add nuw nsw i64 %50, 1
%67 = load i32, i32* %1
%68 = sext i32 %67 to i64
%69 = icmp slt i64 %66, %68
br i1 %69, label %49, label %43
70: ; preds = %43
%71 = call i32 @puts(i8* dereferenceable(1) %44)
br label %72
72: ; preds = %70, %43
%73 = call i64 (i8*, ...) @scanf(i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str, i64 0, i64 0), i32* %1)
%74 = load i64, i64* @EOF
%75 = icmp eq i64 %73, %74
br i1 %75, label %76, label %13
76: ; preds = %72, %0
ret i32 0
}