((rec,\((^a(print(string-join`(,@(reverse(map car\)),@a))),(map cdr(cons a\)))(string-split(read-line)" ")))())