#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 main() {
  int l, c, i, tot[100], pos, total = 0;
  char get;
  double porc;
  for (i = 0; i < 100; i++)
    tot[i] = 0;
  scanf("%d %d", &l, &c);
  for (i = 0; i <= l; i++) {
    do {
      scanf("%c", &get);
      pos = (int)get - 48;
      tot[pos] += 1;
      if (get != 10 && get != 32)
        total += 1;
    } while (get != 10);
  }
  printf("Total: %d individuos\n", total);
  for (i = 1; i <= c; i++)
    printf("Total da casta %d: %d\n", i, tot[i]);
  for (i = 1; i <= c; i++) {
    porc = ((tot[i] * 100.0) / total);
    printf("Percentual da casta %d: %.2f\n", i, porc);
  }
  return 0;
}


x86 assembly (clang, -O0):
<main>:
push   %rbp
mov    %rsp,%rbp
sub    $0x1c0,%rsp
movl   $0x0,-0x4(%rbp)
movl   $0x0,-0x1a8(%rbp)
movl   $0x0,-0x10(%rbp)
cmpl   $0x64,-0x10(%rbp)
jge    116a <main+0x4a>
movslq -0x10(%rbp),%rax
movl   $0x0,-0x1a0(%rbp,%rax,4)
mov    -0x10(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x10(%rbp)
jmp    1143 <main+0x23>
lea    0xe97(%rip),%rdi
lea    -0x8(%rbp),%rsi
lea    -0xc(%rbp),%rdx
mov    $0x0,%al
call   1040 <scanf@plt>
movl   $0x0,-0x10(%rbp)
mov    -0x10(%rbp),%eax
cmp    -0x8(%rbp),%eax
jg     122c <main+0x10c>
jmp    1198 <main+0x78>
lea    0xe6f(%rip),%rdi
lea    -0x1a9(%rbp),%rsi
mov    $0x0,%al
call   1040 <scanf@plt>
movsbl -0x1a9(%rbp),%eax
sub    $0x30,%eax
mov    %eax,-0x1a4(%rbp)
movslq -0x1a4(%rbp),%rax
mov    -0x1a0(%rbp,%rax,4),%ecx
add    $0x1,%ecx
mov    %ecx,-0x1a0(%rbp,%rax,4)
movsbl -0x1a9(%rbp),%eax
cmp    $0xa,%eax
je     1204 <main+0xe4>
movsbl -0x1a9(%rbp),%eax
cmp    $0x20,%eax
je     1204 <main+0xe4>
mov    -0x1a8(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x1a8(%rbp)
jmp    1209 <main+0xe9>
movsbl -0x1a9(%rbp),%eax
cmp    $0xa,%eax
jne    1198 <main+0x78>
jmp    121e <main+0xfe>
mov    -0x10(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x10(%rbp)
jmp    1187 <main+0x67>
mov    -0x1a8(%rbp),%esi
lea    0xdd8(%rip),%rdi
mov    $0x0,%al
call   1030 <printf@plt>
movl   $0x1,-0x10(%rbp)
mov    -0x10(%rbp),%eax
cmp    -0xc(%rbp),%eax
jg     127d <main+0x15d>
mov    -0x10(%rbp),%esi
movslq -0x10(%rbp),%rax
mov    -0x1a0(%rbp,%rax,4),%edx
lea    0xdbf(%rip),%rdi
mov    $0x0,%al
call   1030 <printf@plt>
mov    -0x10(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x10(%rbp)
jmp    1247 <main+0x127>
movl   $0x1,-0x10(%rbp)
mov    -0x10(%rbp),%eax
cmp    -0xc(%rbp),%eax
jg     12e4 <main+0x1c4>
movslq -0x10(%rbp),%rax
cvtsi2sdl -0x1a0(%rbp,%rax,4),%xmm0
ff ff
movsd  0xd5b(%rip),%xmm1
mulsd  %xmm1,%xmm0
cvtsi2sdl -0x1a8(%rbp),%xmm1
ff
divsd  %xmm1,%xmm0
movsd  %xmm0,-0x1b8(%rbp)
ff
mov    -0x10(%rbp),%esi
movsd  -0x1b8(%rbp),%xmm0
ff
lea    0xd6f(%rip),%rdi
mov    $0x1,%al
call   1030 <printf@plt>
mov    -0x10(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x10(%rbp)
jmp    1284 <main+0x164>
xor    %eax,%eax
add    $0x1c0,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<main>:
push   %rbp
push   %r15
push   %r14
push   %rbx
sub    $0x1b8,%rsp
lea    0x20(%rsp),%rdi
xor    %r14d,%r14d
mov    $0x190,%edx
xor    %esi,%esi
call   1040 <memset@plt>
lea    0xeb0(%rip),%rdi
lea    0x14(%rsp),%rsi
lea    0x10(%rsp),%rdx
xor    %eax,%eax
call   1050 <scanf@plt>
cmpl   $0x0,0x14(%rsp)
js     11cd <main+0x9d>
lea    0xe97(%rip),%rbx
lea    0xf(%rsp),%rbp
xor    %r14d,%r14d
xor    %r15d,%r15d
jmp    1194 <main+0x64>
cs nopw 0x0(%rax,%rax,1)
xchg   %ax,%ax
cmp    $0xa,%al
je     11bf <main+0x8f>
mov    %rbx,%rdi
mov    %rbp,%rsi
xor    %eax,%eax
call   1050 <scanf@plt>
movsbq 0xf(%rsp),%rax
addl   $0x1,-0xa0(%rsp,%rax,4)
01
cmp    $0xa,%rax
je     1190 <main+0x60>
cmp    $0x20,%al
je     1190 <main+0x60>
add    $0x1,%r14d
jmp    1190 <main+0x60>
lea    0x1(%r15),%eax
cmp    0x14(%rsp),%r15d
mov    %eax,%r15d
jl     1194 <main+0x64>
lea    0xe3d(%rip),%rdi
mov    %r14d,%esi
xor    %eax,%eax
call   1030 <printf@plt>
cmpl   $0x0,0x10(%rsp)
jle    1274 <main+0x144>
mov    $0x1,%ebp
lea    0xe32(%rip),%rbx
cs nopw 0x0(%rax,%rax,1)
nop
mov    0x20(%rsp,%rbp,4),%edx
mov    %rbx,%rdi
mov    %ebp,%esi
xor    %eax,%eax
call   1030 <printf@plt>
lea    0x1(%rbp),%rcx
movslq 0x10(%rsp),%rax
cmp    %rax,%rbp
mov    %rcx,%rbp
jl     1200 <main+0xd0>
test   %eax,%eax
jle    1274 <main+0x144>
cvtsi2sd %r14d,%xmm0
movsd  %xmm0,0x18(%rsp)
mov    $0x1,%ebx
lea    0xe02(%rip),%rbp
nopl   0x0(%rax)
xorps  %xmm0,%xmm0
cvtsi2sdl 0x20(%rsp,%rbx,4),%xmm0
mulsd  0xdaf(%rip),%xmm0
divsd  0x18(%rsp),%xmm0
mov    %rbp,%rdi
mov    %ebx,%esi
mov    $0x1,%al
call   1030 <printf@plt>
lea    0x1(%rbx),%rax
movslq 0x10(%rsp),%rcx
cmp    %rcx,%rbx
mov    %rax,%rbx
jl     1240 <main+0x110>
xor    %eax,%eax
add    $0x1b8,%rsp
pop    %rbx
pop    %r14
pop    %r15
pop    %rbp
ret

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

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