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

**デフォルトの名無しさん** · 2016/12/01(木) 16:58:30.97

プログラミングのお題スレです。

前スレ
プログラミングのお題スレ Part8©2ch.net
http://echo.2ch.net/test/read.cgi/tech/1444216746/

【出題と回答例】
1 名前：デフォルトの名無しさん
　　お題：お題本文

2 名前：デフォルトの名無しさん
　　>>1 使用言語
　　回答本文

【ソースコードが長くなったら】 (オンラインでコードを実行できる)
http://ideone.com/
http://codepad.org/
http://compileonline.com/
http://rextester.com/runcode
http://runnable.com/
http://code.hackerearth.com/
http://melpon.org/wandbox
https://paiza.io/

宿題は宿題スレがあるのでそちらへ。

**デフォルトの名無しさん** · 2017/09/20(水) 14:48:00.57

>>493
は加法定理で（1-tanαtanβ）が０になってはまずいので
０度以上９０未満の範囲内に限定しないといけないな。

tan()の加法定理
　tan（α+β）=（tanα+tanβ）/（1-tanαtanβ）
により

もしtan（α）が有理数で、かつ 0 <= nα < 90なら
tan（nα）　(n = 1,2,3,4・・・)
も全て有理数

このため
整数 n ( 0 <= n < 90 ) により
tan（n）が無理数なら
nの約数全てによるtan()が無理数

ここで
tan(60)＝√３
が無理数なのは簡単に証明されるため、
tan(1)
も無理数

**デフォルトの名無しさん** · 2017/09/20(水) 14:51:06.46

tan(1)だけじゃなくて
>>477 >>478 も証明できるかな？？？

つまり整数 n ( 0 <= n < 90 ) において
tan(n)が有理数になるのはn=0,45に限ることの証明

tan(90-n) = 1/tan(n) なので
n ( 0 <= n < 45 ) の範囲で証明されればＯＫ

またtan(45)が有理数で加法定理で減算し
　tan(45-n):有理数 ⇔ tan(n):有理数　( 0 <= n < 45 )
も成立

**デフォルトの名無しさん** · 2017/09/20(水) 14:51:42.84

60の約数　はtan(n)無理数
1,2,3,4,5,6,10,12,15,20,30

これの45-n　もtan(n)無理数
44,43,42,41,40,39,35,33,25,15

この約数で、まだ含まれていないもの
11,22,21,8,13,7

45-nにより
34,23,24,37,32,38

この約数で、まだ含まれていないもの
17,16,19

45-nにより
28,29,26

この約数で、まだ含まれていないもの
14

45-nにより
31

ここまでの数を並べると
01,02,03,04,05,06,07,08,**,10,
11,12,13,14,15,16,17,**,19,20,
21,22,23,24,25,26,**,28,29,30,
31,32,33,34,35,**,37,38,39,40,
41,42,43,44

９度の倍数の証明のみが残された

**デフォルトの名無しさん** · 2017/09/20(水) 16:48:28.32

だから>>494と書いたんだけど

**デフォルトの名無しさん** · 2017/09/20(水) 21:20:48.49

tan(1 rad)が超越数であることは誰も証明できないの

**デフォルトの名無しさん** · 2017/09/20(水) 21:27:13.08

プログラムに証明させる問題？

**デフォルトの名無しさん** · 2017/09/20(水) 22:23:37.78

なぜラジアン？
話の流れ的にはtan(1度)だろ

**デフォルトの名無しさん** · 2017/09/20(水) 22:25:37.42

と思ったけど、簡単すぎた

**デフォルトの名無しさん** · 2017/09/21(木) 16:21:06.33

[1] 授業単元名：FizzBuzzクイズ
[2] 問題文(含コード&リンク)：
[3] 環境
　[3.1] OS： (Windows/Linux/等々)特に問わない
　[3.2] コンパイラ名とバージョン： (gcc 3.4 VC 6.0等)特に問わない
　[3.3] 言語： (C/C++/どちらでも可のいずれか)特に問わない

