3 lines
154 B
ObjectPascal
3 lines
154 B
ObjectPascal
begin
|
|
''.Select{@(расширение sequence of T) function Select<char,TResult>(selector: char->TResult): sequence of TResult;@}(x->Ord(x));
|
|
end. |