sumim #7318(2008/08/24 22:24 GMT) [ Smalltalk ] Rating2/2=1.00
Squeak Smalltalk で。
1 2 3 4 5 6 7
| byte | byte := 123456789012345. ^(#('' k M G T P E Z) inject: byte into: [:result :unit | result < 1024 ifTrue: [^result asString, unit]. result / 1024 roundTo: 0.1]) asString, 'Y' "=> '112.3T' "
Rating2/2=1.00-0+
[ reply ]
sumim
#7318()
[
Smalltalk
]
Rating2/2=1.00
Squeak Smalltalk で。
| byte | byte := 123456789012345. ^(#('' k M G T P E Z) inject: byte into: [:result :unit | result < 1024 ifTrue: [^result asString, unit]. result / 1024 roundTo: 0.1]) asString, 'Y' "=> '112.3T' "Rating2/2=1.00-0+
[ reply ]