#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 */
int /*<<< orphan*/ printf(char *, float);
int /*<<< orphan*/ scanf(char *, int *);
int main() {
  int a, i, j, s, C, N, g[2000];
  float k;
  scanf("%d", &C);
  for (i = 1; i <= C; i++) {
    scanf("%d", &N);
    s = 0;
    for (j = 1; j <= N; j++) {
      scanf("%d", &g[j]);
      s = s + g[j];
    }
    a = (int)(s / N);
    k = 0;
    for (j = 1; j <= N; j++)
      if (g[j] > a)
        k++;
    printf("%2.3f%\n", (float)(k * 100) / N);
  }
  return 0;
}


x86 assembly (clang, -O0):
<main>:
push   %rbp
mov    %rsp,%rbp
sub    $0x1f70,%rsp
movl   $0x0,-0x4(%rbp)
lea    0xecf(%rip),%rdi
lea    -0x18(%rbp),%rsi
call   1040 <scanf@plt>
movl   $0x1,-0xc(%rbp)
mov    -0xc(%rbp),%eax
cmp    -0x18(%rbp),%eax
jg     1256 <main+0x136>
lea    0xeac(%rip),%rdi
lea    -0x1c(%rbp),%rsi
call   1040 <scanf@plt>
movl   $0x0,-0x14(%rbp)
movl   $0x1,-0x10(%rbp)
mov    -0x10(%rbp),%eax
cmp    -0x1c(%rbp),%eax
jg     11bc <main+0x9c>
movslq -0x10(%rbp),%rax
lea    -0x1f60(%rbp),%rsi
shl    $0x2,%rax
add    %rax,%rsi
lea    0xe70(%rip),%rdi
call   1040 <scanf@plt>
mov    -0x14(%rbp),%eax
movslq -0x10(%rbp),%rcx
add    -0x1f60(%rbp,%rcx,4),%eax
mov    %eax,-0x14(%rbp)
mov    -0x10(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x10(%rbp)
jmp    1173 <main+0x53>
mov    -0x14(%rbp),%eax
cltd
idivl  -0x1c(%rbp)
mov    %eax,-0x8(%rbp)
xorps  %xmm0,%xmm0
movss  %xmm0,-0x1f64(%rbp)
ff
movl   $0x1,-0x10(%rbp)
mov    -0x10(%rbp),%eax
cmp    -0x1c(%rbp),%eax
jg     1223 <main+0x103>
movslq -0x10(%rbp),%rax
mov    -0x1f60(%rbp,%rax,4),%eax
cmp    -0x8(%rbp),%eax
jle    1210 <main+0xf0>
movss  0xe04(%rip),%xmm0
addss  -0x1f64(%rbp),%xmm0
ff
movss  %xmm0,-0x1f64(%rbp)
ff
jmp    1215 <main+0xf5>
mov    -0x10(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x10(%rbp)
jmp    11d8 <main+0xb8>
movss  0xdd5(%rip),%xmm0
mulss  -0x1f64(%rbp),%xmm0
ff
cvtsi2ssl -0x1c(%rbp),%xmm1
divss  %xmm1,%xmm0
lea    0xdc8(%rip),%rdi
call   1030 <printf@plt>
mov    -0xc(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0xc(%rbp)
jmp    1149 <main+0x29>
xor    %eax,%eax
add    $0x1f70,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<main>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x1f58,%rsp
lea    0xed0(%rip),%rdi
lea    0xc(%rsp),%rsi
call   1040 <scanf@plt>
cmpl   $0x0,0xc(%rsp)
jle    12de <main+0x1be>
mov    $0x1,%r13d
lea    0x14(%rsp),%r12
lea    0xea9(%rip),%rbx
jmp    11a4 <main+0x84>
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax,%rax,1)
movaps %xmm2,%xmm0
mulss  0xe89(%rip),%xmm0
xorps  %xmm1,%xmm1
cvtsi2ss %ecx,%xmm1
divss  %xmm1,%xmm0
lea    0xe7e(%rip),%rdi
call   1030 <printf@plt>
lea    0x1(%r13),%eax
cmp    0xc(%rsp),%r13d
mov    %eax,%r13d
jge    12de <main+0x1be>
mov    %rbx,%rdi
lea    0x8(%rsp),%rsi
call   1040 <scanf@plt>
mov    0x8(%rsp),%ecx
xorps  %xmm0,%xmm0
test   %ecx,%ecx
jle    1173 <main+0x53>
xor    %r14d,%r14d
xor    %r15d,%r15d
xor    %ebp,%ebp
cs nopw 0x0(%rax,%rax,1)
xchg   %ax,%ax
lea    (%r12,%r14,1),%rsi
mov    %rbx,%rdi
call   1040 <scanf@plt>
add    0x14(%rsp,%r15,4),%ebp
movslq 0x8(%rsp),%rcx
add    $0x1,%r15
add    $0x4,%r14
cmp    %rcx,%r15
jl     11d0 <main+0xb0>
mov    %ebp,%eax
cltd
idiv   %ecx
test   %ecx,%ecx
jle    1230 <main+0x110>
mov    %ecx,%edi
lea    -0x1(%rdi),%rsi
mov    %edi,%edx
and    $0x3,%edx
cmp    $0x3,%rsi
jae    1238 <main+0x118>
xorps  %xmm0,%xmm0
mov    $0x1,%esi
movss  0xde3(%rip),%xmm1
test   %rdx,%rdx
jne    12b1 <main+0x191>
jmp    1173 <main+0x53>
nopl   0x0(%rax,%rax,1)
xorps  %xmm0,%xmm0
jmp    1173 <main+0x53>
and    $0xfffffffc,%edi
xorps  %xmm0,%xmm0
xor    %esi,%esi
movss  0xdb8(%rip),%xmm1
jmp    1259 <main+0x139>
nopw   0x0(%rax,%rax,1)
add    $0x4,%rsi
cmp    %rsi,%rdi
je     12a4 <main+0x184>
cmp    %eax,0x14(%rsp,%rsi,4)
jg     1280 <main+0x160>
cmp    %eax,0x18(%rsp,%rsi,4)
jg     128a <main+0x16a>
cmp    %eax,0x1c(%rsp,%rsi,4)
jg     1294 <main+0x174>
cmp    %eax,0x20(%rsp,%rsi,4)
jle    1250 <main+0x130>
jmp    129e <main+0x17e>
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
addss  %xmm1,%xmm0
cmp    %eax,0x18(%rsp,%rsi,4)
jle    1265 <main+0x145>
addss  %xmm1,%xmm0
cmp    %eax,0x1c(%rsp,%rsi,4)
jle    126b <main+0x14b>
addss  %xmm1,%xmm0
cmp    %eax,0x20(%rsp,%rsi,4)
jle    1250 <main+0x130>
addss  %xmm1,%xmm0
jmp    1250 <main+0x130>
add    $0x1,%rsi
test   %rdx,%rdx
je     1173 <main+0x53>
lea    (%rsp,%rsi,4),%rsi
add    $0x10,%rsi
xor    %edi,%edi
movaps %xmm0,%xmm2
jmp    12d0 <main+0x1b0>
add    $0x1,%rdi
movaps %xmm2,%xmm0
cmp    %rdi,%rdx
je     1170 <main+0x50>
addss  %xmm1,%xmm2
cmp    %eax,(%rsi,%rdi,4)
jg     12c0 <main+0x1a0>
movaps %xmm0,%xmm2
jmp    12c0 <main+0x1a0>
xor    %eax,%eax
add    $0x1f58,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
@.str = [3 x i8] c"%d\00"
@.str.1 = [8 x i8] c"%2.3f%\0A\00"
define i32 @main() {
%1 = alloca i32
%2 = alloca i32
%3 = alloca i32
%4 = alloca i32
%5 = alloca i32
%6 = alloca i32
%7 = alloca i32
%8 = alloca [2000 x i32]
%9 = alloca float
store i32 0, i32* %1
%10 = call i32 @scanf(i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str, i64 0, i64 0), i32* %6)
store i32 1, i32* %3
br label %11
11: ; preds = %64, %0
%12 = load i32, i32* %3
%13 = load i32, i32* %6
%14 = icmp sle i32 %12, %13
br i1 %14, label %15, label %67
15: ; preds = %11
%16 = call i32 @scanf(i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str, i64 0, i64 0), i32* %7)
store i32 0, i32* %5
store i32 1, i32* %4
br label %17
17: ; preds = %32, %15
%18 = load i32, i32* %4
%19 = load i32, i32* %7
%20 = icmp sle i32 %18, %19
br i1 %20, label %21, label %35
21: ; preds = %17
%22 = load i32, i32* %4
%23 = sext i32 %22 to i64
%24 = getelementptr inbounds [2000 x i32], [2000 x i32]* %8, i64 0, i64 %23
%25 = call i32 @scanf(i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str, i64 0, i64 0), i32* %24)
%26 = load i32, i32* %5
%27 = load i32, i32* %4
%28 = sext i32 %27 to i64
%29 = getelementptr inbounds [2000 x i32], [2000 x i32]* %8, i64 0, i64 %28
%30 = load i32, i32* %29
%31 = add nsw i32 %26, %30
store i32 %31, i32* %5
br label %32
32: ; preds = %21
%33 = load i32, i32* %4
%34 = add nsw i32 %33, 1
store i32 %34, i32* %4
br label %17
35: ; preds = %17
%36 = load i32, i32* %5
%37 = load i32, i32* %7
%38 = sdiv i32 %36, %37
store i32 %38, i32* %2
store float 0.000000e+00, float* %9
store i32 1, i32* %4
br label %39
39: ; preds = %54, %35
%40 = load i32, i32* %4
%41 = load i32, i32* %7
%42 = icmp sle i32 %40, %41
br i1 %42, label %43, label %57
43: ; preds = %39
%44 = load i32, i32* %4
%45 = sext i32 %44 to i64
%46 = getelementptr inbounds [2000 x i32], [2000 x i32]* %8, i64 0, i64 %45
%47 = load i32, i32* %46
%48 = load i32, i32* %2
%49 = icmp sgt i32 %47, %48
br i1 %49, label %50, label %53
50: ; preds = %43
%51 = load float, float* %9
%52 = fadd float %51, 1.000000e+00
store float %52, float* %9
br label %53
53: ; preds = %50, %43
br label %54
54: ; preds = %53
%55 = load i32, i32* %4
%56 = add nsw i32 %55, 1
store i32 %56, i32* %4
br label %39
57: ; preds = %39
%58 = load float, float* %9
%59 = fmul float %58, 1.000000e+02
%60 = load i32, i32* %7
%61 = sitofp i32 %60 to float
%62 = fdiv float %59, %61
%63 = call i32 @printf(i8* getelementptr inbounds ([8 x i8], [8 x i8]* @.str.1, i64 0, i64 0), float %62)
br label %64
64: ; preds = %57
%65 = load i32, i32* %3
%66 = add nsw i32 %65, 1
store i32 %66, i32* %3
br label %11
67: ; preds = %11
ret i32 0
}

