#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 *, unsigned long long, ...);
int /*<<< orphan*/ scanf(char *, int *, int *);
int main(void) {
  int n, k;
  unsigned long long k10 = 1, f = 1;
  scanf("%d %d", &n, &k);
  for (int i = 0; i <= k; i++) {
    k10 *= 10;
  }
  char truncated = 0;
  for (int i = 2; i <= n; i++) {
    f *= i;
    if (i % 5 == 0) {
      f /= 10;
    }
    if (f > k10) {
      f %= k10;
      truncated++;
    }
  }
  f %= (k10 / 10);
  if (truncated) {
    printf("%0*lld\n", k, f);
  } else {
    printf("%lld", f);
  }
  return 0;
}


x86 assembly (clang, -O0):
<main>:
push   %rbp
mov    %rsp,%rbp
sub    $0x30,%rsp
movl   $0x0,-0x4(%rbp)
movq   $0x1,-0x18(%rbp)
movq   $0x1,-0x20(%rbp)
lea    0xeba(%rip),%rdi
lea    -0x8(%rbp),%rsi
lea    -0xc(%rbp),%rdx
call   1040 <scanf@plt>
movl   $0x0,-0x24(%rbp)
mov    -0x24(%rbp),%eax
cmp    -0xc(%rbp),%eax
jg     117d <main+0x5d>
imul   $0xa,-0x18(%rbp),%rax
mov    %rax,-0x18(%rbp)
mov    -0x24(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x24(%rbp)
jmp    115a <main+0x3a>
movb   $0x0,-0x25(%rbp)
movl   $0x2,-0x2c(%rbp)
mov    -0x2c(%rbp),%eax
cmp    -0x8(%rbp),%eax
jg     1201 <main+0xe1>
movslq -0x2c(%rbp),%rax
imul   -0x20(%rbp),%rax
mov    %rax,-0x20(%rbp)
mov    -0x2c(%rbp),%eax
mov    $0x5,%ecx
cltd
idiv   %ecx
cmp    $0x0,%edx
jne    11c7 <main+0xa7>
mov    -0x20(%rbp),%rax
mov    $0xa,%ecx
xor    %edx,%edx
div    %rcx
mov    %rax,-0x20(%rbp)
mov    -0x20(%rbp),%rax
cmp    -0x18(%rbp),%rax
jbe    11ee <main+0xce>
mov    -0x18(%rbp),%rcx
mov    -0x20(%rbp),%rax
xor    %edx,%edx
div    %rcx
mov    %rdx,-0x20(%rbp)
mov    -0x25(%rbp),%al
add    $0x1,%al
mov    %al,-0x25(%rbp)
jmp    11f3 <main+0xd3>
mov    -0x2c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x2c(%rbp)
jmp    1188 <main+0x68>
mov    -0x18(%rbp),%rax
mov    $0xa,%ecx
xor    %edx,%edx
div    %rcx
mov    %rax,%rcx
mov    -0x20(%rbp),%rax
xor    %edx,%edx
div    %rcx
mov    %rdx,-0x20(%rbp)
cmpb   $0x0,-0x25(%rbp)
je     1244 <main+0x124>
movslq -0xc(%rbp),%rsi
mov    -0x20(%rbp),%rdx
lea    0xdce(%rip),%rdi
mov    $0x0,%al
call   1030 <printf@plt>
jmp    1256 <main+0x136>
mov    -0x20(%rbp),%rsi
lea    0xdbf(%rip),%rdi
mov    $0x0,%al
call   1030 <printf@plt>
xor    %eax,%eax
add    $0x30,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<main>:
push   %r14
push   %rbx
push   %rax
lea    0xed5(%rip),%rdi
lea    0x4(%rsp),%rsi
mov    %rsp,%rdx
call   1040 <scanf@plt>
movslq (%rsp),%rsi
test   %rsi,%rsi
js     1155 <main+0x35>
lea    0x1(%rsi),%edx
mov    %edx,%eax
and    $0x7,%eax
cmp    $0x7,%esi
jae    115c <main+0x3c>
mov    $0x1,%ecx
jmp    117c <main+0x5c>
mov    $0x1,%ecx
jmp    118c <main+0x6c>
and    $0xfffffff8,%edx
mov    $0x1,%ecx
cs nopw 0x0(%rax,%rax,1)
xchg   %ax,%ax
imul   $0x5f5e100,%rcx,%rcx
add    $0xfffffff8,%edx
jne    1170 <main+0x50>
test   %eax,%eax
je     118c <main+0x6c>
add    %rcx,%rcx
lea    (%rcx,%rcx,4),%rcx
add    $0xffffffff,%eax
jne    1180 <main+0x60>
mov    0x4(%rsp),%r9d
cmp    $0x1,%r9d
jg     11a9 <main+0x89>
add    $0xffffffffffffffec,%rcx
xor    %edx,%edx
cmp    $0xfffffffffffffff6,%rcx
setb   %dl
jmp    128c <main+0x16c>
add    $0x1,%r9
mov    $0x1,%r10d
mov    $0x2,%edi
mov    $0x2,%r11d
xor    %r8d,%r8d
mov    $0xcccccccd,%ebx
movabs $0xcccccccccccccccd,%r14
cc cc cc
jmp    11fc <main+0xdc>
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax)
mov    %r10,%rax
xor    %edx,%edx
div    %rcx
mov    %rdx,%r10
add    $0x1,%r8b
add    $0x1,%rdi
add    $0x1,%r11d
cmp    %rdi,%r9
je     124a <main+0x12a>
mov    %r11d,%eax
imul   %rbx,%rax
shr    $0x22,%rax
lea    (%rax,%rax,4),%eax
imul   %rdi,%r10
cmp    %eax,%edi
je     1220 <main+0x100>
cmp    %rcx,%r10
jbe    11ef <main+0xcf>
jmp    1232 <main+0x112>
nopl   0x0(%rax)
mov    %r10,%rax
mul    %r14
mov    %rdx,%r10
shr    $0x3,%r10
cmp    %rcx,%r10
jbe    11ef <main+0xcf>
mov    %r10,%rax
or     %rcx,%rax
shr    $0x20,%rax
jne    11e0 <main+0xc0>
mov    %r10d,%eax
xor    %edx,%edx
div    %ecx
mov    %edx,%r10d
jmp    11eb <main+0xcb>
mov    %rcx,%rax
mul    %r14
mov    %rdx,%rcx
shr    $0x3,%rcx
mov    %r10,%rax
or     %rcx,%rax
shr    $0x20,%rax
je     1280 <main+0x160>
mov    %r10,%rax
xor    %edx,%edx
div    %rcx
test   %r8b,%r8b
je     128c <main+0x16c>
lea    0xd8f(%rip),%rdi
xor    %eax,%eax
call   1030 <printf@plt>
jmp    129d <main+0x17d>
mov    %r10d,%eax
xor    %edx,%edx
div    %ecx
test   %r8b,%r8b
jne    1270 <main+0x150>
lea    0xd7b(%rip),%rdi
mov    %rdx,%rsi
xor    %eax,%eax
call   1030 <printf@plt>
xor    %eax,%eax
add    $0x8,%rsp
pop    %rbx
pop    %r14
ret

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

