Calculer le pourboire et le total

Fait partie de la section Fondamentaux du Journey R de Coddy. Leçon 35 sur 78.

Défi

Facile

Dans la leçon précédente, vous avez recueilli le montant de l’addition, le pourcentage du pourboire et le nombre de personnes. Maintenant, ajoutez la logique de calcul pour calculer le montant du pourboire et le total de l’addition, pourboire compris.

Après avoir affiché le message de confirmation, calculez les éléments suivants :

Le montant du pourboire : multipliez l’addition par le pourcentage du pourboire divisé par 100
Le total de l’addition : additionnez l’addition initiale et le montant du pourboire

Stockez ces valeurs dans des variables nommées tip_amount et total.

Affichez ensuite les résultats du calcul au format suivant :

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

Utilisez cat() pour toutes les sorties et incluez des caractères de nouvelle ligne \n lorsque cela est nécessaire.

Par exemple, si les entrées sont 100, 20 et 4, la sortie complète doit être :

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

Essayez vous-même

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