user: 请将以下的汇编代码转换成C语言代码：

```asm
<main>:
  endbr64
  push   %rbp
  mov    %rsp,%rbp
  sub    $0xd0,%rsp
  mov    %fs:0x28,%rax
  mov    %rax,-0x8(%rbp)
  xor    %eax,%eax
  movl   $0x0,-0xc0(%rbp)
  jmp    L45
L30:
  mov    -0xc0(%rbp),%eax
  cltq
  movl   $0x0,-0xb0(%rbp,%rax,4)
  addl   $0x1,-0xc0(%rbp)
L45:
  cmpl   $0x27,-0xc0(%rbp)
  jle    L30
  movl   $0x1,-0xb0(%rbp)
  movl   $0x1,-0xac(%rbp)
  movl   $0x1,-0xc4(%rbp)
  lea    D13(%rip),%rax
  mov    %rax,%rdi
  mov    $0x0,%eax
  call   <printf@plt>
  lea    -0xc8(%rbp),%rax
  mov    %rax,%rsi
  lea    D22(%rip),%rax
  mov    %rax,%rdi
  call   <scanf@plt>
  movl   $0x1,-0xc0(%rbp)
  jmp    L21
L94:
  movl   $0x1,-0xbc(%rbp)
  jmp    L46
L50:
  mov    -0xbc(%rbp),%eax
  cltq
  mov    -0xb0(%rbp,%rax,4),%eax
  imul   -0xc0(%rbp),%eax
  mov    %eax,%edx
  mov    -0xbc(%rbp),%eax
  cltq
  mov    %edx,-0xb0(%rbp,%rax,4)
  addl   $0x1,-0xbc(%rbp)
L46:
  mov    -0xc4(%rbp),%eax
  cmp    -0xbc(%rbp),%eax
  jge    L50
  movl   $0x1,-0xbc(%rbp)
  jmp    L110
L97:
  mov    -0xbc(%rbp),%eax
  cltq
  mov    -0xb0(%rbp,%rax,4),%eax
  cmp    $0xa,%eax
  jle    L119
  movl   $0x1,-0xb8(%rbp)
  jmp    L88
L39:
  mov    -0xc4(%rbp),%eax
  cltq
  mov    -0xb0(%rbp,%rax,4),%eax
  cmp    $0xa,%eax
  jle    L111
  addl   $0x1,-0xc4(%rbp)
L111:
  mov    -0xb8(%rbp),%eax
  add    $0x1,%eax
  cltq
  mov    -0xb0(%rbp,%rax,4),%ecx
  mov    -0xb8(%rbp),%eax
  cltq
  mov    -0xb0(%rbp,%rax,4),%eax
  movslq %eax,%rdx
  imul   $0x66666667,%rdx,%rdx
  shr    $0x20,%rdx
  sar    $0x2,%edx
  sar    $0x1f,%eax
  sub    %eax,%edx
  mov    -0xb8(%rbp),%eax
  add    $0x1,%eax
  add    %ecx,%edx
  cltq
  mov    %edx,-0xb0(%rbp,%rax,4)
  mov    -0xb8(%rbp),%eax
  cltq
  mov    -0xb0(%rbp,%rax,4),%ecx
  movslq %ecx,%rax
  imul   $0x66666667,%rax,%rax
  shr    $0x20,%rax
  sar    $0x2,%eax
  mov    %ecx,%esi
  sar    $0x1f,%esi
  sub    %esi,%eax
  mov    %eax,%edx
  mov    %edx,%eax
  shl    $0x2,%eax
  add    %edx,%eax
  add    %eax,%eax
  sub    %eax,%ecx
  mov    %ecx,%edx
  mov    -0xb8(%rbp),%eax
  cltq
  mov    %edx,-0xb0(%rbp,%rax,4)
  addl   $0x1,-0xb8(%rbp)
L88:
  mov    -0xc4(%rbp),%eax
  cmp    -0xb8(%rbp),%eax
  jge    L39
L119:
  addl   $0x1,-0xbc(%rbp)
L110:
  mov    -0xc4(%rbp),%eax
  cmp    -0xbc(%rbp),%eax
  jge    L97
  mov    -0xc0(%rbp),%eax
  mov    %eax,%esi
  lea    D9(%rip),%rax
  mov    %rax,%rdi
  mov    $0x0,%eax
  call   <printf@plt>
  mov    -0xc4(%rbp),%eax
  mov    %eax,-0xb4(%rbp)
  jmp    L13
L141:
  mov    -0xb4(%rbp),%eax
  cltq
  mov    -0xb0(%rbp,%rax,4),%eax
  mov    %eax,%esi
  lea    D22(%rip),%rax
  mov    %rax,%rdi
  mov    $0x0,%eax
  call   <printf@plt>
  subl   $0x1,-0xb4(%rbp)
L13:
  cmpl   $0x0,-0xb4(%rbp)
  jne    L141
  mov    $0xa,%edi
  call   <putchar@plt>
  mov    $0x0,%eax
  call   <getch@plt>
  addl   $0x1,-0xc0(%rbp)
L21:
  mov    -0xc8(%rbp),%eax
  cmp    %eax,-0xc0(%rbp)
  jle    L94
  nop
  mov    -0x8(%rbp),%rax
  sub    %fs:0x28,%rax
  je     L90
  call   <__stack_chk_fail@plt>
L90:
  leave
  ret
```

tool_calls: name: disassemble_data
arguments: data_label: D13
data_type: string
name: disassemble_data
arguments: data_label: D22
data_type: string
name: disassemble_data
arguments: data_label: D9
data_type: string

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

tool: D22: %d

tool: D9: %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();
  }
}
```