m@main=do
l<-getLine;putStrLn$l++do(a,b,c)<-zip3"=::"[24,60,60]$scanr(.(`div`60))0[(+sum[read[l!!y,l!!(y+1)]|y<-[x,x+9]])|x<-[0,3,6]];a:tail(show$100+mod c b)
m