long long choose(long long n, long long k) {
  if (n == k) {
    return 1;
  } else if (n < k) {
    return 0;
  } else {
    long long res = 1;
    long long i;
    for (i = 0; i < k; i++) {
      res *= (n - i);
    }
    for (i = 1; i <= k; i++) {
      res /= i;
    }
    return res;
  }
}


x86 assembly (clang, -O0):
<choose>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x10(%rbp)
mov    %rsi,-0x18(%rbp)
mov    -0x10(%rbp),%rax
cmp    -0x18(%rbp),%rax
jne    1127 <choose+0x27>
movq   $0x1,-0x8(%rbp)
jmp    11c2 <choose+0xc2>
mov    -0x10(%rbp),%rax
cmp    -0x18(%rbp),%rax
jge    1142 <choose+0x42>
movq   $0x0,-0x8(%rbp)
jmp    11c2 <choose+0xc2>
movq   $0x1,-0x20(%rbp)
movq   $0x0,-0x28(%rbp)
mov    -0x28(%rbp),%rax
cmp    -0x18(%rbp),%rax
jge    1182 <choose+0x82>
mov    -0x10(%rbp),%rax
sub    -0x28(%rbp),%rax
imul   -0x20(%rbp),%rax
mov    %rax,-0x20(%rbp)
mov    -0x28(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x28(%rbp)
jmp    1152 <choose+0x52>
movq   $0x1,-0x28(%rbp)
mov    -0x28(%rbp),%rax
cmp    -0x18(%rbp),%rax
jg     11ba <choose+0xba>
mov    -0x28(%rbp),%rcx
mov    -0x20(%rbp),%rax
cqto
idiv   %rcx
mov    %rax,-0x20(%rbp)
mov    -0x28(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x28(%rbp)
jmp    118a <choose+0x8a>
mov    -0x20(%rbp),%rax
mov    %rax,-0x8(%rbp)
mov    -0x8(%rbp),%rax
pop    %rbp
ret

x86 assembly (clang, -O2):
<choose>:
mov    $0x1,%eax
cmp    %rsi,%rdi
jne    110b <choose+0xb>
ret
jge    1110 <choose+0x10>
xor    %eax,%eax
ret
test   %rsi,%rsi
jle    110a <choose+0xa>
lea    -0x1(%rsi),%r9
mov    %esi,%r10d
and    $0x7,%r10d
cmp    $0x7,%r9
jae    113b <choose+0x3b>
mov    $0x1,%eax
xor    %edx,%edx
test   %r10,%r10
jne    11be <choose+0xbe>
jmp    11de <choose+0xde>
push   %rbx
mov    %rsi,%r8
and    $0xfffffffffffffff8,%r8
neg    %r8
mov    $0x1,%eax
xor    %edx,%edx
nopl   (%rax)
lea    (%rdi,%rdx,1),%rcx
imul   %rax,%rcx
lea    (%rdi,%rdx,1),%r11
add    $0xffffffffffffffff,%r11
lea    (%rdi,%rdx,1),%rax
add    $0xfffffffffffffffe,%rax
imul   %r11,%rax
imul   %rcx,%rax
lea    (%rdi,%rdx,1),%r11
add    $0xfffffffffffffffd,%r11
lea    (%rdi,%rdx,1),%rbx
add    $0xfffffffffffffffc,%rbx
imul   %r11,%rbx
lea    (%rdi,%rdx,1),%rcx
add    $0xfffffffffffffffb,%rcx
imul   %rbx,%rcx
imul   %rax,%rcx
lea    (%rdi,%rdx,1),%rbx
add    $0xfffffffffffffffa,%rbx
lea    (%rdi,%rdx,1),%rax
add    $0xfffffffffffffff9,%rax
imul   %rbx,%rax
imul   %rcx,%rax
add    $0xfffffffffffffff8,%rdx
cmp    %rdx,%r8
jne    1150 <choose+0x50>
neg    %rdx
pop    %rbx
test   %r10,%r10
je     11de <choose+0xde>
sub    %rdx,%rdi
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax,%rax,1)
imul   %rdi,%rax
add    $0xffffffffffffffff,%rdi
add    $0xffffffffffffffff,%r10
jne    11d0 <choose+0xd0>
test   %rsi,%rsi
jle    110a <choose+0xa>
mov    %esi,%r8d
and    $0x3,%r8d
cmp    $0x3,%r9
jae    1207 <choose+0x107>
mov    $0x1,%edi
test   %r8,%r8
jne    12d3 <choose+0x1d3>
jmp    110a <choose+0xa>
and    $0xfffffffffffffffc,%rsi
mov    $0x1,%edx
jmp    1232 <choose+0x132>
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax)
cqto
idiv   %rcx
lea    0x1(%rcx),%rdx
cmp    %rsi,%rcx
je     12b1 <choose+0x1b1>
mov    %rdx,%rdi
mov    %rax,%rcx
or     %rdx,%rcx
shr    $0x20,%rcx
je     1250 <choose+0x150>
cqto
idiv   %rdi
jmp    1254 <choose+0x154>
nopl   0x0(%rax,%rax,1)
xor    %edx,%edx
div    %edi
lea    0x1(%rdi),%rcx
mov    %rax,%rdx
or     %rcx,%rdx
shr    $0x20,%rdx
je     1270 <choose+0x170>
cqto
idiv   %rcx
jmp    1274 <choose+0x174>
nopl   0x0(%rax,%rax,1)
xor    %edx,%edx
div    %ecx
add    $0x1,%rcx
mov    %rax,%rdx
or     %rcx,%rdx
shr    $0x20,%rdx
je     1290 <choose+0x190>
cqto
idiv   %rcx
jmp    1294 <choose+0x194>
nopl   0x0(%rax,%rax,1)
xor    %edx,%edx
div    %ecx
add    $0x1,%rcx
mov    %rax,%rdx
or     %rcx,%rdx
shr    $0x20,%rdx
jne    1220 <choose+0x120>
xor    %edx,%edx
div    %ecx
jmp    1225 <choose+0x125>
add    $0x4,%rdi
test   %r8,%r8
jne    12d3 <choose+0x1d3>
jmp    110a <choose+0xa>
nop
cqto
idiv   %rdi
add    $0x1,%rdi
add    $0xffffffffffffffff,%r8
je     110a <choose+0xa>
mov    %rax,%rcx
or     %rdi,%rcx
shr    $0x20,%rcx
jne    12c0 <choose+0x1c0>
xor    %edx,%edx
div    %edi
jmp    12c5 <choose+0x1c5>

