#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 *, int, ...);
int /*<<< orphan*/ scanf(char *, int *);
int /*<<< orphan*/ system(char *);
int main() {
  int ESTATURA[30], i, pesototal, promedio, menor, igual;
  pesototal = 0;
  for (i = 0; i < 30; i++) {
    printf("Estatura [%d]= \n", i);
    scanf("%d", &ESTATURA[i]);
    pesototal = pesototal + ESTATURA[i];
  }
  promedio = pesototal / 30;
  printf("La Estatura promedio es %d\n", promedio);
  menor = 0;
  igual = 0;
  for (i = 0; i < 30; i++) {
    if (ESTATURA[i] < promedio) {
      menor++;
    }
    if (ESTATURA[i] == promedio) {
      igual++;
    }
  }
  printf("Las Estaturas igual a la estatura promedio son %d \ny las estaturas "
         "menores a la promedio son %d\n",
         igual, menor);
  system("pause");
  return 0;
}


x86 assembly (clang, -O0):
<main>:
push   %rbp
mov    %rsp,%rbp
sub    $0xa0,%rsp
movl   $0x0,-0x4(%rbp)
movl   $0x0,-0x88(%rbp)
movl   $0x0,-0x84(%rbp)
cmpl   $0x1e,-0x84(%rbp)
jge    11c0 <main+0x90>
mov    -0x84(%rbp),%esi
lea    0xe90(%rip),%rdi
mov    $0x0,%al
call   1040 <printf@plt>
movslq -0x84(%rbp),%rax
lea    -0x80(%rbp),%rsi
shl    $0x2,%rax
add    %rax,%rsi
lea    0xe81(%rip),%rdi
call   1050 <scanf@plt>
mov    -0x88(%rbp),%eax
movslq -0x84(%rbp),%rcx
add    -0x80(%rbp,%rcx,4),%eax
mov    %eax,-0x88(%rbp)
mov    -0x84(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x84(%rbp)
jmp    1156 <main+0x26>
mov    -0x88(%rbp),%eax
mov    $0x1e,%ecx
cltd
idiv   %ecx
mov    %eax,-0x8c(%rbp)
mov    -0x8c(%rbp),%esi
lea    0xe33(%rip),%rdi
mov    $0x0,%al
call   1040 <printf@plt>
movl   $0x0,-0x90(%rbp)
movl   $0x0,-0x94(%rbp)
movl   $0x0,-0x84(%rbp)
cmpl   $0x1e,-0x84(%rbp)
jge    1278 <main+0x148>
movslq -0x84(%rbp),%rax
mov    -0x80(%rbp,%rax,4),%eax
cmp    -0x8c(%rbp),%eax
jge    1239 <main+0x109>
mov    -0x90(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x90(%rbp)
movslq -0x84(%rbp),%rax
mov    -0x80(%rbp,%rax,4),%eax
cmp    -0x8c(%rbp),%eax
jne    125f <main+0x12f>
mov    -0x94(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x94(%rbp)
jmp    1264 <main+0x134>
mov    -0x84(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x84(%rbp)
jmp    1206 <main+0xd6>
mov    -0x94(%rbp),%esi
mov    -0x90(%rbp),%edx
lea    0xda5(%rip),%rdi
mov    $0x0,%al
call   1040 <printf@plt>
lea    0xdf8(%rip),%rdi
call   1030 <system@plt>
xor    %eax,%eax
add    $0xa0,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<main>:
push   %rbp
push   %r15
push   %r14
push   %r12
push   %rbx
sub    $0x80,%rsp
lea    0xeba(%rip),%r14
lea    0xec4(%rip),%r15
xor    %r12d,%r12d
xor    %ebx,%ebx
xor    %ebp,%ebp
cs nopw 0x0(%rax,%rax,1)
xchg   %ax,%ax
mov    %r14,%rdi
mov    %ebx,%esi
xor    %eax,%eax
call   1040 <printf@plt>
lea    (%rsp,%r12,1),%rsi
mov    %r15,%rdi
call   1050 <scanf@plt>
add    (%rsp,%rbx,4),%ebp
add    $0x1,%rbx
add    $0x4,%r12
cmp    $0x1e,%rbx
jne    1160 <main+0x30>
movslq %ebp,%rbx
imul   $0xffffffff88888889,%rbx,%rax
shr    $0x20,%rax
add    %eax,%ebx
mov    %ebx,%eax
shr    $0x1f,%eax
sar    $0x4,%ebx
add    %eax,%ebx
lea    0xe6a(%rip),%rdi
mov    %ebx,%esi
xor    %eax,%eax
call   1040 <printf@plt>
movd   %ebx,%xmm0
pshufd $0x0,%xmm0,%xmm1
movdqa (%rsp),%xmm7
movdqa 0x10(%rsp),%xmm6
movdqa 0x20(%rsp),%xmm5
movdqa 0x30(%rsp),%xmm4
movdqa 0x40(%rsp),%xmm3
movdqa 0x50(%rsp),%xmm9
movdqa 0x60(%rsp),%xmm8
movdqa %xmm1,%xmm0
pcmpgtd %xmm7,%xmm0
pcmpeqd %xmm1,%xmm7
psrld  $0x1f,%xmm7
movdqa %xmm1,%xmm10
pcmpgtd %xmm6,%xmm10
pcmpeqd %xmm1,%xmm6
psubd  %xmm6,%xmm7
movdqa %xmm1,%xmm6
pcmpgtd %xmm5,%xmm6
pcmpeqd %xmm1,%xmm5
psubd  %xmm5,%xmm7
movdqa %xmm1,%xmm5
pcmpgtd %xmm4,%xmm5
pcmpeqd %xmm1,%xmm4
psubd  %xmm4,%xmm7
movdqa %xmm1,%xmm4
pcmpgtd %xmm3,%xmm4
pcmpeqd %xmm1,%xmm3
psubd  %xmm3,%xmm7
movdqa %xmm1,%xmm3
pcmpgtd %xmm9,%xmm3
pcmpeqd %xmm1,%xmm9
psubd  %xmm9,%xmm7
movdqa %xmm8,%xmm2
pcmpeqd %xmm1,%xmm2
psubd  %xmm2,%xmm7
pshufd $0xee,%xmm7,%xmm2
paddd  %xmm7,%xmm2
pshufd $0x55,%xmm2,%xmm7
paddd  %xmm2,%xmm7
movd   %xmm7,%eax
psrld  $0x1f,%xmm0
psubd  %xmm10,%xmm0
psubd  %xmm6,%xmm0
psubd  %xmm5,%xmm0
psubd  %xmm4,%xmm0
psubd  %xmm3,%xmm0
pcmpgtd %xmm8,%xmm1
psubd  %xmm1,%xmm0
pshufd $0xee,%xmm0,%xmm1
paddd  %xmm0,%xmm1
pshufd $0x55,%xmm1,%xmm0
paddd  %xmm1,%xmm0
movd   %xmm0,%ecx
xor    %edi,%edi
xor    %ebp,%ebp
cmp    %ebx,0x70(%rsp)
setl   %dil
sete   %bpl
add    %ecx,%edi
add    %eax,%ebp
xor    %edx,%edx
xor    %esi,%esi
cmp    %ebx,0x74(%rsp)
setl   %dl
sete   %sil
add    %edi,%edx
add    %ebp,%esi
lea    0xd59(%rip),%rdi
xor    %eax,%eax
call   1040 <printf@plt>
lea    0xdac(%rip),%rdi
call   1030 <system@plt>
xor    %eax,%eax
add    $0x80,%rsp
pop    %rbx
pop    %r12
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
@.str = [17 x i8] c"Estatura [%d]= \0A\00"
@.str.1 = [3 x i8] c"%d\00"
@.str.2 = [28 x i8] c"La Estatura promedio es %d\0A\00"
@.str.3 = [97 x i8] c"Las Estaturas igual a la estatura promedio son %d \0Ay las estaturas menores a la promedio son %d\0A\00"
@.str.4 = [6 x i8] c"pause\00"
define i32 @main() {
%1 = alloca i32
%2 = alloca [30 x i32]
%3 = alloca i32
%4 = alloca i32
%5 = alloca i32
%6 = alloca i32
%7 = alloca i32
store i32 0, i32* %1
store i32 0, i32* %4
store i32 0, i32* %3
br label %8
8: ; preds = %24, %0
%9 = load i32, i32* %3
%10 = icmp slt i32 %9, 30
br i1 %10, label %11, label %27
11: ; preds = %8
%12 = load i32, i32* %3
%13 = call i32 (i8*, i32, ...) @printf(i8* getelementptr inbounds ([17 x i8], [17 x i8]* @.str, i64 0, i64 0), i32 %12)
%14 = load i32, i32* %3
%15 = sext i32 %14 to i64
%16 = getelementptr inbounds [30 x i32], [30 x i32]* %2, i64 0, i64 %15
%17 = call i32 @scanf(i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str.1, i64 0, i64 0), i32* %16)
%18 = load i32, i32* %4
%19 = load i32, i32* %3
%20 = sext i32 %19 to i64
%21 = getelementptr inbounds [30 x i32], [30 x i32]* %2, i64 0, i64 %20
%22 = load i32, i32* %21
%23 = add nsw i32 %18, %22
store i32 %23, i32* %4
br label %24
24: ; preds = %11
%25 = load i32, i32* %3
%26 = add nsw i32 %25, 1
store i32 %26, i32* %3
br label %8
27: ; preds = %8
%28 = load i32, i32* %4
%29 = sdiv i32 %28, 30
store i32 %29, i32* %5
%30 = load i32, i32* %5
%31 = call i32 (i8*, i32, ...) @printf(i8* getelementptr inbounds ([28 x i8], [28 x i8]* @.str.2, i64 0, i64 0), i32 %30)
store i32 0, i32* %6
store i32 0, i32* %7
store i32 0, i32* %3
br label %32
32: ; preds = %56, %27
%33 = load i32, i32* %3
%34 = icmp slt i32 %33, 30
br i1 %34, label %35, label %59
35: ; preds = %32
%36 = load i32, i32* %3
%37 = sext i32 %36 to i64
%38 = getelementptr inbounds [30 x i32], [30 x i32]* %2, i64 0, i64 %37
%39 = load i32, i32* %38
%40 = load i32, i32* %5
%41 = icmp slt i32 %39, %40
br i1 %41, label %42, label %45
42: ; preds = %35
%43 = load i32, i32* %6
%44 = add nsw i32 %43, 1
store i32 %44, i32* %6
br label %45
45: ; preds = %42, %35
%46 = load i32, i32* %3
%47 = sext i32 %46 to i64
%48 = getelementptr inbounds [30 x i32], [30 x i32]* %2, i64 0, i64 %47
%49 = load i32, i32* %48
%50 = load i32, i32* %5
%51 = icmp eq i32 %49, %50
br i1 %51, label %52, label %55
52: ; preds = %45
%53 = load i32, i32* %7
%54 = add nsw i32 %53, 1
store i32 %54, i32* %7
br label %55
55: ; preds = %52, %45
br label %56
56: ; preds = %55
%57 = load i32, i32* %3
%58 = add nsw i32 %57, 1
store i32 %58, i32* %3
br label %32
59: ; preds = %32
%60 = load i32, i32* %7
%61 = load i32, i32* %6
%62 = call i32 (i8*, i32, ...) @printf(i8* getelementptr inbounds ([97 x i8], [97 x i8]* @.str.3, i64 0, i64 0), i32 %60, i32 %61)
%63 = call i32 @system(i8* getelementptr inbounds ([6 x i8], [6 x i8]* @.str.4, i64 0, i64 0))
ret i32 0
}

LLVM IR (-O2):
@.str = [17 x i8] c"Estatura [%d]= \0A\00"
@.str.1 = [3 x i8] c"%d\00"
@.str.2 = [28 x i8] c"La Estatura promedio es %d\0A\00"
@.str.3 = [97 x i8] c"Las Estaturas igual a la estatura promedio son %d \0Ay las estaturas menores a la promedio son %d\0A\00"
@.str.4 = [6 x i8] c"pause\00"
define i32 @main() {
%1 = alloca [30 x i32]
%2 = bitcast [30 x i32]* %1 to i8*
br label %3
3: ; preds = %0, %3
%4 = phi i64 [ 0, %0 ], [ %12, %3 ]
%5 = phi i32 [ 0, %0 ], [ %11, %3 ]
%6 = trunc i64 %4 to i32
%7 = call i32 (i8*, i32, ...) @printf(i8* getelementptr inbounds ([17 x i8], [17 x i8]* @.str, i64 0, i64 0), i32 %6)
%8 = getelementptr inbounds [30 x i32], [30 x i32]* %1, i64 0, i64 %4
%9 = call i32 @scanf(i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str.1, i64 0, i64 0), i32* %8)
%10 = load i32, i32* %8
%11 = add nsw i32 %10, %5
%12 = add nuw nsw i64 %4, 1
%13 = icmp eq i64 %12, 30
br i1 %13, label %14, label %3
14: ; preds = %3
%15 = sdiv i32 %11, 30
%16 = call i32 (i8*, i32, ...) @printf(i8* getelementptr inbounds ([28 x i8], [28 x i8]* @.str.2, i64 0, i64 0), i32 %15)
%17 = insertelement <4 x i32> poison, i32 %15, i64 0
%18 = shufflevector <4 x i32> %17, <4 x i32> poison, <4 x i32> zeroinitializer
%19 = bitcast [30 x i32]* %1 to <4 x i32>*
%20 = load <4 x i32>, <4 x i32>* %19
%21 = getelementptr inbounds [30 x i32], [30 x i32]* %1, i64 0, i64 4
%22 = bitcast i32* %21 to <4 x i32>*
%23 = load <4 x i32>, <4 x i32>* %22
%24 = getelementptr inbounds [30 x i32], [30 x i32]* %1, i64 0, i64 8
%25 = bitcast i32* %24 to <4 x i32>*
%26 = load <4 x i32>, <4 x i32>* %25
%27 = getelementptr inbounds [30 x i32], [30 x i32]* %1, i64 0, i64 12
%28 = bitcast i32* %27 to <4 x i32>*
%29 = load <4 x i32>, <4 x i32>* %28
%30 = getelementptr inbounds [30 x i32], [30 x i32]* %1, i64 0, i64 16
%31 = bitcast i32* %30 to <4 x i32>*
%32 = load <4 x i32>, <4 x i32>* %31
%33 = getelementptr inbounds [30 x i32], [30 x i32]* %1, i64 0, i64 20
%34 = bitcast i32* %33 to <4 x i32>*
%35 = load <4 x i32>, <4 x i32>* %34
%36 = getelementptr inbounds [30 x i32], [30 x i32]* %1, i64 0, i64 24
%37 = bitcast i32* %36 to <4 x i32>*
%38 = load <4 x i32>, <4 x i32>* %37
%39 = icmp eq <4 x i32> %20, %18
%40 = zext <4 x i1> %39 to <4 x i32>
%41 = icmp eq <4 x i32> %23, %18
%42 = zext <4 x i1> %41 to <4 x i32>
%43 = add nuw nsw <4 x i32> %40, %42
%44 = icmp eq <4 x i32> %26, %18
%45 = zext <4 x i1> %44 to <4 x i32>
%46 = add nuw nsw <4 x i32> %43, %45
%47 = icmp eq <4 x i32> %29, %18
%48 = zext <4 x i1> %47 to <4 x i32>
%49 = add nuw nsw <4 x i32> %46, %48
%50 = icmp eq <4 x i32> %32, %18
%51 = zext <4 x i1> %50 to <4 x i32>
%52 = add nuw nsw <4 x i32> %49, %51
%53 = icmp eq <4 x i32> %35, %18
%54 = zext <4 x i1> %53 to <4 x i32>
%55 = add nuw nsw <4 x i32> %52, %54
%56 = icmp eq <4 x i32> %38, %18
%57 = zext <4 x i1> %56 to <4 x i32>
%58 = add nuw nsw <4 x i32> %55, %57
%59 = call i32 @llvm.vector.reduce.add.v4i32(<4 x i32> %58)
%60 = icmp slt <4 x i32> %20, %18
%61 = zext <4 x i1> %60 to <4 x i32>
%62 = icmp slt <4 x i32> %23, %18
%63 = zext <4 x i1> %62 to <4 x i32>
%64 = add nuw nsw <4 x i32> %61, %63
%65 = icmp slt <4 x i32> %26, %18
%66 = zext <4 x i1> %65 to <4 x i32>
%67 = add nuw nsw <4 x i32> %64, %66
%68 = icmp slt <4 x i32> %29, %18
%69 = zext <4 x i1> %68 to <4 x i32>
%70 = add nuw nsw <4 x i32> %67, %69
%71 = icmp slt <4 x i32> %32, %18
%72 = zext <4 x i1> %71 to <4 x i32>
%73 = add nuw nsw <4 x i32> %70, %72
%74 = icmp slt <4 x i32> %35, %18
%75 = zext <4 x i1> %74 to <4 x i32>
%76 = add nuw nsw <4 x i32> %73, %75
%77 = icmp slt <4 x i32> %38, %18
%78 = zext <4 x i1> %77 to <4 x i32>
%79 = add nuw nsw <4 x i32> %76, %78
%80 = call i32 @llvm.vector.reduce.add.v4i32(<4 x i32> %79)
%81 = getelementptr inbounds [30 x i32], [30 x i32]* %1, i64 0, i64 28
%82 = load i32, i32* %81
%83 = icmp slt i32 %82, %15
%84 = zext i1 %83 to i32
%85 = add nuw nsw i32 %80, %84
%86 = icmp eq i32 %82, %15
%87 = zext i1 %86 to i32
%88 = add nuw nsw i32 %59, %87
%89 = getelementptr inbounds [30 x i32], [30 x i32]* %1, i64 0, i64 29
%90 = load i32, i32* %89
%91 = icmp slt i32 %90, %15
%92 = zext i1 %91 to i32
%93 = add nuw nsw i32 %85, %92
%94 = icmp eq i32 %90, %15
%95 = zext i1 %94 to i32
%96 = add nuw nsw i32 %88, %95
%97 = call i32 (i8*, i32, ...) @printf(i8* getelementptr inbounds ([97 x i8], [97 x i8]* @.str.3, i64 0, i64 0), i32 %96, i32 %93)
%98 = call i32 @system(i8* getelementptr inbounds ([6 x i8], [6 x i8]* @.str.4, i64 0, i64 0))
ret i32 0
}