Menu
Coddy logo textTech

Разделение счета

Часть раздела Основы путешествия по R на Coddy — урок 36 из 78.

challenge icon

Задание

Легко

В предыдущем уроке вы рассчитали сумму чаевых и общий счет. Теперь добавьте последний шаг: разделение общей суммы между всеми людьми.

После отображения суммы чаевых и общего итога с чаевыми, рассчитайте, сколько должен заплатить каждый человек, разделив total на количество people.

Сохраните это в переменной с именем per_person.

Затем выведите окончательный результат в следующем формате:

Each person pays: $[per_person]

Используйте cat() для всего вывода и включите символы новой строки \n там, где это необходимо.

Например, если входные данные равны 100, 20 и 4, полный вывод должен быть следующим:

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

Попробуйте сами

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

Все уроки раздела Основы