Comment detail

倍数になる13進数 (Nested Flatten)

	
1
2
3
4
| x |
x := 10.
[('13r', x printString) asNumber isDivisibleBy: x] whileFalse: [x := x + 1].
^x

Index

Feed

Other

Link

Pathtraq

loading...