Alg - Faça um algoritmo que leia o tempo de duração de um evento em uma fábrica expressa em segundos e mostre-o expresso em horas, minutos e segundos.

algoritmo "Horas, minutos e segundos "

var
   h,m,s : inteiro
   t : inteiro

inicio


   escreval("Entre com o tempo em segundos")
   leia(t)
   h<-t div 3600
   m<- (t mod 3600)div 60
   s<-(t mod 3600)mod 60
   escreva("Isto eh igual a: ",h, " hora(s) ", m, " minuto(s) ",s, " segundo(s). ")

fimalgoritmo