LLVM IR (-O0):
define i64 @choose(i64 %0, i64 %1) {
%3 = alloca i64
%4 = alloca i64
%5 = alloca i64
%6 = alloca i64
%7 = alloca i64
store i64 %0, i64* %4
store i64 %1, i64* %5
%8 = load i64, i64* %4
%9 = load i64, i64* %5
%10 = icmp eq i64 %8, %9
br i1 %10, label %11, label %12
11: ; preds = %2
store i64 1, i64* %3
br label %45
12: ; preds = %2
%13 = load i64, i64* %4
%14 = load i64, i64* %5
%15 = icmp slt i64 %13, %14
br i1 %15, label %16, label %17
16: ; preds = %12
store i64 0, i64* %3
br label %45
17: ; preds = %12
store i64 1, i64* %6
store i64 0, i64* %7
br label %18
18: ; preds = %28, %17
%19 = load i64, i64* %7
%20 = load i64, i64* %5
%21 = icmp slt i64 %19, %20
br i1 %21, label %22, label %31
22: ; preds = %18
%23 = load i64, i64* %4
%24 = load i64, i64* %7
%25 = sub nsw i64 %23, %24
%26 = load i64, i64* %6
%27 = mul nsw i64 %26, %25
store i64 %27, i64* %6
br label %28
28: ; preds = %22
%29 = load i64, i64* %7
%30 = add nsw i64 %29, 1
store i64 %30, i64* %7
br label %18
31: ; preds = %18
store i64 1, i64* %7
br label %32
32: ; preds = %40, %31
%33 = load i64, i64* %7
%34 = load i64, i64* %5
%35 = icmp sle i64 %33, %34
br i1 %35, label %36, label %43
36: ; preds = %32
%37 = load i64, i64* %7
%38 = load i64, i64* %6
%39 = sdiv i64 %38, %37
store i64 %39, i64* %6
br label %40
40: ; preds = %36
%41 = load i64, i64* %7
%42 = add nsw i64 %41, 1
store i64 %42, i64* %7
br label %32
43: ; preds = %32
%44 = load i64, i64* %6
store i64 %44, i64* %3
br label %45
45: ; preds = %43, %16, %11
%46 = load i64, i64* %3
ret i64 %46
}

