#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 */
long pow(long, long);
int /*<<< orphan*/ printf(char *, long);
int /*<<< orphan*/ scanf(char *, ...);
int main() {
  long int t, i, a, b, n[10000], p[10000], m, q, c;
  char s[10001];
  scanf("%ld", &t);
  while (t--) {
    long int j = 0;
    q = 1, c = 0;
    i = 0;
    scanf("%ld", &m);
    do {
      scanf("%c", &s[c]);
      c++;
    } while (s[c - 1] != '\n');
    while (s[i] != '\0') {
      a = 0;
      b = 0;
      while (s[i] != '*') {
        a = a * 10 + (s[i] - 48);
        i++;
      }
      i++;
      while (s[i] != '*') {
        b = b * 10 + (s[i] - 48);
      }
      n[j] = pow(a, b);
      j++;
    }
    for (i = 0; i < j; i++) {
      q = q * n[i];
    }
    printf("%ld\n", (q % m));
  }
  return 0;
}


x86 assembly (clang, -O0):
<main>:
push   %rbp
mov    %rsp,%rbp
sub    $0x29870,%rsp
movl   $0x0,-0x4(%rbp)
lea    0xeb7(%rip),%rdi
lea    -0x10(%rbp),%rsi
mov    $0x0,%al
call   1040 <scanf@plt>
mov    -0x10(%rbp),%rax
mov    %rax,%rcx
add    $0xffffffffffffffff,%rcx
mov    %rcx,-0x10(%rbp)
cmp    $0x0,%rax
je     1346 <main+0x216>
movq   $0x0,-0x29868(%rbp)
movq   $0x1,-0x27140(%rbp)
movq   $0x0,-0x27148(%rbp)
movq   $0x0,-0x18(%rbp)
lea    0xe63(%rip),%rdi
lea    -0x27138(%rbp),%rsi
mov    $0x0,%al
call   1040 <scanf@plt>
lea    -0x29860(%rbp),%rsi
add    -0x27148(%rbp),%rsi
lea    0xe44(%rip),%rdi
mov    $0x0,%al
call   1040 <scanf@plt>
mov    -0x27148(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x27148(%rbp)
mov    -0x27148(%rbp),%rax
sub    $0x1,%rax
movsbl -0x29860(%rbp,%rax,1),%eax
ff
cmp    $0xa,%eax
jne    11ab <main+0x7b>
jmp    11fa <main+0xca>
mov    -0x18(%rbp),%rax
movsbl -0x29860(%rbp,%rax,1),%eax
ff
cmp    $0x0,%eax
je     12dd <main+0x1ad>
movq   $0x0,-0x20(%rbp)
movq   $0x0,-0x28(%rbp)
mov    -0x18(%rbp),%rax
movsbl -0x29860(%rbp,%rax,1),%eax
ff
cmp    $0x2a,%eax
je     1263 <main+0x133>
imul   $0xa,-0x20(%rbp),%rax
mov    -0x18(%rbp),%rcx
movsbl -0x29860(%rbp,%rcx,1),%ecx
ff
sub    $0x30,%ecx
movslq %ecx,%rcx
add    %rcx,%rax
mov    %rax,-0x20(%rbp)
mov    -0x18(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x18(%rbp)
jmp    121f <main+0xef>
mov    -0x18(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x18(%rbp)
mov    -0x18(%rbp),%rax
movsbl -0x29860(%rbp,%rax,1),%eax
ff
cmp    $0x2a,%eax
je     12a7 <main+0x177>
imul   $0xa,-0x28(%rbp),%rax
mov    -0x18(%rbp),%rcx
movsbl -0x29860(%rbp,%rcx,1),%ecx
ff
sub    $0x30,%ecx
movslq %ecx,%rcx
add    %rcx,%rax
mov    %rax,-0x28(%rbp)
jmp    126f <main+0x13f>
mov    -0x20(%rbp),%rdi
mov    -0x28(%rbp),%rsi
call   1050 <pow@plt>
mov    %rax,%rcx
mov    -0x29868(%rbp),%rax
mov    %rcx,-0x138b0(%rbp,%rax,8)
ff
mov    -0x29868(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x29868(%rbp)
jmp    11fa <main+0xca>
movq   $0x0,-0x18(%rbp)
mov    -0x18(%rbp),%rax
cmp    -0x29868(%rbp),%rax
jge    1322 <main+0x1f2>
mov    -0x27140(%rbp),%rax
mov    -0x18(%rbp),%rcx
imul   -0x138b0(%rbp,%rcx,8),%rax
fe ff
mov    %rax,-0x27140(%rbp)
mov    -0x18(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x18(%rbp)
jmp    12e5 <main+0x1b5>
mov    -0x27140(%rbp),%rax
cqto
idivq  -0x27138(%rbp)
mov    %rdx,%rsi
lea    0xccb(%rip),%rdi
call   1030 <printf@plt>
jmp    1154 <main+0x24>
xor    %eax,%eax
add    $0x29870,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<main>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x15fb8,%rsp
lea    0xeb8(%rip),%rdi
mov    %rsp,%rsi
xor    %eax,%eax
call   1040 <scanf@plt>
subq   $0x1,(%rsp)
jae    116d <main+0x3d>
xor    %eax,%eax
add    $0x15fb8,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret
lea    0xe90(%rip),%r13
lea    0xe8c(%rip),%r12
jmp    1197 <main+0x67>
nopl   (%rax)
cqto
idiv   %rcx
mov    %rdx,%rsi
mov    %r12,%rdi
call   1030 <printf@plt>
subq   $0x1,(%rsp)
jb     1159 <main+0x29>
lea    0xe62(%rip),%rdi
lea    0x8(%rsp),%rsi
xor    %eax,%eax
call   1040 <scanf@plt>
lea    0x10(%rsp),%rbx
nop
mov    %r13,%rdi
mov    %rbx,%rsi
xor    %eax,%eax
call   1040 <scanf@plt>
cmpb   $0xa,(%rbx)
lea    0x1(%rbx),%rbx
jne    11b0 <main+0x80>
mov    0x10(%rsp),%al
test   %al,%al
je     1260 <main+0x130>
mov    $0x1,%ecx
xor    %edx,%edx
xor    %r15d,%r15d
jmp    1207 <main+0xd7>
xchg   %ax,%ax
lea    0x1(%r15),%rbp
xor    %esi,%esi
call   1050 <pow@plt>
mov    %rax,0x2730(%rsp,%r14,8)
lea    0x1(%r14),%rdx
mov    0x11(%rsp,%r15,1),%al
lea    0x1(%rbx),%rcx
mov    %rbp,%r15
test   %al,%al
je     1240 <main+0x110>
mov    %rdx,%r14
mov    %rcx,%rbx
xor    %edi,%edi
cmp    $0x2a,%al
je     11e0 <main+0xb0>
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
movsbq %al,%rax
lea    (%rdi,%rdi,4),%rcx
lea    (%rax,%rcx,2),%rdi
add    $0xffffffffffffffd0,%rdi
movzbl 0x11(%rsp,%r15,1),%eax
add    $0x1,%r15
cmp    $0x2a,%al
jne    1220 <main+0xf0>
jmp    11e0 <main+0xb0>
lea    0x1(%r14),%rcx
cmp    $0x7,%r14
jae    1270 <main+0x140>
mov    $0x1,%eax
xor    %edx,%edx
jmp    12d1 <main+0x1a1>
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
mov    $0x1,%eax
jmp    12fe <main+0x1ce>
nopw   0x0(%rax,%rax,1)
mov    %rbx,%rsi
and    $0xfffffffffffffff8,%rsi
mov    $0x1,%eax
xor    %edx,%edx
xchg   %ax,%ax
imul   0x2730(%rsp,%rdx,8),%rax
imul   0x2738(%rsp,%rdx,8),%rax
imul   0x2740(%rsp,%rdx,8),%rax
imul   0x2748(%rsp,%rdx,8),%rax
imul   0x2750(%rsp,%rdx,8),%rax
imul   0x2758(%rsp,%rdx,8),%rax
imul   0x2760(%rsp,%rdx,8),%rax
imul   0x2768(%rsp,%rdx,8),%rax
add    $0x8,%rdx
cmp    %rdx,%rsi
jne    1280 <main+0x150>
test   $0x7,%cl
je     12fe <main+0x1ce>
lea    (%rsp,%rdx,8),%rcx
add    $0x2730,%rcx
and    $0x7,%ebx
xor    %edx,%edx
cs nopw 0x0(%rax,%rax,1)
imul   (%rcx,%rdx,8),%rax
add    $0x1,%rdx
cmp    %rdx,%rbx
jne    12f0 <main+0x1c0>
mov    0x8(%rsp),%rcx
mov    %rax,%rdx
or     %rcx,%rdx
shr    $0x20,%rdx
jne    1180 <main+0x50>
xor    %edx,%edx
div    %ecx
mov    %edx,%esi
jmp    1188 <main+0x58>

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

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