(L1) 6° 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 "calcule a duração do tempo em horas, minutos e segundos"

var
h,m,s : inteiro
inicio
Escreva ("Digite a duração do evento do expressa em segundos: ")
Leia (s)
h<- (s div 3600)
m<- ((s mod 3600) div 60)
s<- ((s mod 3600) mod 60)
Escreva ("A duração do evento foi de", H ," horas", M ," minitos e", s ," segundos")

fimalgoritmo