for(string s:sort(sort((string[])stdin),new bool(string a,string b){return length(a)<length(b);}))write(s);