http://kohada.2ch.net/test/read.cgi/prog/1209467166/401
FizzBuzzクイズ

1.fizz.buzz #=> 1
3.fizz.buzz #=> "Fizz"
5.fizz.buzz #=> "Buzz"
15.fizz.buzz #=> "FizzBuzz"
999.fizz.buzz #=> 999

となるようなメソッドfizz、buzzは定義可能か？
可能である場合、同様にgizzを追加定義し、
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" と拡張・応用ができるか？

メソッドのコールに()が必須の言語では 3.fizz().buzz() 形式でも構わない。
オープンクラス機構やメソッドのない言語では関数（buzz(fizz(3)) #=> "Fizz" など）で。

**デフォルトの名無しさん** · 2017/09/21(木) 19:58:51.31

まともに仕様を書けない出題者

**デフォルトの名無しさん** · 2017/09/22(金) 07:02:49.79

これ普通の発想では無理

**デフォルトの名無しさん** · 2017/09/22(金) 07:14:29.33

>>509
修正
×999.fizz.buzz #=> 999
○997.fizz.buzz #=> 997

**デフォルトの名無しさん** · 2017/09/22(金) 07:55:33.84

>>509
C++版
https://ideone.com/JdTeeD

**デフォルトの名無しさん** · 2017/09/22(金) 08:00:39.43

仕様が謎

**デフォルトの名無しさん** · 2017/09/22(金) 08:13:32.67

>>509
C言語
https://ideone.com/eWR8Pl

**デフォルトの名無しさん** · 2017/09/22(金) 09:43:07.90

外部出力を伴う関数（あるいはメソッド）なら簡単
たぶん関数（あるいはメソッド）の返値がそうなるようにって意味かと
（じゃないと普通に書けてクイズにならない）
たしか数理学的にはこういう関数は書けないことになっていたはず

**デフォルトの名無しさん** · 2017/09/22(金) 12:43:18.77

>>509 や >>516 みたいなのとは絶対に一緒に仕事をしたくない

**デフォルトの名無しさん** · 2017/09/22(金) 12:43:56.86

別に戻り値にしても大して変わらんけど

**デフォルトの名無しさん** · 2017/09/22(金) 12:51:02.25

C言語だとトリッキーな技を使わないと出来ない
同じ関数名で複数関数を作れないから
2段や3段重ねて、intを受けて文字列を返すのは普通には無理

C++だと簡単
大きく分けて２つの方法がある

C++でも数値によって戻り値の型を変えるのは無理
数値がconstexprで良いなら出来るだろうけど

**デフォルトの名無しさん** · 2017/09/22(金) 14:57:30.68

>>513
＞int l_ = 3
これ、なんとかならないか？

**デフォルトの名無しさん** · 2017/09/22(金) 16:30:21.56

>>520
関数インターフェース的にはその値を与えることが出来ない

別の関数か何かで変えるかインターフェースを変えるしか

**デフォルトの名無しさん** · 2017/09/22(金) 16:41:43.04

>>516
戻り値を文字列にする方法

方法１
段階によって引数と戻り値の型を変える
S1 fizz(int n);
S2 fizz(S1 s);
std::string fizz(S2 s);
※テンプレートを使うと楽

方法２
戻り値をstd::string固定にしてなんとかする

方法２-１
戻り値は常に結果の文字列にし、パラメーター以外で情報を渡す
方法２-２
文字列に情報をエンコードして入れる
最終型段だけ結果を返すようにする

方法３
戻り値を結果文字列そのままではなく、文字列情報を含む情報とする
(これは反則かな？)

**デフォルトの名無しさん** · 2017/09/22(金) 16:44:03.80

方法２-１であれば >>520の問題は解決する
ただし、そのままだとスレッドセーフじゃなくて気持ち悪い

**デフォルトの名無しさん** · 2017/09/22(金) 16:48:22.63

>>509
#=>
これって ruby の記法だったかな？評価値を変えたいようだ

