program main
implicit none 
integer :: h1,m1,s1,h2,m2,s2,h3,m3,s3,h,m  
print*, "enter the time 1 in HH:MM:SS"
read*, h1,m1,s1
print*, "enter the time 2 in HH:MM:SS"
read*, h2,m2,s2
s3 = s1+s2
m = s3/60
s3= mod(s3,60)
m3 = m1+m2+m
h=m3/60
m3=mod(m3,60)
h3=h1+h2+h
print*,"sum of the time 1 and time 2  HH:MM:SS",h3,m3,s3 
end program main