program problemB
  implicit none

  integer   :: N, i, tf

  tf = 0

  read *, N

  do i = 1, 9
     if ( real ( N ) / i <= 9 .and. &
        & real ( N ) / i == real ( N / i ) ) then
        print *, "Yes"
        tf = 1
        exit
     end if
  end do

  if ( tf == 0 ) then
     print *, "No"
  end if
  
  
end program problemB

; ModuleID = 'FIRModule'
source_filename = "FIRModule"
target datalayout = "e-m:e-p270:32:32-p271:32:32-p272:64:64-i64:64-f80:128-n8:16:32:64-S128"
target triple = "x86_64-pc-linux-gnu"

@_QQcl.b291fcb6014b794a0baf0dba4b9e933e = linkonce constant [73 x i8] c"/home/ubuntu/Downloads/TheStack_IR/Collated/Fortran/Source_3061/source.f\00"
@_QQcl.596573 = linkonce constant [3 x i8] c"Yes"
@_QQcl.4E6F = linkonce constant [2 x i8] c"No"
@_QQEnvironmentDefaults = local_unnamed_addr constant ptr null

define void @_QQmain() local_unnamed_addr {
  %1 = alloca i32, align 4
  %2 = tail call ptr @_FortranAioBeginExternalListInput(i32 -1, ptr nonnull @_QQcl.b291fcb6014b794a0baf0dba4b9e933e, i32 8)
  %3 = call i1 @_FortranAioInputInteger(ptr %2, ptr nonnull %1, i32 4)
  %4 = call i32 @_FortranAioEndIoStatement(ptr %2)
  %5 = load i32, ptr %1, align 4, !tbaa !3
  %6 = sitofp i32 %5 to float
  %7 = icmp slt i32 %5, 10
  br i1 %7, label %8, label %11

8:                                                ; preds = %60, %53, %46, %39, %32, %25, %18, %11, %0
  %9 = call ptr @_FortranAioBeginExternalListOutput(i32 -1, ptr nonnull @_QQcl.b291fcb6014b794a0baf0dba4b9e933e, i32 13)
  %10 = call i1 @_FortranAioOutputAscii(ptr %9, ptr nonnull @_QQcl.596573, i64 3)
  br label %69

11:                                               ; preds = %0
  %12 = fmul contract float %6, 5.000000e-01
  %13 = fcmp ole float %12, 9.000000e+00
  %14 = lshr i32 %5, 1
  %15 = sitofp i32 %14 to float
  %16 = fcmp oeq float %12, %15
  %17 = and i1 %13, %16
  br i1 %17, label %8, label %18

18:                                               ; preds = %11
  %19 = fdiv contract float %6, 3.000000e+00
  %20 = fcmp ole float %19, 9.000000e+00
  %21 = udiv i32 %5, 3
  %22 = sitofp i32 %21 to float
  %23 = fcmp oeq float %19, %22
  %24 = and i1 %20, %23
  br i1 %24, label %8, label %25

25:                                               ; preds = %18
  %26 = fmul contract float %6, 2.500000e-01
  %27 = fcmp ole float %26, 9.000000e+00
  %28 = lshr i32 %5, 2
  %29 = sitofp i32 %28 to float
  %30 = fcmp oeq float %26, %29
  %31 = and i1 %27, %30
  br i1 %31, label %8, label %32

32:                                               ; preds = %25
  %33 = fdiv contract float %6, 5.000000e+00
  %34 = fcmp ole float %33, 9.000000e+00
  %35 = udiv i32 %5, 5
  %36 = sitofp i32 %35 to float
  %37 = fcmp oeq float %33, %36
  %38 = and i1 %34, %37
  br i1 %38, label %8, label %39

39:                                               ; preds = %32
  %40 = fdiv contract float %6, 6.000000e+00
  %41 = fcmp ole float %40, 9.000000e+00
  %42 = udiv i32 %5, 6
  %43 = sitofp i32 %42 to float
  %44 = fcmp oeq float %40, %43
  %45 = and i1 %41, %44
  br i1 %45, label %8, label %46

46:                                               ; preds = %39
  %47 = fdiv contract float %6, 7.000000e+00
  %48 = fcmp ole float %47, 9.000000e+00
  %49 = udiv i32 %5, 7
  %50 = sitofp i32 %49 to float
  %51 = fcmp oeq float %47, %50
  %52 = and i1 %48, %51
  br i1 %52, label %8, label %53

53:                                               ; preds = %46
  %54 = fmul contract float %6, 1.250000e-01
  %55 = fcmp ole float %54, 9.000000e+00
  %56 = lshr i32 %5, 3
  %57 = sitofp i32 %56 to float
  %58 = fcmp oeq float %54, %57
  %59 = and i1 %55, %58
  br i1 %59, label %8, label %60

60:                                               ; preds = %53
  %61 = fdiv contract float %6, 9.000000e+00
  %62 = fcmp ole float %61, 9.000000e+00
  %63 = udiv i32 %5, 9
  %64 = sitofp i32 %63 to float
  %65 = fcmp oeq float %61, %64
  %66 = and i1 %62, %65
  br i1 %66, label %8, label %.critedge

.critedge:                                        ; preds = %60
  %67 = call ptr @_FortranAioBeginExternalListOutput(i32 -1, ptr nonnull @_QQcl.b291fcb6014b794a0baf0dba4b9e933e, i32 20)
  %68 = call i1 @_FortranAioOutputAscii(ptr %67, ptr nonnull @_QQcl.4E6F, i64 2)
  br label %69

69:                                               ; preds = %8, %.critedge
  %.sink = phi ptr [ %9, %8 ], [ %67, %.critedge ]
  %70 = call i32 @_FortranAioEndIoStatement(ptr %.sink)
  ret void
}

declare ptr @_FortranAioBeginExternalListInput(i32, ptr, i32) local_unnamed_addr

declare i1 @_FortranAioInputInteger(ptr, ptr, i32) local_unnamed_addr

declare i32 @_FortranAioEndIoStatement(ptr) local_unnamed_addr

declare ptr @_FortranAioBeginExternalListOutput(i32, ptr, i32) local_unnamed_addr

declare i1 @_FortranAioOutputAscii(ptr, ptr, i64) local_unnamed_addr

!llvm.module.flags = !{!0, !1, !2}

!0 = !{i32 2, !"Debug Info Version", i32 3}
!1 = !{i32 8, !"PIC Level", i32 2}
!2 = !{i32 7, !"PIE Level", i32 2}
!3 = !{!4, !4, i64 0}
!4 = !{!"any data access", !5, i64 0}
!5 = !{!"any access", !6, i64 0}
!6 = !{!"Flang Type TBAA Root"}