**デフォルトの名無しさん** · 2017/09/22(金) 18:17:47.82

例えばRubyだと文字列を含め組み込み型にインスタンス変数を仕込めるので
たぶんそれで次のメソッドに情報を渡せる

**デフォルトの名無しさん** · 2017/09/22(金) 19:04:29.86

>>522 の方法２-１
C++版
https://ideone.com/ZavKGg

外部情報は「n」のみ
複数スレッドや割り込みハンドラからコールする時はこのnが問題になるんで
なんとかしてstd::stringに埋め込めれば良いんだけど

>>525
問題を変えちゃダメだよね
> [3.3] 言語： (C/C++/どちらでも可のいずれか)特に問わない

**デフォルトの名無しさん** · 2017/09/22(金) 19:08:43.22

8行目、なんとなく文字列から判別してみたけど、
素直にnと同じように外部にフラグを持てば条件が減る
(文字列の最後が数字にならないとか文字コードが連続してるとか)

**デフォルトの名無しさん** · 2017/09/22(金) 19:09:11.03

「(C/C++/どちらでも可のいずれか)特に問わない」って日本語がまず謎
有限個の具体例しか与えられていないので仕様も謎

**デフォルトの名無しさん** · 2017/09/22(金) 19:26:24.34

出題者の選択枝が [C/C++/どちらでも可] の３個あって、出題者がその「いずれか」を選ぶ
というフォーマットを使った出題
出題者は回答者に対し『その３個のどれでも良いよ』という意味で「特に問わない」と

と私は解釈した
つまり、回答者の選択枝はCかC++のどちらかだと

出力する文字列のルールはリンク先を見れば大体わかる
gizzが7の倍数かどうかは実際には不明で、実は14で割ると7余る数かもしれないが...

リンク先に「プリントする」とあるので
printfなどで標準出力に出せば良いのかと思ったが、
>>516の解釈は違うらしい

数値の場合だけ""でくくってないので、
文字列の場合は""をくっつける必要があるのか、
型を変えろと言っているのかはよくわからん
いずれにしろ、CやC++では値によって戻り値の型を変えるのは不可能

**デフォルトの名無しさん** · 2017/09/22(金) 19:32:11.08

いずれにしろ、
>>510 >>514 >>517

**デフォルトの名無しさん** · 2017/09/22(金) 19:33:47.07

>>529
＞回答者の選択枝はCかC++のどちらかだと
いや、そうじゃなくて、本当に「特に問わない」、どういったらいいかな、このテンプレはC宿題スレのものを、そのまま頂戴しただけじゃない？

**デフォルトの名無しさん** · 2017/09/22(金) 19:36:43.23

>>531
君は出題者なのか？違うのか？
立場をはっきりと

**デフォルトの名無しさん** · 2017/09/22(金) 19:39:18.64

出題者なら０点

**デフォルトの名無しさん** · 2017/09/22(金) 19:43:00.43

>>529
なるほど
.gizzは、与えられた数字に対してfizzbuzzが数字になるなら"Gizz"、
それ以外の場合は所定の位置(説明省くけど)に"Gizz"を挿入するものなのかと思ってたわ

**デフォルトの名無しさん** · 2017/09/22(金) 19:51:22.72

確かに
7の倍数じゃなくて1の倍数でも良いよな
たまたま >>509 の例がすべて7の倍数になってただけで

この場合、上にあげた３個のコードいずれも
7 を 1 に変えてくださいな

**デフォルトの名無しさん** · 2017/09/22(金) 19:54:43.95

そろそろ
出題者の模範解答
よろしくね

**デフォルトの名無しさん** · 2017/09/22(金) 20:00:08.36

え゛
0点の出題だしー模範解答の質も推して知るべし、なんじゃないでしょうか……：－）

**デフォルトの名無しさん** · 2017/09/22(金) 20:35:12.69

>>526
↓この但し書きがあるってことは、問題作成者（≠出題者）としてはC/C++限定とは考えてはいないだろう

