19 lines
345 B
Markdown
19 lines
345 B
Markdown
# Lösung: Erste Schritte
|
|
|
|
|
|
```clojure
|
|
#!/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")
|
|
|
|
``` |