 = do
  putStr "welcher Betrag soll gewechselt werden? "
  betrag <- readLn
  print $ wechsle euroMuenzen betrag

main :: IO ()
main = do
  putStr "welcher Betrag soll gewechselt werden? "
  betrag <- readLn
  print $ wechsle euroMuenzen betrag
main = do
  putStr "welcher Betrag soll gewechselt werden? "
  betrag <- readLn
  print $ wechsle euroMuenzen betrag