プログラミングのお題スレ Part14

**デフォルトの名無しさん** · 2019/05/18(土) 17:33:29.45

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

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

2 名前：デフォルトの名無しさん
　　>>1 使用言語
　　回答本文
　　結果がある場合はそれも

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

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

※前スレ
https://mevius.5ch.net/test/read.cgi/tech/1549160513/

**デフォルトの名無しさん** · 2019/07/15(月) 02:14:22.17

時事通信は中立的でもっとも正確。朝日新聞は若干、旧民主党寄りの予想を出した。産経新聞は若干、自民党寄りの予想を出した。

それでもこの3つの分析には大差がない。東京選挙区はほぼ確定した。

当選者は自民党現職の丸川(台本がないと何を言うかわからないぶっとび女)、

自民党現職の武見(いつものハゲじじいもう5回シコシコ)、

公明党現職の山口公明党代表(誰もやりたがらない創価学会内の仕事を押し付けられているかわいそうな人)、

立憲民主党の塩村(東京で人気のいまでもオカズになるヌける熟女)、

共産党の吉良(共産党の女性アイドル、もう年だがまだまだエロオヤジに人気)、

立憲民主党の山岸(元朝日新聞政治部のメガネ、前頭ハゲ進行中)。

与党側3人当選、野党側3人当選で東京選挙区は与野党引き分け。

落選者で得票数第1位は維新の会の音喜多(東京都北区の区長選で落ちたのは悪口が書かれたせいだとして裁判で争っている最中のクズ、小池百合子都知事の元小間づかい、寄生できそうな政党につく虫)。

以上

**デフォルトの名無しさん** · 2019/07/15(月) 09:18:43.09

お題
年金AI化をする

設計を考えよ

どの部分を人間にしてどの部分を機械にするか
っていうだけだと思うけど

すごい初級プログラマーでも作れちゃうほど簡単じゃねと気になった
あまりにかんたんで民間年金ですでにありそうだが

**デフォルトの名無しさん** · 2019/07/15(月) 10:34:42.46

>>818 Ruby
nenkin = 'A PENSION'
puts nenkin.split.tap{|o| o.last.replace(o.last[x.size >> o.first.size])}.join
# => AI

**デフォルトの名無しさん** · 2019/07/15(月) 10:43:37.19

入金
銀行データ紹介
入金人数と金額確認　←入力　新規入力者の確認　人力目視

↓

出金人数と出勤額

みたいなかんじ

**デフォルトの名無しさん** · 2019/07/16(火) 02:32:24.14

>>807
Kotlin
https://paiza.io/projects/ed7oOf_rIHOgekOlUxGYSQ
うっかり普通にフォーマットして3角に出るようにしてしまった。もっと簡単に出しても良かったんだな。

**デフォルトの名無しさん** · 2019/07/17(水) 18:49:01.14

>>807 R
cat(11^(0:4),sep="\n")

**デフォルトの名無しさん** · 2019/07/17(水) 19:12:50.17

>>807 Pharo Smalltalk

(11 ** (0 to: 4)) rounded asStringWithCr

"=> '1
11
121
1331
14641' "

**蟻人間** ◆T6xkBnTXz7B0 · 2019/07/17(水) 21:08:34.80

お題：y=(1-x)(1+x)のx=-1～1の区間を数値積分せよ。

**蟻人間** ◆T6xkBnTXz7B0 · 2019/07/17(水) 21:47:30.35

ε＝0.01くらいの台形公式でいいや。

**デフォルトの名無しさん** · 2019/07/17(水) 21:48:18.54

>>824
Integrate[(1-x)(1+x), {x, -1, 1}]
4/3

wolframcloud
ちょっと感動

**デフォルトの名無しさん** · 2019/07/17(水) 22:23:45.10

>>824 Ruby

require 'polynomial'
require 'polynomial/calculus'

expr = Polynomial.new(1, -1) * Polynomial(1, 1)
puts expr.integrate(-1..1)
# => (4/3)

**デフォルトの名無しさん** · 2019/07/17(水) 23:18:48.71

typo

