TM.Komstat_AriiqahKirana.R

durasitidur <- function(x){
  cat("Durasi tidur: ",x," jam\n")
  if (x<6){
    cat("Kategori: Kurang\n")
  }
  if (x>=6 && x<8){
    cat("Kategori: Cukup\n")
  }
  if (x>=8){
    cat("Kategori: Baik\n")
  }
}
durasitidur(5)

## Durasi tidur:  5  jam
## Kategori: Kurang

durasitidur(7)

## Durasi tidur:  7  jam
## Kategori: Cukup

durasitidur(8)

## Durasi tidur:  8  jam
## Kategori: Baik