#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 *, int *);
scalar_t__ sqrt(int);
int main() {
  int n, m, i, j, flag, num[500];
  do {
    num[498] = 0;
    num[499] = 0;
    scanf("%d,%d", &n, &m);
    if (n == 0 && m == 0)
      break;
    for (i = n; i != m + 1; ++i) {
      if (i > 1) {
        flag = 1;
        for (j = 2; j <= (int)sqrt(i * 1.0); ++j)
          if (i % j == 0) {
            flag = 0;
            break;
          }
        if (flag == 1)
          num[num[499]++] = i;
      }
    }
    for (i = 0; i < num[499] - 1; ++i)
      for (j = i + 1; j < num[499]; ++j)
        if (num[j] - num[i] <= 2) {
          printf("%d %d\n", num[i], num[j]);
          ++num[498];
        }
    printf("%d\n", num[498]);
  } while (1);
  return 0;
}


x86 assembly (clang, -O0):
<main>:
push   %rbp
mov    %rsp,%rbp
sub    $0x800,%rsp
movl   $0x0,-0x4(%rbp)
movl   $0x0,-0x28(%rbp)
movl   $0x0,-0x24(%rbp)
lea    0xeb1(%rip),%rdi
lea    -0x8(%rbp),%rsi
lea    -0xc(%rbp),%rdx
call   1040 <scanf@plt>
cmpl   $0x0,-0x8(%rbp)
jne    117d <main+0x4d>
cmpl   $0x0,-0xc(%rbp)
jne    117d <main+0x4d>
jmp    1307 <main+0x1d7>
mov    -0x8(%rbp),%eax
mov    %eax,-0x10(%rbp)
mov    -0x10(%rbp),%eax
mov    -0xc(%rbp),%ecx
add    $0x1,%ecx
cmp    %ecx,%eax
je     1248 <main+0x118>
cmpl   $0x1,-0x10(%rbp)
jle    1235 <main+0x105>
movl   $0x1,-0x18(%rbp)
movl   $0x2,-0x14(%rbp)
mov    -0x14(%rbp),%eax
mov    %eax,-0x7f4(%rbp)
cvtsi2sdl -0x10(%rbp),%xmm0
movsd  0xe3e(%rip),%xmm1
mulsd  %xmm1,%xmm0
cvttsd2si %xmm0,%edi
call   1050 <sqrt@plt>
mov    %rax,%rcx
mov    -0x7f4(%rbp),%eax
cmp    %ecx,%eax
jg     120f <main+0xdf>
mov    -0x10(%rbp),%eax
cltd
idivl  -0x14(%rbp)
cmp    $0x0,%edx
jne    11fc <main+0xcc>
movl   $0x0,-0x18(%rbp)
jmp    120f <main+0xdf>
jmp    1201 <main+0xd1>
mov    -0x14(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x14(%rbp)
jmp    11ac <main+0x7c>
cmpl   $0x1,-0x18(%rbp)
jne    1230 <main+0x100>
mov    -0x10(%rbp),%ecx
mov    -0x24(%rbp),%eax
mov    %eax,%edx
add    $0x1,%edx
mov    %edx,-0x24(%rbp)
cltq
mov    %ecx,-0x7f0(%rbp,%rax,4)
jmp    1235 <main+0x105>
jmp    123a <main+0x10a>
mov    -0x10(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x10(%rbp)
jmp    1183 <main+0x53>
movl   $0x0,-0x10(%rbp)
mov    -0x10(%rbp),%eax
mov    -0x24(%rbp),%ecx
sub    $0x1,%ecx
cmp    %ecx,%eax
jge    12e7 <main+0x1b7>
mov    -0x10(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x14(%rbp)
mov    -0x14(%rbp),%eax
cmp    -0x24(%rbp),%eax
jge    12d4 <main+0x1a4>
movslq -0x14(%rbp),%rax
mov    -0x7f0(%rbp,%rax,4),%eax
movslq -0x10(%rbp),%rcx
sub    -0x7f0(%rbp,%rcx,4),%eax
cmp    $0x2,%eax
jg     12c1 <main+0x191>
movslq -0x10(%rbp),%rax
mov    -0x7f0(%rbp,%rax,4),%esi
movslq -0x14(%rbp),%rax
mov    -0x7f0(%rbp,%rax,4),%edx
lea    0xd5d(%rip),%rdi
mov    $0x0,%al
call   1030 <printf@plt>
mov    -0x28(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x28(%rbp)
jmp    12c6 <main+0x196>
mov    -0x14(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x14(%rbp)
jmp    1269 <main+0x139>
jmp    12d9 <main+0x1a9>
mov    -0x10(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x10(%rbp)
jmp    124f <main+0x11f>
mov    -0x28(%rbp),%esi
lea    0xd20(%rip),%rdi
mov    $0x0,%al
call   1030 <printf@plt>
mov    $0x1,%al
test   $0x1,%al
jne    1142 <main+0x12>
jmp    1307 <main+0x1d7>
xor    %eax,%eax
add    $0x800,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<main>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x7f8,%rsp
jmp    1165 <main+0x35>
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
mov    0x7e8(%rsp),%esi
lea    0xeab(%rip),%rdi
xor    %eax,%eax
call   1030 <printf@plt>
movq   $0x0,0x7e8(%rsp)
lea    0xe88(%rip),%rdi
lea    0xc(%rsp),%rsi
lea    0x8(%rsp),%rdx
call   1040 <scanf@plt>
mov    0xc(%rsp),%ebp
mov    0x8(%rsp),%eax
mov    %ebp,%ecx
or     %eax,%ecx
je     129f <main+0x16f>
add    $0x1,%eax
cmp    %eax,%ebp
jne    11d1 <main+0xa1>
jmp    1150 <main+0x20>
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax)
movslq 0x7ec(%rsp),%rax
lea    0x1(%rax),%ecx
mov    %ecx,0x7ec(%rsp)
mov    %ebp,0x20(%rsp,%rax,4)
lea    0x1(%rbp),%eax
cmp    0x8(%rsp),%ebp
mov    %eax,%ebp
je     1210 <main+0xe0>
cmp    $0x2,%ebp
jl     11c6 <main+0x96>
mov    %ebp,%edi
call   1050 <sqrt@plt>
cmp    $0x2,%eax
jl     11b0 <main+0x80>
mov    $0x1,%ebx
nopw   0x0(%rax,%rax,1)
add    $0x1,%ebx
mov    %ebp,%eax
cltd
idiv   %ebx
test   %edx,%edx
je     11c6 <main+0x96>
mov    %ebp,%edi
call   1050 <sqrt@plt>
cmp    %eax,%ebx
jl     11f0 <main+0xc0>
jmp    11b0 <main+0x80>
nopl   0x0(%rax)
mov    0x7ec(%rsp),%eax
mov    %rax,0x10(%rsp)
cmp    $0x2,%eax
jl     1150 <main+0x20>
mov    0x10(%rsp),%rbp
lea    -0x1(%rbp),%eax
mov    %rax,0x18(%rsp)
lea    0x20(%rsp),%r12
xor    %r14d,%r14d
jmp    1253 <main+0x123>
nopl   0x0(%rax)
add    $0x4,%r12
add    $0xffffffffffffffff,%rbp
cmp    0x18(%rsp),%r14
je     1150 <main+0x20>
mov    %r14,%r13
add    $0x1,%r14
cmp    0x10(%rsp),%r14
lea    0xda0(%rip),%rbx
jae    1240 <main+0x110>
mov    $0x1,%r15d
jmp    1279 <main+0x149>
add    $0x1,%r15
cmp    %r15,%rbp
je     1240 <main+0x110>
mov    (%r12,%r15,4),%edx
mov    0x20(%rsp,%r13,4),%esi
mov    %edx,%eax
sub    %esi,%eax
cmp    $0x2,%eax
jg     1270 <main+0x140>
mov    %rbx,%rdi
xor    %eax,%eax
call   1030 <printf@plt>
addl   $0x1,0x7e8(%rsp)
01
jmp    1270 <main+0x140>
xor    %eax,%eax
add    $0x7f8,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

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

LLVM IR (-O2):
@.str = [6 x i8] c"%d,%d\00"
@.str.1 = [7 x i8] c"%d %d\0A\00"
@.str.2 = [4 x i8] c"%d\0A\00"
define i32 @main() {
%1 = alloca i32
%2 = alloca i32
%3 = alloca [500 x i32]
%4 = bitcast i32* %1 to i8*
%5 = bitcast i32* %2 to i8*
%6 = bitcast [500 x i32]* %3 to i8*
%7 = getelementptr inbounds [500 x i32], [500 x i32]* %3, i64 0, i64 498
%8 = getelementptr inbounds [500 x i32], [500 x i32]* %3, i64 0, i64 499
store i32 0, i32* %7
store i32 0, i32* %8
%9 = call i32 @scanf(i8* getelementptr inbounds ([6 x i8], [6 x i8]* @.str, i64 0, i64 0), i32* %1, i32* %2)
%10 = load i32, i32* %1
%11 = icmp eq i32 %10, 0
%12 = load i32, i32* %2
%13 = icmp eq i32 %12, 0
%14 = select i1 %11, i1 %13, i1 false
br i1 %14, label %86, label %15
15: ; preds = %0, %77
%16 = phi i32 [ %83, %77 ], [ %12, %0 ]
%17 = phi i32 [ %81, %77 ], [ %10, %0 ]
%18 = add nsw i32 %16, 1
%19 = icmp eq i32 %17, %18
br i1 %19, label %77, label %28
20: ; preds = %49
%21 = load i32, i32* %8
%22 = icmp sgt i32 %21, 1
br i1 %22, label %23, label %77
23: ; preds = %20
%24 = add nsw i32 %21, -1
%25 = zext i32 %21 to i64
%26 = zext i32 %24 to i64
%27 = zext i32 %21 to i64
br label %56
28: ; preds = %15, %49
%29 = phi i32 [ %50, %49 ], [ %17, %15 ]
%30 = icmp sgt i32 %29, 1
br i1 %30, label %31, label %49
31: ; preds = %28
%32 = call i64 @sqrt(i32 %29)
%33 = trunc i64 %32 to i32
%34 = icmp slt i32 %33, 2
br i1 %34, label %44, label %40
35: ; preds = %40
%36 = add nuw nsw i32 %41, 1
%37 = call i64 @sqrt(i32 %29)
%38 = trunc i64 %37 to i32
%39 = icmp slt i32 %41, %38
br i1 %39, label %40, label %44
40: ; preds = %31, %35
%41 = phi i32 [ %36, %35 ], [ 2, %31 ]
%42 = srem i32 %29, %41
%43 = icmp eq i32 %42, 0
br i1 %43, label %49, label %35
44: ; preds = %35, %31
%45 = load i32, i32* %8
%46 = add nsw i32 %45, 1
store i32 %46, i32* %8
%47 = sext i32 %45 to i64
%48 = getelementptr inbounds [500 x i32], [500 x i32]* %3, i64 0, i64 %47
store i32 %29, i32* %48
br label %49
49: ; preds = %40, %28, %44
%50 = add nsw i32 %29, 1
%51 = load i32, i32* %2
%52 = icmp eq i32 %29, %51
br i1 %52, label %20, label %28
53: ; preds = %74, %56
%54 = add nuw nsw i64 %58, 1
%55 = icmp eq i64 %59, %26
br i1 %55, label %77, label %56
56: ; preds = %23, %53
%57 = phi i64 [ 0, %23 ], [ %59, %53 ]
%58 = phi i64 [ 1, %23 ], [ %54, %53 ]
%59 = add nuw nsw i64 %57, 1
%60 = icmp ult i64 %59, %25
br i1 %60, label %61, label %53
61: ; preds = %56
%62 = getelementptr inbounds [500 x i32], [500 x i32]* %3, i64 0, i64 %57
br label %63
63: ; preds = %61, %74
%64 = phi i64 [ %58, %61 ], [ %75, %74 ]
%65 = getelementptr inbounds [500 x i32], [500 x i32]* %3, i64 0, i64 %64
%66 = load i32, i32* %65
%67 = load i32, i32* %62
%68 = sub nsw i32 %66, %67
%69 = icmp slt i32 %68, 3
br i1 %69, label %70, label %74
70: ; preds = %63
%71 = call i32 (i8*, i32, ...) @printf(i8* getelementptr inbounds ([7 x i8], [7 x i8]* @.str.1, i64 0, i64 0), i32 %67, i32 %66)
%72 = load i32, i32* %7
%73 = add nsw i32 %72, 1
store i32 %73, i32* %7
br label %74
74: ; preds = %63, %70
%75 = add nuw nsw i64 %64, 1
%76 = icmp eq i64 %75, %27
br i1 %76, label %53, label %63
77: ; preds = %53, %15, %20
%78 = load i32, i32* %7
%79 = call i32 (i8*, i32, ...) @printf(i8* getelementptr inbounds ([4 x i8], [4 x i8]* @.str.2, i64 0, i64 0), i32 %78)
store i32 0, i32* %7
store i32 0, i32* %8
%80 = call i32 @scanf(i8* getelementptr inbounds ([6 x i8], [6 x i8]* @.str, i64 0, i64 0), i32* %1, i32* %2)
%81 = load i32, i32* %1
%82 = icmp eq i32 %81, 0
%83 = load i32, i32* %2
%84 = icmp eq i32 %83, 0
%85 = select i1 %82, i1 %84, i1 false
br i1 %85, label %86, label %15
86: ; preds = %77, %0
ret i32 0
}