סיכום – כללי הנחה

חלק מהיחידה לוגיקה וזרימת תוכנית במסלול ה-R של Coddy. שיעור 31 מתוך 64.

אתגר

בינוני

חנות מחילה כללי תמחור על מחיר בזה אחר זה. השלימו את הרשימה rules עם הפונקציות האנונימיות הבאות, שכל אחת מקבלת מחיר אחד:

half: חלקו את המחיר ב־2
minus5: הפחיתו 5, אך לעולם אל תרדו מתחת ל־0
tax: הוסיפו 10%
round: עגלו למספר שלם באמצעות round()

לאחר מכן השלימו את apply_rules(price, names): החילו את הכללים ששמותיהם מופיעים ב־names לפי הסדר והחזירו שורה אחת לכל כלל, after half: 20.00, ולאחריה final: והמחיר הסופי. הציגו כל מחיר עם שתי ספרות אחרי הנקודה העשרונית.

הקוד שסופק קורא את המחיר ואת רשימת שמות הכללים המופרדת בפסיקים ומדפיס כל שורה שמוחזרת.

נסו בעצמכם

rules <- list(
  # כתבו כאן את הקוד שלכם
)

apply_rules <- function(price, names) {
  # כתבו כאן את הקוד שלכם
  character(0)
}

# קוד הקלט/פלט שסופק: השאירו אותו כפי שהוא
input <- suppressWarnings(readLines(file("stdin")))
cat(apply_rules(as.numeric(input[1]), strsplit(input[2], ",")[[1]]), sep = "\n")