(setq Bakter
      (let ((word2 "Bakter")
	    (word3 "ium")
	    (word1 "das"))
	(concatenate 'string word1 " "  word2 word3)))