Calculating The Tip And Total

Part of the Fundamentals section of Coddy's R journey — lesson 35 of 78.

Challenge

Easy

In the previous lesson, you collected the bill amount, tip percentage, and number of people. Now, add the calculation logic to compute the tip amount and the total bill including the tip.

After displaying the confirmation message, calculate the following:

The tip amount: multiply the bill by the tip percentage divided by 100
The total bill: add the original bill and the tip amount

Store these in variables named tip_amount and total.

Then display the calculation results in the following format:

Tip amount: $[tip_amount]
Total with tip: $[total]

Use cat() for all output and include newline characters \n where needed.

For example, if the inputs are 100, 20, and 4, the complete output should be:

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

Try it yourself

# 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 = "")