m:-readln(X),\+length(X,0),(append(X,Y,[1,2,3,4,5,6,'Do it!!']),concat_atom(Y,' ',Z);Z='Miss...'),!,writeln(Z),m.