Chia hóa đơn

Thuộc phần Kiến thức nền tảng trong hành trình R của Coddy. Bài học 36 trên 78.

Thử thách

Dễ

Ở bài học trước, bạn đã tính tiền tip và tổng hóa đơn. Bây giờ, hãy thêm bước cuối cùng: chia tổng hóa đơn cho tất cả mọi người.

Sau khi in ra tiền tip và tổng tiền đã bao gồm tip, hãy tính số tiền mỗi người cần trả bằng cách chia total cho số lượng people.

Lưu giá trị này vào một biến có tên per_person.

Sau đó, in ra kết quả cuối cùng theo định dạng sau:

Each person pays: $[per_person]

Dùng cat() cho tất cả đầu ra và thêm ký tự xuống dòng \n ở những chỗ cần thiết.

Ví dụ, nếu đầu vào là 100, 20 và 4, đầu ra hoàn chỉnh sẽ là:

Welcome to the Bill Split Calculator!
Let's split your bill fairly.
Bill: $100
Tip: 20%
People: 4
Tip amount: $20
Total with tip: $120
Each person pays: $30

Tự làm thử

# TODO: Write your code below
# Use cat() to display the welcome message
# Remember to use \n for new lines
cat("Welcome to the Bill Split Calculator!\nLet's split your bill fairly.\n")

# Read user inputs
con <- file("stdin", "r")
bill <- as.numeric(suppressWarnings(readLines(con, n = 1)))
tip_percent <- as.numeric(suppressWarnings(readLines(con, n = 1)))
people <- as.numeric(suppressWarnings(readLines(con, n = 1)))
close(con)

# Display confirmation message
cat("Bill: $", bill, "\n", sep = "")
cat("Tip: ", tip_percent, "%\n", sep = "")
cat("People: ", people, "\n", sep = "")

# Calculate tip amount and total
tip_amount <- bill * tip_percent / 100
total <- bill + tip_amount

# Display calculation results
cat("Tip amount: $", tip_amount, "\n", sep = "")
cat("Total with tip: $", total, "\n", sep = "")