LLVM IR (-O2):
define i64 @choose(i64 %0, i64 %1) {
%3 = icmp eq i64 %0, %1
br i1 %3, label %93, label %4
4: ; preds = %2
%5 = icmp slt i64 %0, %1
br i1 %5, label %93, label %6
6: ; preds = %4
%7 = icmp sgt i64 %1, 0
br i1 %7, label %8, label %93
8: ; preds = %6
%9 = add i64 %1, -1
%10 = and i64 %1, 7
%11 = icmp ult i64 %9, 7
br i1 %11, label %14, label %12
12: ; preds = %8
%13 = and i64 %1, -8
br label %36
14: ; preds = %36, %8
%15 = phi i64 [ undef, %8 ], [ %62, %36 ]
%16 = phi i64 [ 0, %8 ], [ %63, %36 ]
%17 = phi i64 [ 1, %8 ], [ %62, %36 ]
%18 = icmp eq i64 %10, 0
br i1 %18, label %28, label %19
19: ; preds = %14, %19
%20 = phi i64 [ %25, %19 ], [ %16, %14 ]
%21 = phi i64 [ %24, %19 ], [ %17, %14 ]
%22 = phi i64 [ %26, %19 ], [ 0, %14 ]
%23 = sub nsw i64 %0, %20
%24 = mul nsw i64 %23, %21
%25 = add nuw nsw i64 %20, 1
%26 = add i64 %22, 1
%27 = icmp eq i64 %26, %10
br i1 %27, label %28, label %19
28: ; preds = %19, %14
%29 = phi i64 [ %15, %14 ], [ %24, %19 ]
%30 = icmp slt i64 %1, 1
br i1 %30, label %93, label %31
31: ; preds = %28
%32 = and i64 %1, 3
%33 = icmp ult i64 %9, 3
br i1 %33, label %80, label %34
34: ; preds = %31
%35 = and i64 %1, -4
br label %66
36: ; preds = %36, %12
%37 = phi i64 [ 0, %12 ], [ %63, %36 ]
%38 = phi i64 [ 1, %12 ], [ %62, %36 ]
%39 = phi i64 [ 0, %12 ], [ %64, %36 ]
%40 = sub nsw i64 %0, %37
%41 = mul nsw i64 %40, %38
%42 = xor i64 %37, -1
%43 = add i64 %42, %0
%44 = mul nsw i64 %43, %41
%45 = or i64 %37, 2
%46 = sub nsw i64 %0, %45
%47 = mul nsw i64 %46, %44
%48 = or i64 %37, 3
%49 = sub nsw i64 %0, %48
%50 = mul nsw i64 %49, %47
%51 = or i64 %37, 4
%52 = sub nsw i64 %0, %51
%53 = mul nsw i64 %52, %50
%54 = or i64 %37, 5
%55 = sub nsw i64 %0, %54
%56 = mul nsw i64 %55, %53
%57 = or i64 %37, 6
%58 = sub nsw i64 %0, %57
%59 = mul nsw i64 %58, %56
%60 = or i64 %37, 7
%61 = sub nsw i64 %0, %60
%62 = mul nsw i64 %61, %59
%63 = add nuw nsw i64 %37, 8
%64 = add i64 %39, 8
%65 = icmp eq i64 %64, %13
br i1 %65, label %14, label %36
66: ; preds = %66, %34
%67 = phi i64 [ 1, %34 ], [ %77, %66 ]
%68 = phi i64 [ %29, %34 ], [ %76, %66 ]
%69 = phi i64 [ 0, %34 ], [ %78, %66 ]
%70 = sdiv i64 %68, %67
%71 = add nuw nsw i64 %67, 1
%72 = sdiv i64 %70, %71
%73 = add nuw nsw i64 %67, 2
%74 = sdiv i64 %72, %73
%75 = add nuw i64 %67, 3
%76 = sdiv i64 %74, %75
%77 = add nuw i64 %67, 4
%78 = add i64 %69, 4
%79 = icmp eq i64 %78, %35
br i1 %79, label %80, label %66
80: ; preds = %66, %31
%81 = phi i64 [ undef, %31 ], [ %76, %66 ]
%82 = phi i64 [ 1, %31 ], [ %77, %66 ]
%83 = phi i64 [ %29, %31 ], [ %76, %66 ]
%84 = icmp eq i64 %32, 0
br i1 %84, label %93, label %85
85: ; preds = %80, %85
%86 = phi i64 [ %90, %85 ], [ %82, %80 ]
%87 = phi i64 [ %89, %85 ], [ %83, %80 ]
%88 = phi i64 [ %91, %85 ], [ 0, %80 ]
%89 = sdiv i64 %87, %86
%90 = add nuw i64 %86, 1
%91 = add i64 %88, 1
%92 = icmp eq i64 %91, %32
br i1 %92, label %93, label %85
93: ; preds = %80, %85, %6, %28, %4, %2
%94 = phi i64 [ 1, %2 ], [ 0, %4 ], [ %29, %28 ], [ 1, %6 ], [ %81, %80 ], [ %89, %85 ]
ret i64 %94
}