sumim #4692(2007/12/09 06:46 GMT) [ Smalltalk ] Rating0/0=0.00
1 2 3 4 5 6 7 8 9 10 11 12 13 14
| amida result | amida := 'A B C D E | | |-| | |-| | |-| | |-| |-| |-| |-| | |-| | | |'. result := nil. amida linesDo: [:line | result ifNil: [result := line subStrings] ifNotNil: [ (2 to: line size by: 2) do: [:idx | (line at: idx) = $- ifTrue: [result swap: idx // 2 with: idx // 2 + 1]]]]. ^result "=> #('B' 'D' 'C' 'A' 'E') "
Rating0/0=0.00-0+
[ reply ]
sumim
#4692()
[
Smalltalk
]
Rating0/0=0.00
| amida result | amida := 'A B C D E | | |-| | |-| | |-| | |-| |-| |-| |-| | |-| | | |'. result := nil. amida linesDo: [:line | result ifNil: [result := line subStrings] ifNotNil: [ (2 to: line size by: 2) do: [:idx | (line at: idx) = $- ifTrue: [result swap: idx // 2 with: idx // 2 + 1]]]]. ^result "=> #('B' 'D' 'C' 'A' 'E') "Rating0/0=0.00-0+
[ reply ]