-module(s). -export([m/0]). m()->A=hd(S=io:get_line('')),io:format([X||X<-S,A>X]++[X||X<-S,A==X]++[X||X<-S,A<X]).
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page