user: Translate the below assembly code into C programming language:

```asm
<main>:
  endbr64
  push   %r15
  push   %r14
  push   %r13
  push   %r12
  push   %rbp
  push   %rbx
  sub    $0xd8,%rsp
  mov    %fs:0x28,%rax
  mov    %rax,0xc8(%rsp)
  xor    %eax,%eax
  lea    0x20(%rsp),%rax
  mov    %rax,(%rsp)
  lea    0xc0(%rsp),%rdx
L3:
  movl   $0x0,(%rax)
  add    $0x4,%rax
  cmp    %rdx,%rax
  jne    L3
  movl   $0x1,0x20(%rsp)
  movl   $0x1,0x24(%rsp)
  lea    D28(%rip),%rdi
  mov    $0x0,%eax
  call   <printf@plt>
  lea    0x1c(%rsp),%rsi
  lea    D15(%rip),%rdi
  call   <scanf@plt>
  mov    $0x1,%r12d
  mov    $0x1,%ebx
  lea    0x24(%rsp),%r15
  mov    (%rsp),%rax
  add    $0x8,%rax
  mov    %rax,0x8(%rsp)
  lea    D15(%rip),%r14
  cmpl   $0x0,0x1c(%rsp)
  jg     L22
L152:
  mov    0xc8(%rsp),%rax
  sub    %fs:0x28,%rax
  jne    L126
  add    $0xd8,%rsp
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  ret
L156:
  add    $0x1,%esi
  mov    (%rdx),%ecx
  movslq %ecx,%rax
  imul   $0x66666667,%rax,%rax
  sar    $0x22,%rax
  mov    %ecx,%r9d
  sar    $0x1f,%r9d
  sub    %r9d,%eax
  add    %eax,0x4(%rdx)
  lea    (%rax,%rax,4),%eax
  add    %eax,%eax
  sub    %eax,%ecx
  mov    %ecx,(%rdx)
  add    $0x4,%rdx
  cmp    %ebx,%esi
  jg     L38
L59:
  movslq %ebx,%rax
  cmpl   $0xa,0x20(%rsp,%rax,4)
  jle    L156
  add    $0x1,%ebx
  jmp    L156
L38:
  add    $0x1,%rdi
  cmp    %edi,%ebx
  jl     L86
L140:
  cmpl   $0xa,(%r8,%rdi,4)
  jle    L38
  test   %ebx,%ebx
  jle    L38
  mov    %r15,%rdx
  mov    $0x1,%esi
  jmp    L59
L86:
  mov    %r12d,%esi
  lea    D38(%rip),%rdi
  mov    $0x0,%eax
  call   <printf@plt>
  test   %ebx,%ebx
  je     L85
  movslq %ebx,%rax
  shl    $0x2,%rax
  lea    0x20(%rsp,%rax,1),%rbp
  mov    (%rsp),%rdi
  lea    -0x4(%rdi,%rax,1),%r13
  lea    -0x1(%rbx),%eax
  shl    $0x2,%rax
  sub    %rax,%r13
L69:
  mov    0x0(%rbp),%esi
  mov    %r14,%rdi
  mov    $0x0,%eax
  call   <printf@plt>
  sub    $0x4,%rbp
  cmp    %rbp,%r13
  jne    L69
L85:
  mov    $0xa,%edi
  call   <putchar@plt>
  mov    $0x0,%eax
  call   <getch@plt>
  add    $0x1,%r12d
  cmp    %r12d,0x1c(%rsp)
  jl     L152
L22:
  test   %ebx,%ebx
  jle    L86
  lea    -0x1(%rbx),%eax
  mov    0x8(%rsp),%rdi
  lea    (%rdi,%rax,4),%rcx
  mov    %r15,%rax
L155:
  mov    %r12d,%edx
  imul   (%rax),%edx
  mov    %edx,(%rax)
  add    $0x4,%rax
  cmp    %rcx,%rax
  jne    L155
  mov    $0x1,%edi
  lea    0x20(%rsp),%r8
  jmp    L140
L126:
  call   <__stack_chk_fail@plt>
```

tool_calls: name: disassemble_data
arguments: label: D28
type: string
name: disassemble_data
arguments: label: D15
type: string
name: disassemble_data
arguments: label: D38
type: string

tool: D28: Enter a number what you want to calculus:

tool: D15: %d

tool: D38: %d!=  

assistant: ```c
void main() {
  int Data[40];
  int Digit;
  int i, j, r, k;
  int N;
  for (i = 0; i < 40; i++)
    Data[i] = 0;
  Data[0] = 1;
  Data[1] = 1;
  Digit = 1;
  printf("Enter a number what you want to calculus:");
  scanf("%d", &N);
  for (i = 1; i < N + 1; i++) {
    for (j = 1; j < Digit + 1; j++)
      Data[j] *= i;
    for (j = 1; j < Digit + 1; j++) {
      if (Data[j] > 10) {
        for (r = 1; r < Digit + 1; r++) {
          if (Data[Digit] > 10)
            Digit++;
          Data[r + 1] += Data[r] / 10;
          Data[r] = Data[r] % 10;
        }
      }
    }
    printf("%d!=  ", i);
    for (k = Digit; k; k--)
      printf("%d", Data[k]);
    printf("\n");
    getch();
  }
}
```