Algoritmo "05_02 Conversor_segundos"
// Esse algoritmo converte um valor total de segundos em horas, minutos e segundos.
Var
     total_segs, horas, minutos, segundos_restantes, segundos_restantes_final: inteiro
Inicio
      // Entrada de dados
     Escreva ("Digite a quantidade de segundos: ")
     Leia (total_segs)

      // Processamento
     horas <- total_segs \ 3600
     segundos_restantes <- total_segs % 3600
     minutos <- segundos_restantes \ 60
     segundos_restantes_final <- segundos_restantes % 60

      // Saída de dados
      Escreva (horas, "hora(s)," ,minutos, "minuto(s) e" ,segundos_restantes_final, "segundo(s).")
FimAlgoritmo


