ﾚｽ書き込み

プログラミングのお題スレ Part9 [無断転載禁止]©2ch.net

PC,ｽﾏﾎ,PHSは ULA べっかんこ公式(ｽﾏﾎ) 公式(PC) で書き込んでください｡

名前
ﾒｰﾙ
引用切替：ﾚｽｱﾝｶｰのみ

>>552
> >>509 Squeak Smalltalk だけどなんとか >>547 っぽい方法で
> 
> | FizzBuzzQuiz |
> FizzBuzzQuiz := Trait named: #FizzBuzzQuiz uses: #() category: 'FizzBuzz-Quiz'.
> FizzBuzzQuiz compile: 'isDivisibleBy: m
>   ^(Processor activeProcess environmentAt: #fbValue) isDivisibleBy: m'.
> FizzBuzzQuiz compile: ', str Processor activeProcess environmentAt: #fbValue put: self. ^str'.
> 
> FizzBuzzQuiz compile: 'fizz ^(self isDivisibleBy: 3) ifTrue: [self, ''Fizz''] ifFalse: [self]'.
> FizzBuzzQuiz compile: 'buzz ^(self isDivisibleBy: 5) ifTrue: [self, ''Buzz''] ifFalse: [self]'.
> 
> {Number. String} do: [:each | each uses: FizzBuzzQuiz].
> 
> 1 fizz buzz. "=> 1 "
> 3 fizz buzz. "=> 'Fizz' "
> 5 fizz buzz. "=> 'Buzz' "
> 15 fizz buzz. "=> 'FizzBuzz' "
> 14 fizz buzz. "=> 14 "
> 
> FizzBuzzQuiz compile: 'gizz ^(self isDivisibleBy: 7) ifTrue: [self, ''Gizz''] ifFalse: [self]'.
> 
> 7 fizz buzz gizz. "=> 'Gizz' "
> 21 fizz buzz gizz. "=> 'FizzGizz' "
> 35 fizz buzz gizz. "=> 'BuzzGizz' "
> 105 fizz buzz gizz. "=> 'FizzBuzzGizz' "
> 105 fizz gizz buzz. "=> 'FizzGizzBuzz' "

ﾛｰｶﾙﾙｰﾙ SETTING.TXT

他の携帯ﾌﾞﾗｳｻﾞのﾚｽ書き込みﾌｫｰﾑはこちら｡書き込み設定で書き込みｻｲﾄの設定ができます｡
・ULA
・べっかんこ(身代わりの術)
・べっかんこ(通常)
・公式(ｽﾏﾎ)
・公式(PC)[PC,ｽﾏﾎ,PHS可]

書き込み設定(板別)で板別の名前とﾒｰﾙを設定できます｡

上下板覧索設栞歴

ぬこの手ぬこTOP 0.020s