program sample
    implicit none
    character(100)::s,t
    integer(8) :: i,j,k,m,n,ans
    integer(8)::a,b,c,d
    integer(8),allocatable::x(:),y(:)
    ans=0
    c=10

    do i=1,5
    read(*,*) a
    ans=ans+(a-1)/10+1
    b=mod(a,10)
    if(b<c .and. b/=0)then
        c=b
    end if
    end do
    
    write(*,*)ans*10-10+c
   
    stop
end program sample
  


; 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.814292a6f8dda899057ddec5768d3606 = linkonce constant [73 x i8] c"/home/ubuntu/Downloads/TheStack_IR/Collated/Fortran/Source_4552/source.f\00"
@_QQEnvironmentDefaults = local_unnamed_addr constant ptr null

; Function Attrs: noreturn
define void @_QQmain() local_unnamed_addr #0 {
  %1 = alloca i64, align 8
  %2 = tail call ptr @_FortranAioBeginExternalListInput(i32 -1, ptr nonnull @_QQcl.814292a6f8dda899057ddec5768d3606, i32 11)
  %3 = call i1 @_FortranAioInputInteger(ptr %2, ptr nonnull %1, i32 8)
  %4 = call i32 @_FortranAioEndIoStatement(ptr %2)
  %5 = load i64, ptr %1, align 8, !tbaa !3
  %6 = add i64 %5, -1
  %7 = sdiv i64 %6, 10
  %8 = srem i64 %5, 10
  %.not = icmp eq i64 %8, 0
  %spec.select = select i1 %.not, i64 10, i64 %8
  %9 = call ptr @_FortranAioBeginExternalListInput(i32 -1, ptr nonnull @_QQcl.814292a6f8dda899057ddec5768d3606, i32 11)
  %10 = call i1 @_FortranAioInputInteger(ptr %9, ptr nonnull %1, i32 8)
  %11 = call i32 @_FortranAioEndIoStatement(ptr %9)
  %12 = load i64, ptr %1, align 8, !tbaa !3
  %13 = add i64 %12, -1
  %14 = sdiv i64 %13, 10
  %15 = add nsw i64 %7, 2
  %16 = add nsw i64 %15, %14
  %17 = srem i64 %12, 10
  %18 = icmp slt i64 %17, %spec.select
  %19 = icmp ne i64 %17, 0
  %20 = and i1 %18, %19
  %spec.select.1 = select i1 %20, i64 %17, i64 %spec.select
  %21 = call ptr @_FortranAioBeginExternalListInput(i32 -1, ptr nonnull @_QQcl.814292a6f8dda899057ddec5768d3606, i32 11)
  %22 = call i1 @_FortranAioInputInteger(ptr %21, ptr nonnull %1, i32 8)
  %23 = call i32 @_FortranAioEndIoStatement(ptr %21)
  %24 = load i64, ptr %1, align 8, !tbaa !3
  %25 = add i64 %24, -1
  %26 = sdiv i64 %25, 10
  %27 = add nsw i64 %16, 1
  %28 = add nsw i64 %27, %26
  %29 = srem i64 %24, 10
  %30 = icmp slt i64 %29, %spec.select.1
  %31 = icmp ne i64 %29, 0
  %32 = and i1 %30, %31
  %spec.select.2 = select i1 %32, i64 %29, i64 %spec.select.1
  %33 = call ptr @_FortranAioBeginExternalListInput(i32 -1, ptr nonnull @_QQcl.814292a6f8dda899057ddec5768d3606, i32 11)
  %34 = call i1 @_FortranAioInputInteger(ptr %33, ptr nonnull %1, i32 8)
  %35 = call i32 @_FortranAioEndIoStatement(ptr %33)
  %36 = load i64, ptr %1, align 8, !tbaa !3
  %37 = add i64 %36, -1
  %38 = sdiv i64 %37, 10
  %39 = add nsw i64 %28, 1
  %40 = add nsw i64 %39, %38
  %41 = srem i64 %36, 10
  %42 = icmp slt i64 %41, %spec.select.2
  %43 = icmp ne i64 %41, 0
  %44 = and i1 %42, %43
  %spec.select.3 = select i1 %44, i64 %41, i64 %spec.select.2
  %45 = call ptr @_FortranAioBeginExternalListInput(i32 -1, ptr nonnull @_QQcl.814292a6f8dda899057ddec5768d3606, i32 11)
  %46 = call i1 @_FortranAioInputInteger(ptr %45, ptr nonnull %1, i32 8)
  %47 = call i32 @_FortranAioEndIoStatement(ptr %45)
  %48 = load i64, ptr %1, align 8, !tbaa !3
  %49 = add i64 %48, -1
  %50 = sdiv i64 %49, 10
  %51 = add nsw i64 %40, 1
  %52 = add nsw i64 %51, %50
  %53 = srem i64 %48, 10
  %54 = icmp slt i64 %53, %spec.select.3
  %55 = icmp ne i64 %53, 0
  %56 = and i1 %54, %55
  %spec.select.4 = select i1 %56, i64 %53, i64 %spec.select.3
  %57 = call ptr @_FortranAioBeginExternalListOutput(i32 -1, ptr nonnull @_QQcl.814292a6f8dda899057ddec5768d3606, i32 19)
  %58 = mul i64 %52, 10
  %59 = add i64 %58, -10
  %60 = add i64 %59, %spec.select.4
  %61 = call i1 @_FortranAioOutputInteger64(ptr %57, i64 %60)
  %62 = call i32 @_FortranAioEndIoStatement(ptr %57)
  %63 = call {} @_FortranAStopStatement(i32 0, i1 false, i1 false)
  unreachable
}

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 @_FortranAioOutputInteger64(ptr, i64) local_unnamed_addr

declare {} @_FortranAStopStatement(i32, i1, i1) local_unnamed_addr

attributes #0 = { noreturn }

!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"}
