SECONDS TO HOURS.MINUTES.SECONDS.

REM IT WORKS ONLY UNDER RFO BASIC! FOR ANDROID
CLS
INPUT "Tempo in secondi: ", tempo
PRINT STR$(tempo) + "sec"
IF tempo > 3600
  ore = INT(tempo / 3600)
  temporest = tempo - (ore * 3600)
  min = INT(temporest / 60)
  sec = tempo - ((ore * 3600) + (min * 60))
  PRINT STR$(ore) + "h" + STR$(min) + "m" + STR$(sec) + "s"
endif


IF tempo < 3600
  min = INT(tempo / 60)
  sec = tempo - (min * 60)
  PRINT STR$(min) + "m" + STR$(sec) + "s"
endif