LLVM IR (-O2):
@.str = [6 x i8] c"%d %d\00"
@.str.1 = [8 x i8] c"%0*lld\0A\00"
@.str.2 = [5 x i8] c"%lld\00"
define i32 @main() {
%1 = alloca i32
%2 = alloca i32
%3 = bitcast i32* %1 to i8*
%4 = bitcast i32* %2 to i8*
%5 = call i32 @scanf(i8* getelementptr inbounds ([6 x i8], [6 x i8]* @.str, i64 0, i64 0), i32* %1, i32* %2)
%6 = load i32, i32* %2
%7 = icmp slt i32 %6, 0
br i1 %7, label %24, label %8
8: ; preds = %0
%9 = add i32 %6, 1
%10 = and i32 %9, 7
%11 = icmp ult i32 %6, 7
br i1 %11, label %14, label %12
12: ; preds = %8
%13 = and i32 %9, -8
br label %35
14: ; preds = %35, %8
%15 = phi i64 [ undef, %8 ], [ %38, %35 ]
%16 = phi i64 [ 1, %8 ], [ %38, %35 ]
%17 = icmp eq i32 %10, 0
br i1 %17, label %24, label %18
18: ; preds = %14, %18
%19 = phi i64 [ %21, %18 ], [ %16, %14 ]
%20 = phi i32 [ %22, %18 ], [ 0, %14 ]
%21 = mul i64 %19, 10
%22 = add i32 %20, 1
%23 = icmp eq i32 %22, %10
br i1 %23, label %24, label %18
24: ; preds = %14, %18, %0
%25 = phi i64 [ 1, %0 ], [ %15, %14 ], [ %21, %18 ]
%26 = load i32, i32* %1
%27 = icmp slt i32 %26, 2
br i1 %27, label %28, label %32
28: ; preds = %24
%29 = add i64 %25, -20
%30 = icmp ult i64 %29, -10
%31 = zext i1 %30 to i64
br label %67
32: ; preds = %24
%33 = add nuw i32 %26, 1
%34 = zext i32 %33 to i64
br label %45
35: ; preds = %35, %12
%36 = phi i64 [ 1, %12 ], [ %38, %35 ]
%37 = phi i32 [ 0, %12 ], [ %39, %35 ]
%38 = mul i64 %36, 100000000
%39 = add i32 %37, 8
%40 = icmp eq i32 %39, %13
br i1 %40, label %14, label %35
41: ; preds = %59
%42 = udiv i64 %25, 10
%43 = urem i64 %60, %42
%44 = icmp eq i8 %61, 0
br i1 %44, label %67, label %64
45: ; preds = %32, %59
%46 = phi i64 [ 2, %32 ], [ %62, %59 ]
%47 = phi i8 [ 0, %32 ], [ %61, %59 ]
%48 = phi i64 [ 1, %32 ], [ %60, %59 ]
%49 = mul i64 %48, %46
%50 = trunc i64 %46 to i32
%51 = urem i32 %50, 5
%52 = icmp eq i32 %51, 0
%53 = udiv i64 %49, 10
%54 = select i1 %52, i64 %53, i64 %49
%55 = icmp ugt i64 %54, %25
br i1 %55, label %56, label %59
56: ; preds = %45
%57 = urem i64 %54, %25
%58 = add i8 %47, 1
br label %59
59: ; preds = %45, %56
%60 = phi i64 [ %57, %56 ], [ %54, %45 ]
%61 = phi i8 [ %58, %56 ], [ %47, %45 ]
%62 = add nuw nsw i64 %46, 1
%63 = icmp eq i64 %62, %34
br i1 %63, label %41, label %45
64: ; preds = %41
%65 = sext i32 %6 to i64
%66 = call i32 (i8*, i64, ...) @printf(i8* getelementptr inbounds ([8 x i8], [8 x i8]* @.str.1, i64 0, i64 0), i64 %65, i64 %43)
br label %70
67: ; preds = %28, %41
%68 = phi i64 [ %31, %28 ], [ %43, %41 ]
%69 = call i32 (i8*, i64, ...) @printf(i8* getelementptr inbounds ([5 x i8], [5 x i8]* @.str.2, i64 0, i64 0), i64 %68)
br label %70
70: ; preds = %67, %64
ret i32 0
}