TM.Komstat_Muhammad Fajar

# Data daftar harga
harga_barang <- c(15000, 25000, 50000, 10000)

# Inisialisasi variabel total
total_bayar <- 0
# Perulangan for langsung
for (harga in harga_barang) {
  total_bayar <- total_bayar + harga
}

# format() disetting agar tidak desimal dan tidak notasi ilmiah
cat("Total belanjaan: Rp", format(total_bayar, big.mark = ".", scientific = FALSE, nsmall = 0), "\n")

## Warning in prettyNum(.Internal(format(x, trim, digits, nsmall, width, 3L, :
## 'big.mark' and 'decimal.mark' are both '.', which could be confusing

## Total belanjaan: Rp 100.000

# Skor yang ingin dicek
skor_aqi <- 85

# Percabangan if-else langsung
if (skor_aqi <= 50) {
  kategori <- "Baik"
} else if (skor_aqi <= 100) {
  kategori <- "Sedang"
} else if (skor_aqi <= 200) {
  kategori <- "Tidak Sehat"
} else {
  kategori <- "Sangat Tidak Sehat"
}

cat("Skor AQI:", skor_aqi, "\n")

## Skor AQI: 85

cat("Kategori Kualitas Udara:", kategori, "\n")

## Kategori Kualitas Udara: Sedang