Calculando a Gorjeta e o Total

Parte da seção Fundamentos do Journey de R da Coddy — lição 35 de 78.

Desafio

Fácil

Na lição anterior, você coletou o valor da conta, a porcentagem da gorjeta e o número de pessoas. Agora, adicione a lógica de cálculo para computar o valor da gorjeta e o total da conta, incluindo a gorjeta.

Após exibir a mensagem de confirmação, calcule o seguinte:

O valor da gorjeta: multiplique a conta pela porcentagem da gorjeta dividida por 100
O total da conta: some a conta original e o valor da gorjeta

Armazene-os em variáveis chamadas tip_amount e total.

Em seguida, exiba os resultados do cálculo no seguinte formato:

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

Use cat() para todas as saídas e inclua caracteres de nova linha \n onde for necessário.

Por exemplo, se as entradas forem 100, 20 e 4, a saída completa deve ser:

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

Experimente você mesmo

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