L4 - 6 - 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 "sexto"
Var
  t,h,m,s: inteiro
Inicio
  Leia(t)
  h <- t DIV 3600
  m <- (t MOD 3600) DIV 60
  s <- (t MOD 3600) MOD 60
  Escreva(h," hora(s), ",m," minuto(s) e ",s," segundo(s).")
Fimalgoritmo