6 lines
180 B
ObjectPascal
6 lines
180 B
ObjectPascal
|
// <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>, <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
|
|
|||
|
|
begin
|
|||
|
|
var s := ' hello aha paap zz ';
|
|||
|
|
s.ToWords.Where(w -> w.Inverse = w).OrderBy(s->s.Length).Println(',');
|
|||
|
|
end.
|