> expr = Polynomial.new(1, -1) * Polynomial.new(1, 1)

**デフォルトの名無しさん** · 2019/07/17(水) 23:37:40.20

>>824 Squeak Smalltalk

(#(1 -1) collect: [:x | {0. 1. 0. -1/3} polynomialEval: x]) reduce: #-

"=> (4/3) "

**デフォルトの名無しさん** · 2019/07/18(木) 00:59:06.64

>>829
small talkは何でもあんのな
毎回驚かされるわ　ありがとな

**デフォルトの名無しさん** · 2019/07/18(木) 01:42:36.36

>>824 >>825 Perl5

#(x-1)(x+1)⇒1-x^2
#∫(1-x^2)⇒x-(x^3/3)
# [x-(x^3/3)] {-1, 1} ⇒ -1-(-1/3) + 1-(1/3)
# ⇒1 -1/3 - (-1+1/3) ⇒ 2 - 2/3 ⇒ 4/3
# 暗算でも定積分値を求めることはできるが、代わりに
# 幅0.01の台形法による数値計算で解を計算すると…
use List::Util sum;
$s = sum map{.01*(1-($_/100)**2)} -99..99;
print "$s\n";

実行結果
$ perl 14_824.pl
1.3333

**デフォルトの名無しさん** · 2019/07/18(木) 07:25:42.17

>>830
せっかく驚いてくれているのに水を差すようで恐縮なのだけど
誤解があるといけないので念のため補足しておきますと
これは>>826-828みたいに数式処理をしているわけではなく
定積分の筆算を式にしただけ（つまり 1-x^2 の積分である
x-(1/3)x^3 に 1 を代入したときの値から -1 を代入した値を引いただけ）です

もとより #(a b c d) polynomialEval: x "=> a*x^0 + b*x^1 + c*x^2 + ..." みたいな機能が
組み込みで用意されている点では、
こういうとき式を書かずに済んで便利ではありますが^^;

**蟻人間** ◆T6xkBnTXz7B0 · 2019/07/18(木) 12:47:19.12

お題: マルバツゲームを作れ。

＿１＿２＿３
１Ｏ｜＿｜＿
＿ー＋ー＋ー
２＿｜Ｘ｜＿
＿ー＋ー＋ー
３＿｜＿｜＿

**蟻人間** ◆T6xkBnTXz7B0 · 2019/07/18(木) 12:58:43.13

(出力例)
プレーヤー１が先攻です。
プレーヤー１は何番に置きますか？ 1
プレーヤー２は何番に置きますか？ 5
...
プレーヤー２の勝ち。

Ｏ｜２｜３
ー＋ー＋ー
４｜Ｘ｜６
ー＋ー＋ー
７｜８｜９

**デフォルトの名無しさん** · 2019/07/18(木) 22:59:22.13

マルバツゲームに便乗して…

お題：
3×3のマルバツゲームで両者がランダムな手を打つとき
先手の勝率、後手の勝率をそれぞれ求めよ。

**デフォルトの名無しさん** · 2019/07/18(木) 23:07:20.49

今、こういうお題を考えています

Ruby などの遅い言語でも解けるように、
盤面の大きさを、9*9 ～ 13*13 ぐらいで考えていますが、どうでしょうか？

1. 開始点S(座標、0行0列)から終了点E までの、最小コストを求める。
2. S, E 双方から、E, S へ目指す場合に、最小コストで出会う座標と、その時のコストを求める

1ターンで、縦横1つ隣へ移動できる。
同じマスは、1回しか通らない。
数字が各マスへの移動コストで、_ は、単なる目印で無関係です

S2953_9413
71546_7988
83411_2946
23716_5426
47385_736E

**デフォルトの名無しさん** · 2019/07/19(金) 00:02:13.17

問題側が手加減してあげないと解けないポンコツ言語なんて放っとけば？

**836** · 2019/07/19(金) 00:20:37.85

>>836
ルールを修正

1. 開始点S(座標、0行0列)から終了点E までの、最小コストを求める。
2. S, E 双方から、双方が出会うように移動する時、最小コストで出会う座標と、その時のコストを求める。
この時の最小コストは、双方のコストを足したものです

1ターンで、縦横1つ隣のマスへ、必ず移動する。
自分が通ったマスは、1回しか通らないが、相手が通ったマスは、通れます

数字が各マスへの移動コストで、_ は、単なる目印で無関係です

この2は、かなり難しいのかな？
最小コストが求まるのかな？
漏れにも、わからない

**デフォルトの名無しさん** · 2019/07/19(金) 00:31:00.88

>>838
迷惑だからちゃんと整理して解ける問題か確認してから書き込め。説明も下手すぎるからちゃんと推敲しろ。

**デフォルトの名無しさん** · 2019/07/19(金) 00:57:57.34

だから自分で一度書いて動くのを確認してから出題しろと何度言えば…

**デフォルトの名無しさん** · 2019/07/19(金) 02:15:25.70

>>834
common lisp
https://pastebin.com/TjpFVgBk

> (OX-game)
123/456/789 to write OX
|789|
|456|
|123|

| |
| |
| |
player-1 writing O to ...
1
| |
| |
|O |
player-2 writing X to ...
...
|XX |
| O |
|O |
player-1 writing O to ...
9
player-1 win
|XXO|
| O |
|O |

**デフォルトの名無しさん** · 2019/07/19(金) 02:16:34.42

続き

player-2 writing X to ...
2
|X O|
|OOX|
|XXO|
player-1 writing O to ...
8
it's draw! finish a game without either one winning

**デフォルトの名無しさん** · 2019/07/19(金) 02:19:09.79

2chのレイアウト変更を忘れてた
こうなる
https://i.imgur.com/h2VKHGc.jpg

**デフォルトの名無しさん** · 2019/07/19(金) 02:28:05.00

深夜だからか貼り付けミスってた
>>841
https://pastebin.com/6ZRajAGz

**デフォルトの名無しさん** · 2019/07/19(金) 08:59:52.92

「忘れてた」
「ミスってた」
「深夜だから」

**デフォルトの名無しさん** · 2019/07/20(土) 00:17:01.47

>>836
最小重み経路問題かな？
軽く書いてみたけど、最短経路問題の3倍位難しい。
出直してくるわ。

**デフォルトの名無しさん** · 2019/07/20(土) 02:47:49.06

>>836
https://ideone.com/PQwu2U
C++。出直してきたよ。
2パスになってる。
一回目は適当に上限値を取りに行って、二回目で本気探索する感じ。

◆QZaw55cn4c · 2019/07/20(土) 08:18:17.29

お題と回答
>>5 : 6 10 32 36 44
>>9 : 15 34 35 79
>>11=>>575 : 48 (78) 138-139 (140) 142 146 151 154
>>19 :
>>50, https://mevius.5ch.net/test/read.cgi/tech/1549160513/920 : 4 85 89
https://mevius.5ch.net/test/read.cgi/tech/1549160513/988 == >>164 : 59 61 167 169 189 192 201 202
>>90 : 95 96
>>99 :
>>200 : 214 219
>>215 : 227
>>220 : 232 240 248 256 268
>>235 : 236 237 238 239 247 249 259 342 353
>>320 : 321 323 327 330 340
>>322 : 325 328 329 331 332 339 341 358 359

◆QZaw55cn4c · 2019/07/20(土) 08:18:32.72

>>362 : 367 369 370 371 374 379 380 382 414
>>368 : 390
>>388 : 487 (488) 553 559
>>400 : 401
>>408 :
>>417 : 418 419 421 426 432 433 436 438 442 446 451 452 456 471 474 480 482 489 492 495 498 528 530 540
>>479 :
>>555 : 556 558 564 565
>>557 : 560 562 568 569
>>570 : 574 577
>>573 : 604 622
>>600 : 605 607 611 613 627 691
>>615,626 :
>>632 : 637 640 645 649 650 687 689-690

◆QZaw55cn4c · 2019/07/20(土) 08:18:48.37

>>651 : 654 657 662 679 682
>>655 :
>>661 :
>>683 : 685
>>695,704,716,721 : 696 697 701 703 711 713 714 715 718 722 723 724 727 740-741
>>708 : 714
>>717 :
>>752 :
>>753 : (760)
>>767 : 775
>>778 : 779 788 (792) 794
>>789 : 790 (793)
>>807 : 810 811 812 814 815 816 821 823
>>824 : 826 827-828 829 831

◆QZaw55cn4c · 2019/07/20(土) 08:19:03.91

>>833 : 841
>>835 :
>>836 : 847

**デフォルトの名無しさん** · 2019/07/20(土) 10:54:30.31

迷惑だからやめろ
やるなら言語別集計とか少しでも付加価値を入れろ

**デフォルトの名無しさん** · 2019/07/20(土) 11:03:01.50

留数定理も知らないくせにしゃしゃりでてんじゃねえぞクソコテ白痴クロッチロット野郎が

◆QZaw55cn4c · 2019/07/20(土) 14:28:34.17

>>852
＞言語別集計
次スレで採用しようと思います、このスレでよく使われる言語とその程度を棒グラフ的に認識したくなりました

**デフォルトの名無しさん** · 2019/07/20(土) 14:50:09.53

>>854
本当に申し訳ないんですがここに貼るないでもらっていいですか

**デフォルトの名無しさん** · 2019/07/20(土) 14:51:10.98

認識したいのならご自由にでも迷惑だからここには貼らないで

**デフォルトの名無しさん** · 2019/07/20(土) 15:04:46.84

>>848
本当に迷惑だからやめろ
工夫なんか一切しなくていいから金輪際やめろ

**デフォルトの名無しさん** · 2019/07/20(土) 15:23:47.14

>>854
自分のPC上で好きなだけやれよ

**デフォルトの名無しさん** · 2019/07/20(土) 18:06:54.10

お題：　できるだけ少ない回数で1から1000の数を判定しろ
例
入力：　775
出力　n==755

入力：　2,4, ...., 1000
出力　n%2

入力：　3,4,5,6, 10
出力：　n-3<=3 ||n==10

**デフォルトの名無しさん** · 2019/07/20(土) 18:27:26.16

あっ。あっ。頭が！爆発！！しちゃうーーーーーーーー！！！

**デフォルトの名無しさん** · 2019/07/20(土) 19:19:03.53

>>859
> 入力：　2,4, ...., 1000
> 出力　n%2
これ間違えてね？

**デフォルトの名無しさん** · 2019/07/20(土) 19:25:23.08

桃白白改めミスターポポ改めピラフ改めピッコロさんは毎回適当に出題してるからね

**デフォルトの名無しさん** · 2019/07/20(土) 19:58:58.98

>>861
うん

**デフォルトの名無しさん** · 2019/07/20(土) 21:47:04.48

>>859
xy座標で y = xのn-1次以下の式が
n個の点があたえられると導けるから
その出力の一意性に疑問がある

**デフォルトの名無しさん** · 2019/07/20(土) 23:23:39.84

お題
正の整数nと、正の整数のリスト2つ
a_1, ..., a_k
b_1, ..., b_k
が与えられる。
これに対して以下の操作を繰り返す。

操作: n*a_i/b_iが整数になる最初のa_i/b_iをnに掛ける

この操作ができなくなる時が来るかどうか判定してください。

**デフォルトの名無しさん** · 2019/07/20(土) 23:44:40.61

>>865
lisp
(loop for a in '(1 4 3 4 5 6) for b in '(7 8 9 10 11 12) with n = 14 when (integerp (* (/ a b) n)) do (return (format t "a:~a b:~a" a b)) finally (princ "not found"))
a:1 b:7

(loop for a in '(1 4 3 4 5 6) for b in '(7 8 9 10 11 12) with n = 13 when (integerp (* (/ a b) n)) do (return (format t "a:~a b:~a" a b)) finally (princ "not found"))
not found

**デフォルトの名無しさん** · 2019/07/21(日) 00:23:35.41

>>853
頭のおかしいガイジのくせに数学を語ってんじゃねぇよ
ぶっ殺すぞガイジ
実関数もわかってねぇくせに複素関数を語ってんじゃねぇよ
おめえの腸を掘り出して排水溝に捨てるぞ

**デフォルトの名無しさん** · 2019/07/21(日) 00:27:00.70

>>866
説明が足りなかった
iを見つけたら
n = n*a_i/b_i
として同じことを繰り返す

**デフォルトの名無しさん** · 2019/07/21(日) 02:19:32.68

>>868
https://pastebin.com/QJzjZLWg
a:1 b:7 n:14
a:4 b:8 n:2
n finally 1

**デフォルトの名無しさん** · 2019/07/21(日) 03:17:35.19

>>848
そのまとめ、専ブラ(ChMate)使ったら何も加工せずにより良い結果を表示できる
ってか、あんたの投稿で出題に無関係なレスもピックアップされてしまう
百害あって一利なし、なのでヤメてくれ

**デフォルトの名無しさん** · 2019/07/21(日) 08:20:50.09

◆QZaw55cn4c のまとめ（と称した自己満足）は本当に迷惑だからやめてほしい

**デフォルトの名無しさん** · 2019/07/21(日) 09:52:12.84

>>867
コテハン付け忘れてんぞｗ

◆QZaw55cn4c · 2019/07/21(日) 12:17:22.63

>>870
その専用ブラウザはアンカーのほかにスレッドURLにも対応していますか？
https://mevius.5ch.net/test/read.cgi/tech/1558168409/833 : 841
https://mevius.5ch.net/test/read.cgi/tech/1558168409/835
https://mevius.5ch.net/test/read.cgi/tech/1558168409/836 : 847
こういう形式であってもピックアップする機能があるのですか？

**デフォルトの名無しさん** · 2019/07/21(日) 12:22:59.36

とにかく迷惑だからやめろ

**デフォルトの名無しさん** · 2019/07/21(日) 12:37:24.29

>>873
おまえも一応プログラマだろ
本当に自分でそれ書けないのか？

◆QZaw55cn4c · 2019/07/21(日) 13:08:23.15

>>875
>>873 は実害報告(>>870) に対する回避策への調査であり、プログラミング可能性とは関係ないでしょう

**デフォルトの名無しさん** · 2019/07/21(日) 13:14:57.26

>>876
回避策も何も、お前が書き込みをやめればすむだけの話だ

**デフォルトの名無しさん** · 2019/07/21(日) 14:00:38.73

なんで手間暇かけて他人の嫌がる余計なことするのかね
ろくな回答書けないなら黙ってROMってろって思うわ

**デフォルトの名無しさん** · 2019/07/21(日) 14:03:18.32

これだから朝鮮人は嫌われるんだよ

**デフォルトの名無しさん** · 2019/07/21(日) 14:51:20.84

https://ideone.com/37oWvg
質問だけど、>>836 のループ展開版書いてたんだけど、
終了条件わからないんだけど、どうしたらいいと思う？

**デフォルトの名無しさん** · 2019/07/21(日) 15:57:20.08

https://ideone.com/lOmm7w
>>836
C++。できた。終了位置がレンジ外だったりした。
ただ、いじりすぎてロックインしてないか心配だ。

概要としては、最小重み経路問題の非再帰関数バージョン。のはず。

**デフォルトの名無しさん** · 2019/07/21(日) 16:07:33.87

なんか降ってきたわ。ありがたやー。

**デフォルトの名無しさん** · 2019/07/21(日) 21:50:34.29

>>865
問題かよくわからない。a_i/b_iをnに掛けた結果をどうするのか？何かに代入するのか？

**デフォルトの名無しさん** · 2019/07/21(日) 22:55:45.10

n*a_i/b_iが整数になったらnにそれを代入して、もう一度頭から繰り返すんじゃろ
で、無限にその操作を繰り返せるのか途中で終わるのかを判定する

**デフォルトの名無しさん** · 2019/07/22(月) 04:31:58.44

>>873
スレッドURLにも対応してる、しつこいよあんた

**デフォルトの名無しさん** · 2019/07/22(月) 04:43:22.10

>>873は百害あって一理なし

**デフォルトの名無しさん** · 2019/07/22(月) 05:57:37.39

QZとか言う馬鹿は自分がやっている事がことごとく嫌がらせになっているというのにも
全く気づいてないんだろうなあ

**デフォルトの名無しさん** · 2019/07/22(月) 10:03:01.17

おまけにこの糞コテは数学もまともにできない低能

**デフォルトの名無しさん** · 2019/07/22(月) 11:18:34.47

良かれと思ってやったのに迷惑だと言われる
千羽づるみたいだなって思いました

**デフォルトの名無しさん** · 2019/07/22(月) 11:35:03.07

>>889
千羽鶴なら日本の文化だからまだいいよ
QZのは明らかに異国の匂いがする

**デフォルトの名無しさん** · 2019/07/22(月) 11:38:44.03

>>889
千羽鶴なら独善ではあっても善意のつもりだというのは分かるが、QZのは他人のためでなく自分がそうしたいというだけの理由だから、より嫌われる

**836** · 2019/07/22(月) 14:11:57.23

お題・ルールは、
>>838
のままで良いです

マスは、11 * 11 で、やってみましょう！

空行・_ は、単に見やすくしただけなので、無視してください

S2953_94137_3
71546_79881_4
83411_29465_2
23716_54268_4
47385_73638_9

55263_74296_1
34945_87362_5
96755_42186_7
14893_12472_6
71911_47852_1

29437_95134_E

**デフォルトの名無しさん** · 2019/07/22(月) 17:05:26.62

>>892
https://ideone.com/aTBvPq
C++。あってるかはしらねーが、初期値を与えなおしてみたよ。

**デフォルトの名無しさん** · 2019/07/22(月) 17:08:22.90

>>892
問い２は道順取れてるので頭と尻尾から配列なめてけば一応、かち合う場所が取れるよ。

**デフォルトの名無しさん** · 2019/07/22(月) 17:53:24.27

https://ideone.com/ymnJMi
C++。バグがあったので直した。
最初の数値が固定値だったので、マスの値に変更した。

**デフォルトの名無しさん** · 2019/07/22(月) 19:52:32.52

S66
996
19E

超単純化した↑の場合
問1の場合はコスト18
問2の場合は座標(0,2) コスト19
で良いんだよな？

**デフォルトの名無しさん** · 2019/07/22(月) 20:21:15.73

ホンダがらったフンだがらったヘンだがらった！フンフン！！

いでよ、主催者！！！

**デフォルトの名無しさん** · 2019/07/22(月) 20:27:49.31

>>897
ここには特に主催している人は居ないし、そもそも組織になっていない。各個人か勝手にお題を出して解きたい人が解いてるだけ。
おそらく常連は居るだろうが基本的に匿名で誰が誰だかよくわからず、人か入れ替わっていてもわからない。

**デフォルトの名無しさん** · 2019/07/22(月) 22:09:07.24

問１ってダイクストラ法まんまでいいの？

**836** · 2019/07/23(火) 09:29:05.01

問2 について考えてみた

最短ターンでは、10ターンで、双方が出会うけど、
その時の双方を足したコストが、最小とは限らない！

だから迂回路の場合、つまり、11ターン以上で出会うマスも、すべて考慮して、
その中から最小コストを選ぶ必要がある

例えば、あるマスが、S・E 双方から12ターンなど

その際、双方からのターン数が異なる場合は、関係ない。
例えば、あるマスが、Sから11ターンで、Eから13ターンなど

>>899
ダイクストラ法で良い。
漏れは、総当たりでやってみる

**836** · 2019/07/23(火) 09:37:45.12

>>896
問1 は、6 + 6 + 6 = 18

問2 は、左下の1 の所で出会うのなら、
S から、9 + 1 = 10
E から、9 + 1 = 10
で、合計20

出会うマスのコストを2回足しているけど、これで良いか

**デフォルトの名無しさん** · 2019/07/23(火) 13:22:20.59

>>898
あ、それはわかってるよ。
問題の主催者(>>836)を呼びたかった。
やってきたので召喚成功だ。

ふふ。

**デフォルトの名無しさん** · 2019/07/23(火) 16:42:15.95

Sは左上、Eは右下、盤面は正方形で良いのか？それともそれ以外のパターンも考慮しなきゃいけないのか

**836** · 2019/07/23(火) 17:53:12.70

>>903
正方形ではなく、長方形だね

マスの座標は、行列の順で、開始点は( 行0, 列0 )

漏れは、盤面の周囲に、番兵を置いて、考えてます

**896** · 2019/07/23(火) 18:05:44.96

>>901
うん、ぼけてた
コスト20やなｗ

問2で盤面サイズが奇数x偶数とかの場合はゴールはどう考えればいいの？　同時移動だとすれ違っちゃうが
Sが常に先に動く (Eが居るところで合流)
Eが常に先に動く (Sが居るところで合流)
SとE好きな方が先に動く (コストが低いマスの方で合流)
SとEが同時に動く (すれ違って合流できない？中間点で合流？その場合のコストは？)

たとえば S12E とかの場合

**836** · 2019/07/23(火) 20:32:34.55

盤面のサイズが偶数では、問2 は無理

必ず、奇数×奇数

◆QZaw55cn4c · 2019/07/23(火) 21:26:26.55

>>885
回答いただき感謝いたします

**デフォルトの名無しさん** · 2019/07/23(火) 22:05:37.82

>>906
偶数×偶数も行けるやろ
偶数×奇数、奇数×偶数は無理だが

**デフォルトの名無しさん** · 2019/07/24(水) 14:07:43.24

目の前で出会うことが目的じゃないの？

**デフォルトの名無しさん** · 2019/07/25(木) 16:00:43.87

任意の整数を引数に取り、フィボナッチ数か判別するisfib関数を作れ。
なお、フィボナッチ数では無い場合任意の整数と-1の組(Cなどは代わりの物)を、
フィボナッチ数ならフィボナッチ数=任意の整数とそれがフィボナッチ数列の何番めかを表す数の組を返す事。

例:
isfib 0 = (0,1)
isfib 1 = (1,2)
isfib 2 = (2,4)
isfib 3 = (3,5)
isfib 4 = (4,-1)
isfib 5 = (5,6)

**デフォルトの名無しさん** · 2019/07/25(木) 18:03:38.63

>>910
Common Lisp
https://pastebin.com/qqYUKSem

出力
(loop for i from 0 to 6 do (isfib i))
(0 . 1)
(1 . 2)
(2 . 4)
(3 . 5)
(4 . -1)
(5 . 6)
(6 . -1)

**デフォルトの名無しさん** · 2019/07/26(金) 01:20:21.47

>>910 Perl5

sub isfib {
　$v = shift;
　%h = map{$_ => $_} @s = (0,1);
　do {
　　$f = $s[-2] + $s[-1];
　　push @s, $f;
　　$h{$f} //= @s;
　} while $f < $v;
　($v, $h{$v} // -1);
}
printf "isfib $_ = (%d,%d)\n", isfib $_ for 0..5;

実行結果
$ perl 14_910_isfib.pl
isfib 0 = (0,0)
isfib 1 = (1,1)
isfib 2 = (2,4)
isfib 3 = (3,5)
isfib 4 = (4,-1)
isfib 5 = (5,6)

**デフォルトの名無しさん** · 2019/07/26(金) 06:33:07.15

>>910 Lua
function isFib(n)
　　local a, b, c = 0, 1, 1
　　while a < n do
　　　　a, b, c = b, a + b, c + 1
　　end
　　if a ~= n then c = -1 end
　　return n, c
end

**836** · 2019/07/26(金) 09:34:26.36

>>908-909
確かに、偶数×偶数は、
同じターンで、同じマスに入れますね！

S1
2E

S12
34E

**デフォルトの名無しさん** · 2019/07/26(金) 09:50:12.39

>>910
戻り値がbooleanじゃないのが気持ち悪い

**デフォルトの名無しさん** · 2019/07/26(金) 21:09:58.82

>>913
4のとき
isfib 4 = (5,-1)
にならない?