> メソッドのコールに()が必須の言語では 3.fizz().buzz() 形式でも構わない。
> オープンクラス機構やメソッドのない言語では関数（buzz(fizz(3)) #=> "Fizz" など）で。

そもそもここで出題する時点で [3] の縛りは意味をなさないよ

**デフォルトの名無しさん** · 2017/09/22(金) 20:43:54.80

>>509に書いてある以上は、それに従うのが基本

**デフォルトの名無しさん** · 2017/09/22(金) 20:47:11.96

と思って私は回答しましたが、
他の人が他の解釈で回答することまで否定はしません

**デフォルトの名無しさん** · 2017/09/22(金) 20:47:48.19

ということで、
>>538 よろしく！

**デフォルトの名無しさん** · 2017/09/23(土) 03:26:09.79

>>509 Ruby >>525の方針で
https://ideone.com/B6E8ig

**デフォルトの名無しさん** · 2017/09/23(土) 05:00:15.00

>>509 F#
https://ideone.com/svYTTM

**デフォルトの名無しさん** · 2017/09/23(土) 09:40:19.02

>>509
@Mathematica

https://ideone.com/oC0nu7

入力値（n）をリストにして次の関数に渡さないとﾀﾞﾒﾎﾟ

**デフォルトの名無しさん** · 2017/09/23(土) 11:10:41.17

PerlやPythonは？

**デフォルトの名無しさん** · 2017/09/23(土) 11:25:56.13

ネタバレになるけど
このクイズはグローバル変数を使えばそれで済んでしまうシンプルな話なんだけど、それをあえて
- 各言語の機能を熟知・駆使して、面白くしたりひと工夫したりする（たとえばスレッドセーフとか）
- 前者のしくみと、7の倍数のgizzの拡張に必要な追加を最小限にすることを両立させる
というポイントが楽しみどころなんじゃないかな

**デフォルトの名無しさん** · 2017/09/23(土) 11:29:36.36

>>509
https://ideone.com/4p67HE
C++。題意は満たしてないけど、自分が書くとこんな感じだな。
末尾判定難しい。

**デフォルトの名無しさん** · 2017/09/23(土) 17:45:33.07

>>509
>>536

>>524～>>547 の方法を想定
Java: https://ideone.com/i8wMea

**デフォルトの名無しさん** · 2017/09/23(土) 17:47:47.85

× >>524 >>547
○ >>524 >>542

**デフォルトの名無しさん** · 2017/09/23(土) 18:26:18.44

関数の入出力の型が同一である必要がある
Cならintをchar*と解釈するわけにいかないから構造体だろう

**デフォルトの名無しさん** · 2017/09/23(土) 22:30:47.29

スレッドローカル変数で
書いてみている

**デフォルトの名無しさん** · 2017/09/23(土) 22:51:39.70

>>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' "

**デフォルトの名無しさん** · 2017/09/24(日) 08:25:43.37

>>552
×>>547 っぽい方法で　→　○>>542 っぽい方法で

**デフォルトの名無しさん** · 2017/09/24(日) 08:49:01.13

>>509 Ruby >>542 を >>552 と同様の手法でリファイン
https://ideone.com/2EsoeT

**デフォルトの名無しさん** · 2017/09/25(月) 19:17:51.82

>>509 c
https://ideone.com/oAsiG2
・構造体つこうた
・gizzの「追加定義」については簡易解釈

**デフォルトの名無しさん** · 2017/10/15(日) 20:26:14.16

過去問を眺めていたが、もっとお気楽な問題が多かったようですね
肩慣らし問題を一つ

問題
循環小数を有理数に直せ。
循環節は括弧をつかって表現する。

例
0.[555] = 5/9
0.3[33] = 1/3
12.[345] = 4111/333
1.2[34] = 611/495

**デフォルトの名無しさん** · 2017/10/15(日) 21:45:12.25

連分数を使うのかね

**デフォルトの名無しさん** · 2017/10/15(日) 23:12:59.97

