345 B

Raw Blame History

Lösung: Erste Schritte

#!/usr/bin/env -S clojure -M

(println "Produktname: ")
(def produkt (read-line))

(println "Einkauspreis:")
(def preis-einkauf (Integer/parseInt (read-line)))

(def preis-verkauf (max (* 2.5 preis-einkauf) 995))

(println "")
(print "Sonderangebot: ")
(println produkt "für nur" preis-verkauf "EUR")