LLVM IR (-O2):
@.str = [3 x i8] c"%d\00"
@.str.1 = [8 x i8] c"%2.3f%\0A\00"
define i32 @main() {
%1 = alloca i32
%2 = alloca i32
%3 = alloca [2000 x i32]
%4 = bitcast i32* %1 to i8*
%5 = bitcast i32* %2 to i8*
%6 = bitcast [2000 x i32]* %3 to i8*
%7 = call i32 @scanf(i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str, i64 0, i64 0), i32* %1)
%8 = load i32, i32* %1
%9 = icmp slt i32 %8, 1
br i1 %9, label %95, label %10
10: ; preds = %0, %85
%11 = phi i32 [ %92, %85 ], [ 1, %0 ]
%12 = call i32 @scanf(i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str, i64 0, i64 0), i32* %2)
%13 = load i32, i32* %2
%14 = icmp slt i32 %13, 1
br i1 %14, label %85, label %15
15: ; preds = %10, %15
%16 = phi i64 [ %22, %15 ], [ 1, %10 ]
%17 = phi i32 [ %21, %15 ], [ 0, %10 ]
%18 = getelementptr inbounds [2000 x i32], [2000 x i32]* %3, i64 0, i64 %16
%19 = call i32 @scanf(i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str, i64 0, i64 0), i32* %18)
%20 = load i32, i32* %18
%21 = add nsw i32 %20, %17
%22 = add nuw nsw i64 %16, 1
%23 = load i32, i32* %2
%24 = sext i32 %23 to i64
%25 = icmp slt i64 %16, %24
br i1 %25, label %15, label %26
26: ; preds = %15
%27 = sdiv i32 %21, %23
%28 = icmp slt i32 %23, 1
br i1 %28, label %85, label %29
29: ; preds = %26
%30 = add nuw i32 %23, 1
%31 = zext i32 %30 to i64
%32 = add nsw i64 %31, -1
%33 = add nsw i64 %31, -2
%34 = and i64 %32, 3
%35 = icmp ult i64 %33, 3
br i1 %35, label %68, label %36
36: ; preds = %29
%37 = and i64 %32, -4
br label %38
38: ; preds = %38, %36
%39 = phi i64 [ 1, %36 ], [ %65, %38 ]
%40 = phi float [ 0.000000e+00, %36 ], [ %64, %38 ]
%41 = phi i64 [ 0, %36 ], [ %66, %38 ]
%42 = getelementptr inbounds [2000 x i32], [2000 x i32]* %3, i64 0, i64 %39
%43 = load i32, i32* %42
%44 = icmp sgt i32 %43, %27
%45 = fadd float %40, 1.000000e+00
%46 = select i1 %44, float %45, float %40
%47 = add nuw nsw i64 %39, 1
%48 = getelementptr inbounds [2000 x i32], [2000 x i32]* %3, i64 0, i64 %47
%49 = load i32, i32* %48
%50 = icmp sgt i32 %49, %27
%51 = fadd float %46, 1.000000e+00
%52 = select i1 %50, float %51, float %46
%53 = add nuw nsw i64 %39, 2
%54 = getelementptr inbounds [2000 x i32], [2000 x i32]* %3, i64 0, i64 %53
%55 = load i32, i32* %54
%56 = icmp sgt i32 %55, %27
%57 = fadd float %52, 1.000000e+00
%58 = select i1 %56, float %57, float %52
%59 = add nuw nsw i64 %39, 3
%60 = getelementptr inbounds [2000 x i32], [2000 x i32]* %3, i64 0, i64 %59
%61 = load i32, i32* %60
%62 = icmp sgt i32 %61, %27
%63 = fadd float %58, 1.000000e+00
%64 = select i1 %62, float %63, float %58
%65 = add nuw nsw i64 %39, 4
%66 = add i64 %41, 4
%67 = icmp eq i64 %66, %37
br i1 %67, label %68, label %38
68: ; preds = %38, %29
%69 = phi float [ undef, %29 ], [ %64, %38 ]
%70 = phi i64 [ 1, %29 ], [ %65, %38 ]
%71 = phi float [ 0.000000e+00, %29 ], [ %64, %38 ]
%72 = icmp eq i64 %34, 0
br i1 %72, label %85, label %73
73: ; preds = %68, %73
%74 = phi i64 [ %82, %73 ], [ %70, %68 ]
%75 = phi float [ %81, %73 ], [ %71, %68 ]
%76 = phi i64 [ %83, %73 ], [ 0, %68 ]
%77 = getelementptr inbounds [2000 x i32], [2000 x i32]* %3, i64 0, i64 %74
%78 = load i32, i32* %77
%79 = icmp sgt i32 %78, %27
%80 = fadd float %75, 1.000000e+00
%81 = select i1 %79, float %80, float %75
%82 = add nuw nsw i64 %74, 1
%83 = add i64 %76, 1
%84 = icmp eq i64 %83, %34
br i1 %84, label %85, label %73
85: ; preds = %68, %73, %10, %26
%86 = phi i32 [ %23, %26 ], [ %13, %10 ], [ %23, %73 ], [ %23, %68 ]
%87 = phi float [ 0.000000e+00, %26 ], [ 0.000000e+00, %10 ], [ %69, %68 ], [ %81, %73 ]
%88 = fmul float %87, 1.000000e+02
%89 = sitofp i32 %86 to float
%90 = fdiv float %88, %89
%91 = call i32 @printf(i8* getelementptr inbounds ([8 x i8], [8 x i8]* @.str.1, i64 0, i64 0), float %90)
%92 = add nuw nsw i32 %11, 1
%93 = load i32, i32* %1
%94 = icmp slt i32 %11, %93
br i1 %94, label %10, label %95
95: ; preds = %85, %0
ret i32 0
}