>>556 Java
https://ideone.com/QkUwMu

**デフォルトの名無しさん** · 2017/10/17(火) 15:01:04.33

循環小数は有理数な訳だが

**デフォルトの名無しさん** · 2017/10/17(火) 16:22:17.58

0.[555] = 0.[5] = 5/9
0.3[33] = 0.[3] = 3/9
12.[345] = 12+345/999
1.2[34] = 1.2+34/990

**デフォルトの名無しさん** · 2017/10/17(火) 18:47:49.98

てすと

**デフォルトの名無しさん** · 2017/10/18(水) 11:15:59.21

>>560
おお。そういう法則で行けるのか。
きっと数学では大昔に証明されてるんだろうけど知らなかった。(または忘れたのかなあ？)

**デフォルトの名無しさん** · 2017/10/18(水) 11:35:57.38

ああ。なんとなくわかった。10の桁数乗の値で割るとそっくりそのまま小数点以下になるが
1足りないから循環するのか。ああ、しかし、数学的にどう表現したらいいかわからない。w

**デフォルトの名無しさん** · 2017/10/18(水) 15:51:59.37

お題：顔文字(^o^)があります。この(^o^)を左右に動かしながら出力します。(^o^)は左から右へ一文字ずつ動き、端に到達した瞬間だけ(^o^)から(>_<)に変化し、また(^o^)に戻って左端へ行き、同じように繰り返します。
端から端までは最初80文字分の幅がありますが、(^o^)が端に達した回数だけ1文字ずつ狭くなっていき、最終的に(^o^)の端まで狭くなり、(^o^)が動けなくなります。(^o^)が動けなくなったらプログラムを終了してください。

**デフォルトの名無しさん** · 2017/10/18(水) 17:36:32.86

>>564 Bash (builtins)
https://ideone.com/KFko4s

幅80文字だと出力が長くなりすぎて途中で切られるので50文字にしました。

**デフォルトの名無しさん** · 2017/10/18(水) 19:53:42.77

ウインドウズでエスケープシーケンス扱うのにおまじないいるからメンドクセー。

**デフォルトの名無しさん** · 2017/10/18(水) 21:05:28.73

>>564
改行せずにカーソルを先頭に戻すのは CR (13) の出力で良いのか？
それとも curses ライブラリを使うべきか？

**デフォルトの名無しさん** · 2017/10/19(木) 01:56:08.11

>>567
好きな方をどうぞ
curses使うのはいいですね
こちらからは見れませんが

**デフォルトの名無しさん** · 2017/10/19(木) 03:35:28.31

じゃ、とりあえず CR 出力版。Perl プログラム。
但し、待ち時間入れないと速すぎて見えないので適当に usleep を入れた。
テストした環境は Linux で端末は Windows の TeraTerm。
TERM=xterm の状態。

但し、プログラムを貼り付けたサイト(paiza.io)での出力はおかしくなる。
何故なら端末として動いてないから。
試したい場合はプログラムをコピーして自分の環境のエディタ等にペーストして保存後に実行して。

https://paiza.io/projects/rQDCQizcsrydlcrkxylR1w

**デフォルトの名無しさん** · 2017/10/19(木) 05:11:39.88

>>564
https://ideone.com/dakfBb
C++。改行でやってみた。ちょっと汚い。

2017/10/22(日) 11:49:54.00

お題:A～Z、1～9で出来たランダムな文字列がある(文字列はプログラム開始時に自動的に決めてよい)
キーを2つ決めて(←→キーが自然かも)例えば→キーを押すと、文字列のうち2～9があるか
どうかを調べ、あればそのうち一つをランダムに選び、数字を一つ減らし(9なら8へ)、左右ランダムに
1を置く
つまり2以上の数字文字があればそこがゴムのような役目をして文字列が伸びる
全部の数字文字が1になったら何もしない

