Trinkgeld und Gesamtbetrag berechnen

Teil des Abschnitts Grundlagen der R-Journey von Coddy. Lektion 35 von 78.

Aufgabe

Einfach

In der vorherigen Lektion haben Sie den Rechnungsbetrag, den Trinkgeld-Prozentsatz und die Anzahl der Personen erfasst. Fügen Sie nun die Berechnungslogik hinzu, um den Trinkgeldbetrag und den Gesamtbetrag inklusive Trinkgeld zu berechnen.

Berechnen Sie nach der Anzeige der Bestätigungsnachricht Folgendes:

Den Trinkgeldbetrag: Multiplizieren Sie die Rechnung mit dem Trinkgeld-Prozentsatz geteilt durch 100
Die Gesamtrechnung: Addieren Sie die ursprüngliche Rechnung und den Trinkgeldbetrag

Speichern Sie diese in Variablen namens tip_amount und total.

Zeigen Sie dann die Berechnungsergebnisse im folgenden Format an:

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

Verwenden Sie cat() für alle Ausgaben und fügen Sie bei Bedarf Zeilenumbruchzeichen \n ein.

Wenn die Eingaben beispielsweise 100, 20 und 4 sind, sollte die vollständige Ausgabe wie folgt aussehen:

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

Probier es selbst

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