#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 /*<<< orphan*/ scanf(char *, char *);
int strlen(char *);
int main() {
  char str[100];
  scanf("%s", str);
  int var, len = strlen(str);
  for (int i = 0, j = 1; i < len; i = j) {
    var = 0;
    for (j = i + 1; str[j] >= '0' && str[j] <= '9'; j++)
      var = var * 10 + str[j] - '0';
    if (var > 7)
      var = var % 7 + 1;
    else if (var == 0)
      var = 1;
    for (int k = 0; k < var; k++)
      printf("%c", str[i]);
  }
  printf("\n");
  return 0;
}


x86 assembly (clang, -O0):
<main>:
push   %rbp
mov    %rsp,%rbp
sub    $0x90,%rsp
movl   $0x0,-0x4(%rbp)
lea    -0x70(%rbp),%rsi
lea    0xeb3(%rip),%rdi
call   1050 <scanf@plt>
lea    -0x70(%rbp),%rdi
call   1030 <strlen@plt>
mov    %eax,-0x78(%rbp)
movl   $0x0,-0x7c(%rbp)
movl   $0x1,-0x80(%rbp)
mov    -0x7c(%rbp),%eax
cmp    -0x78(%rbp),%eax
jge    1277 <main+0x147>
movl   $0x0,-0x74(%rbp)
mov    -0x7c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x80(%rbp)
movslq -0x80(%rbp),%rax
movsbl -0x70(%rbp,%rax,1),%ecx
xor    %eax,%eax
cmp    $0x30,%ecx
mov    %al,-0x85(%rbp)
jl     11b7 <main+0x87>
movslq -0x80(%rbp),%rax
movsbl -0x70(%rbp,%rax,1),%eax
cmp    $0x39,%eax
setle  %al
mov    %al,-0x85(%rbp)
mov    -0x85(%rbp),%al
test   $0x1,%al
jne    11ca <main+0x9a>
jmp    11ed <main+0xbd>
imul   $0xa,-0x74(%rbp),%eax
movslq -0x80(%rbp),%rcx
movsbl -0x70(%rbp,%rcx,1),%ecx
add    %ecx,%eax
sub    $0x30,%eax
mov    %eax,-0x74(%rbp)
mov    -0x80(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x80(%rbp)
jmp    1188 <main+0x58>
cmpl   $0x7,-0x74(%rbp)
jle    120d <main+0xdd>
mov    -0x74(%rbp),%eax
mov    $0x7,%ecx
cltd
idiv   %ecx
add    $0x1,%edx
mov    %edx,-0x74(%rbp)
jmp    1223 <main+0xf3>
cmpl   $0x0,-0x74(%rbp)
jne    121e <main+0xee>
movl   $0x1,-0x74(%rbp)
jmp    1223 <main+0xf3>
movl   $0x0,-0x84(%rbp)
mov    -0x84(%rbp),%eax
cmp    -0x74(%rbp),%eax
jge    1267 <main+0x137>
movslq -0x7c(%rbp),%rax
movsbl -0x70(%rbp,%rax,1),%esi
lea    0xdb7(%rip),%rdi
mov    $0x0,%al
call   1040 <printf@plt>
mov    -0x84(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x84(%rbp)
jmp    122d <main+0xfd>
jmp    126c <main+0x13c>
mov    -0x80(%rbp),%eax
mov    %eax,-0x7c(%rbp)
jmp    116c <main+0x3c>
lea    0xd88(%rip),%rdi
mov    $0x0,%al
call   1040 <printf@plt>
xor    %eax,%eax
add    $0x90,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<main>:
push   %rbp
push   %r15
push   %r14
push   %r12
push   %rbx
sub    $0x70,%rsp
lea    0xebd(%rip),%rdi
mov    %rsp,%rbx
mov    %rbx,%rsi
call   1050 <scanf@plt>
mov    %rbx,%rdi
call   1040 <strlen@plt>
test   %eax,%eax
jle    121f <main+0xef>
mov    %eax,%r15d
xor    %ebx,%ebx
lea    0x2(%rsp),%r14
nopl   0x0(%rax,%rax,1)
movslq %ebx,%r12
mov    0x1(%rsp,%r12,1),%al
lea    -0x30(%rax),%ecx
cmp    $0x9,%cl
ja     11e0 <main+0xb0>
lea    0x1(%r12),%ebx
lea    (%r14,%r12,1),%rcx
xor    %ebp,%ebp
nopl   0x0(%rax,%rax,1)
movzbl %al,%eax
lea    0x0(%rbp,%rbp,4),%edx
lea    (%rax,%rdx,2),%ebp
add    $0xffffffd0,%ebp
movzbl (%rcx),%eax
lea    -0x30(%rax),%edx
add    $0x1,%ebx
add    $0x1,%rcx
cmp    $0xa,%dl
jb     1190 <main+0x60>
cmp    $0x8,%ebp
jl     1210 <main+0xe0>
mov    %ebp,%eax
imul   $0x24924925,%rax,%rax
shr    $0x20,%rax
mov    %ebp,%ecx
sub    %eax,%ecx
shr    %ecx
add    %eax,%ecx
shr    $0x2,%ecx
lea    0x0(,%rcx,8),%eax
sub    %eax,%ecx
add    %ecx,%ebp
add    $0x1,%ebp
jmp    11f0 <main+0xc0>
nopl   0x0(%rax)
lea    0x1(%r12),%rbx
mov    $0x1,%ebp
nopw   0x0(%rax,%rax,1)
movsbl (%rsp,%r12,1),%edi
call   1030 <putchar@plt>
add    $0xffffffff,%ebp
jne    11f0 <main+0xc0>
cmp    %r15d,%ebx
jl     1170 <main+0x40>
jmp    121f <main+0xef>
nopw   0x0(%rax,%rax,1)
test   %ebp,%ebp
je     1218 <main+0xe8>
jg     11f0 <main+0xc0>
jmp    11ff <main+0xcf>
mov    $0x1,%ebp
jmp    11f0 <main+0xc0>
mov    $0xa,%edi
call   1030 <putchar@plt>
xor    %eax,%eax
add    $0x70,%rsp
pop    %rbx
pop    %r12
pop    %r14
pop    %r15
pop    %rbp
ret

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

LLVM IR (-O2):
@.str = [3 x i8] c"%s\00"
define i32 @main() {
%1 = alloca [100 x i8]
%2 = getelementptr inbounds [100 x i8], [100 x i8]* %1, i64 0, i64 0
%3 = call i32 @scanf(i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str, i64 0, i64 0), i8* %2)
%4 = call i32 @strlen(i8* %2)
%5 = icmp sgt i32 %4, 0
br i1 %5, label %9, label %20
6: ; preds = %50, %43
%7 = phi i32 [ %36, %43 ], [ %47, %50 ]
%8 = icmp slt i32 %7, %4
br i1 %8, label %9, label %20
9: ; preds = %0, %6
%10 = phi i32 [ %7, %6 ], [ 0, %0 ]
%11 = add nsw i32 %10, 1
%12 = sext i32 %11 to i64
%13 = getelementptr inbounds [100 x i8], [100 x i8]* %1, i64 0, i64 %12
%14 = load i8, i8* %13
%15 = add i8 %14, -48
%16 = icmp ult i8 %15, 10
br i1 %16, label %17, label %45
17: ; preds = %9
%18 = sext i32 %10 to i64
%19 = add nsw i64 %18, 1
br label %22
20: ; preds = %6, %0
%21 = call i32 @putchar(i32 10)
ret i32 0
22: ; preds = %17, %22
%23 = phi i64 [ %19, %17 ], [ %30, %22 ]
%24 = phi i8 [ %14, %17 ], [ %32, %22 ]
%25 = phi i32 [ 0, %17 ], [ %29, %22 ]
%26 = zext i8 %24 to i32
%27 = mul nsw i32 %25, 10
%28 = add i32 %27, -48
%29 = add i32 %28, %26
%30 = add i64 %23, 1
%31 = getelementptr inbounds [100 x i8], [100 x i8]* %1, i64 0, i64 %30
%32 = load i8, i8* %31
%33 = add i8 %32, -48
%34 = icmp ult i8 %33, 10
br i1 %34, label %22, label %35
35: ; preds = %22
%36 = trunc i64 %30 to i32
%37 = icmp sgt i32 %29, 7
br i1 %37, label %38, label %41
38: ; preds = %35
%39 = urem i32 %29, 7
%40 = add nuw nsw i32 %39, 1
br label %45
41: ; preds = %35
%42 = icmp eq i32 %29, 0
br i1 %42, label %45, label %43
43: ; preds = %41
%44 = icmp sgt i32 %29, 0
br i1 %44, label %45, label %6
45: ; preds = %41, %9, %38, %43
%46 = phi i32 [ %29, %43 ], [ %40, %38 ], [ 1, %9 ], [ 1, %41 ]
%47 = phi i32 [ %36, %43 ], [ %36, %38 ], [ %11, %9 ], [ %36, %41 ]
%48 = sext i32 %10 to i64
%49 = getelementptr inbounds [100 x i8], [100 x i8]* %1, i64 0, i64 %48
br label %50
50: ; preds = %45, %50
%51 = phi i32 [ 0, %45 ], [ %55, %50 ]
%52 = load i8, i8* %49
%53 = sext i8 %52 to i32
%54 = call i32 @putchar(i32 %53)
%55 = add nuw nsw i32 %51, 1
%56 = icmp eq i32 %55, %46
br i1 %56, label %6, label %50
}