逆に例えば←キーを押すと、文字列のうち1～8があるかどうかを調べ、そのうちランダムに一つを
選び、その左右どちらかに数字文字がないかを調べ、足した合計が9を超えないようなら足し合わせて
数字文字をその合計値にし、文字列を1つ縮める
足し合わせた合計が9を超えるようなら他の数字文字もランダムに同様に一つ選び、足し合わせて
9を超えない数字文字の部分が見つかったらそれを一つだけ足し合わせて縮める

全部の数字文字が9になるか、9に満たないが足し合わせると9を超えるようになったら何もしない

**デフォルトの名無しさん** · 2017/10/23(月) 04:21:48.29

>>571
https://ideone.com/pjZbOc
C++。デバッグ難しくてやる気がしないのでバグってるかも。
カーソルキー取るの面倒だからASキーにしておいた。
こんな感じでいいのか？

何のシミュレータかしらんけどめんどくせーな。

**デフォルトの名無しさん** · 2017/10/23(月) 04:35:24.25

あ、それと、文字列で計算するのめんどくさかったから、数字でやった。
そっち事情なんか知ったこっちゃない。

**デフォルトの名無しさん** · 2017/10/23(月) 05:46:30.69

%%%%1000%%%%

000-[HUM%58*73.1\%]/2I/3NM/61.3SNMK%?%3%51.22222222222221%
001-[[[%6/4$17.6135412α3]]]]+DOM+SIL+7%
002-UML7%[61.2[31.5[!%32∂LM17.36%!16.3!%<<<%!HSTOL7%!Q!S!=3m=<2TOL<3Q9A<2.1GHz%,DOK,HAOARA,
003-[[[HEMLOT47[<\41.2%Q,===>[MLS<DPNO<\2.3>#ESOLA!5%!3MLA!>LTOSA>7TONSA>%>%end

**デフォルトの名無しさん** · 2017/10/23(月) 17:28:50.67

>>574
全く読めねぇｗ

**デフォルトの名無しさん** · 2017/10/23(月) 20:53:32.54

ランダムの分布は指定なし？

**デフォルトの名無しさん** · 2017/10/23(月) 23:01:59.68

いろんなところでたまに見かけるけど、>>547　ってPGなの？

**デフォルトの名無しさん** · 2017/10/24(火) 06:49:36.20

PGとは？

**デフォルトの名無しさん** · 2017/10/24(火) 07:14:59.91

プロパンガス

**デフォルトの名無しさん** · 2017/10/24(火) 08:55:25.49

パーフェクトグレイド

**デフォルトの名無しさん** · 2017/10/24(火) 11:04:02.33

>>575>>577
>>574はvbsウィルスの一部だよ
つまりワクチンソフトに引っかかるとこのログが検疫されるので注意

**デフォルトの名無しさん** · 2017/10/24(火) 21:14:43.61

>>581
さんくす。

**デフォルトの名無しさん** · 2017/10/25(水) 20:13:14.36

お題
())())のように括弧のみからなる文字列が与えられるので
すべての括弧が正しく対応付けされるためには
最低で何箇所の括弧を逆向きに変更すればよいか求めよ
例えば上の例では2文字目か3文字目を変更すればよいので1を出力せよ
何文字変更しても正しく対応付けできない場合は-1を出力せよ

) -> -1
())()) -> 1
)()()( -> 2
)))((( -> 4
(())())((())(()( -> 3
())((())()))()(((()))()((((((((()()(())) -> ?

**デフォルトの名無しさん** · 2017/10/25(水) 21:21:26.00

>>583 Java
https://ideone.com/Oca2HR

**デフォルトの名無しさん** · 2017/10/26(木) 00:42:38.67

>>583
Ruby
https://ideone.com/wQA5TN

**デフォルトの名無しさん** · 2017/10/26(木) 07:09:40.17

>>583
https://ideone.com/OkCwgQ
C++。効率とかショートコーディングとかそういうものをかなぐり捨ててべた書き。
あってるかな？

**デフォルトの名無しさん** · 2017/10/26(木) 08:33:36.44

おむ

**デフォルトの名無しさん** · 2017/10/26(木) 08:35:57.56

誤爆
>>583 Ruby

def calc str
return -1 if str.size.odd?
ary = optimise str.scan(/(?=.)($*)($*)/).map{|a, b| a.size - b.size}
(-ary[0] + ary[1].to_i).abs/2 + ary[0]%2
end

def optimise ary
a = ary.reject(&:zero?).chunk(&:positive?).to_a.transpose[1].map(&:sum)
return a if a.size < 3
a.unshift(0) if a[0] < 0
optimise a.each_slice(2).map(&:sum)
end

STR = %w{
)
())())
)()()(
)))(((
(())())((())(()(
())((())()))()(((()))()((((((((()()(()))
}

STR.each{|s| puts "%s -> %d"%[s, calc(s)]} #=>
) -> -1
())()) -> 1
)()()( -> 2
)))((( -> 4
(())())((())(()( -> 3
())((())()))()(((()))()((((((((()()(())) -> 5

**デフォルトの名無しさん** · 2017/10/26(木) 19:12:02.71

>>583 ruby
https://ideone.com/jGTfL3

**デフォルトの名無しさん** · 2017/10/27(金) 22:31:59.57

>>583
@Mathematica

https://ideone.com/19n4r2

**デフォルトの名無しさん** · 2017/11/04(土) 00:05:20.36

Quineの派生ということで、コードそれ自身を反転させたものを出力せよ
反転とは文字列"abc\ndef"を"fed\ncba"にすること

**デフォルトの名無しさん** · 2017/11/04(土) 01:52:41.37

数列 6,66,666,6666,66666.....
これをダミアン数列と呼ぶことにしましょう

nを自然数としたときn^n（^はべき乗）の桁数（１０進数で）が
ダミアン数列のどれかになることはあるか？
初歩的な計算で7^7=823543が6桁になることがわかります

問　このような不吉な数は
　　　　7のみである
　　　　有限個存在する
　　　　無限に存在する

ここまで書いてみたけどこの問題だとプログラミングのお題じゃないね
数論で解けるのかなあ？

改めてお題
ダミアン数列の最初の10項につながる不吉な自然数はあるか、あるとすれば
その数はいくつか

力技では時間が掛かりすぎると思うので工夫してみてください

**デフォルトの名無しさん** · 2017/11/04(土) 03:18:31.96

意味不明

**デフォルトの名無しさん** · 2017/11/04(土) 03:39:51.41

>>591
https://ideone.com/1bQnxO
C++。VCオンリー。
ウニコード対応しようと思って色々やってたけど、なんかうまくいかねー。
一応VCではうまくいってるっぽいけど、GCCと共通のコードはまだ規格的にきつそうだ。
うへー。大変だったわ。やっぱ、文字列は鬼門。

**デフォルトの名無しさん** · 2017/11/04(土) 04:34:35.38

>>592 Java
https://ideone.com/furdsD

**デフォルトの名無しさん** · 2017/11/04(土) 08:04:59.76

>>591 Squeak/Pharo Smalltalk

thisContext method getSource reversed allButLast: 8

"=> '8 :tsaLtuBlla desrever ecruoSteg dohtem txetnoCsiht' "

**デフォルトの名無しさん** · 2017/11/04(土) 10:09:48.41

>>591 ruby
https://ideone.com/k9nGSp

**デフォルトの名無しさん** · 2017/11/05(日) 14:54:08.02

>>597 ruby
d="]esrever.d,d[%'d=p%;s%' stup";puts '%s;%p=d'%[d,d.reverse]
#=> ]esrever.d,d[%'d=p%;s%' stup;"puts '%s;%p=d'%[d,d.reverse]"=d

**デフォルトの名無しさん** · 2017/11/05(日) 14:54:35.06

安価ミスったorz

**デフォルトの名無しさん** · 2017/11/05(日) 22:47:04.05

>>595
2で割らずにシフトしてたり芸が細かいですな