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

**デフォルトの名無しさん** · 2020/03/13(金) 01:42:47.06

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

【出題と回答例】
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/

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

※前スレ
プログラミングのお題スレ Part16
https://mevius.5ch.net/test/read.cgi/tech/1573948822/

**デフォルトの名無しさん** · 2020/04/21(火) 00:35:59.72

ウィキペディアにあった

**デフォルトの名無しさん** · 2020/04/21(火) 19:01:08.06

>>258
数値計算にカオスとか関係なくね？

**デフォルトの名無しさん** · 2020/04/23(木) 02:45:01.66

>>135
bash
https://paiza.io/projects/Qm3KvIJsWVgdXJ1VKJR7DA

eval は使ってないw

**デフォルトの名無しさん** · 2020/04/23(木) 05:19:07.09

>>265
ウルトラマンカオス。

**デフォルトの名無しさん** · 2020/04/23(木) 22:15:50.71

>>181 Common Lisp (SBCL) + CLX。X Window Systemが使える環境で。>>253, >>256を参考に
(require "asdf")
(asdf:load-system "clx")
(defpackage #:pendulum (:use #:common-lisp #:xlib))
(in-package #:pendulum)
(defvar *display* (open-default-display))
(defvar *screen* (display-default-screen *display*))
(defvar *window* (create-window :parent (screen-root *screen*)
　　　　　　　　　:x 0 :y 0
　　　　　　　　　:width 300 :height 300
　　　　　　　　　:background (screen-white-pixel *screen*)))
(defvar *gcontext* (create-gcontext :drawable *window*))
(defparameter *x0* 150)
(defparameter *y0* 50)
(defparameter *r* 200)
(defparameter *theta0* (/ (* pi 40) 180))
(defparameter *dt* 0.03)
(map-window *window*)
(loop for v = 0 then (+ v dv)
　　for theta = *theta0* then (+ theta dtheta)
　　for x = (+ *x0* (floor (* *r* (sin theta))))
　　for y = (+ *y0* (floor (* *r* (cos theta))))
　　for a = (let ((a (* -0.00098 (sin theta)))) (funcall (if (> (* a v) 0) #'* #'/) a 0.95))
　　for dv = (* a *dt*)
　　for dtheta = (/ (* (+ v (/ dv 2)) *dt*) *r*)
　　do (progn
　　　　(draw-line *window* *gcontext* *x0* *y0* x y)
　　　　(draw-arc *window* *gcontext* (- x 7) (- y 7) 14 14 0 (* 2 pi) t)
　　　　(clear-area *window*)))

**デフォルトの名無しさん** · 2020/04/23(木) 23:35:29.80

乙。

**デフォルトの名無しさん** · 2020/04/23(木) 23:53:39.74

お題: 配列と列数が与えられるので配列を行列に再構築して返せ
例:
in < [1, 2, 3, 4], 2
out > [[1, 2], [3, 4]]

**デフォルトの名無しさん** · 2020/04/24(金) 00:06:04.10

>>270　Perl5

$s = [1, 2, 3, 4];
$ncol = 2;
push @b, [splice @$s, 0, $ncol] while @$s;
use Data::Dump 'dump';
print dump(\@b,)."\n";

実行結果
~ $ perl 17_270.pl
[[1, 2], [3, 4]]

**デフォルトの名無しさん** · 2020/04/24(金) 00:32:20.67

>>270 Ruby

p [*eval(str.sub(/],/,"].each_slice"))] # => [[1, 2], [3, 4]]

**デフォルトの名無しさん** · 2020/04/24(金) 01:48:19.75

>>270 D
void main() @safe {
import std.stdio : writeln;
import std.range : chunks;
[1, 2, 3, 4].chunks(2).writeln;
}

**デフォルトの名無しさん** · 2020/04/24(金) 02:15:23.92

>>270 matlab

reshape([1,2,3,4],[],2)

**デフォルトの名無しさん** · 2020/04/24(金) 06:44:44.69

入力無視すんなら最初からprint([[1,2,],[3,4]])ってかけばええやんｗ

**デフォルトの名無しさん** · 2020/04/24(金) 06:56:30.60

>>270 J
f =: 4 : 0
(-x) , \ y
)

　　2 f 1 2 3 4
1 2
3 4

**デフォルトの名無しさん** · 2020/04/24(金) 13:12:17.03

>>275
あんたバカ？

**デフォルトの名無しさん** · 2020/04/24(金) 14:03:24.71

このスレは入力のハードコーディングは禁止だって>>1に書いてるだろ？

**デフォルトの名無しさん** · 2020/04/24(金) 15:04:41.40

みなのもの戦に備えろ

**デフォルトの名無しさん** · 2020/04/24(金) 15:36:47.80

>>270
Kotlin
https://paiza.io/projects/F6x2m9b-Hs-a2yOZFxLMAw

こういうことをするための chunked() という拡張関数がライブラリに最初からあるので自分ではほとんど何も考えてない。

**デフォルトの名無しさん** · 2020/04/24(金) 16:43:36.97

　　　＼∧＿ﾍ　　　　　／￣￣￣￣￣￣￣
　,,､,､,,,　/ ＼〇ノゝ　＜　　どうすっかな……　　　　　　,,､,､,,,
　　　　/三√ ﾟДﾟ)　/　　＼＿＿＿＿＿＿＿
　　　　/三/| ﾟＵﾟ|＼　　　　　　,,､,､,,,　　　　　　　　　　　　　　　
　,,､,､,,,　Ｕ（:::::::::::）∪　　,,､,､,,,
　　　　//三/|三|＼　　　　　　　,,,,　　　　,,､,､,,,
　　　　　　∪　 ∪
　　,,　　　　　　　　　　,　　　　,,,,　　　　,,､,､,,,　　　　　　　,,､,､,,,
,,,,,　　　　∧＿∧　うまいモナー,,,,,　　、　,,,,,,　　　,,,,,,,,　　　　,,,,,
　,,,　　　（　´∀｀）＿＿＿,,,,＿＿＿ ,, ∧＿∧ ｹﾞﾝｷﾆｼﾃﾙｶﾅ・・・＿＿＿,,
　／￣（　つ日ヽ　　∧＿∧　　　（　　　　）　　　　　　　　　　　　　　／
／　　　（＿＿））　　（´∀｀　）　　　（　　　　）　　 ∧＿∧∧＿∧ ／　マターリモナー
　∧＿∧∧＿∧ドーゾ（日ノ　）　　｜｜　| 　　　（　´∀｀） ´∀｀）
　（　´∀｀） ´∀｀）　　　　(（＿＿）　　,（＿（＿）（○）⊂　　）つ日⊂ ）モーナー
―（つ⊂　）つ⊂ ）―――――――――――ヽ|〃(⌒)(⌒) (⌒)(⌒)
　　　(⌒)(⌒) (⌒)(⌒)グーグー

**デフォルトの名無しさん** · 2020/04/24(金) 19:26:26.62

>>277
死ねよゴミ

**デフォルトの名無しさん** · 2020/04/24(金) 19:46:51.66

お題：ABC問題を解いてみましょう。

概要。
https://originalnews.nico/249090
サンプル。
https://wandbox.org/permlink/ohmA7kG8HdpG2pKF

**デフォルトの名無しさん** · 2020/04/24(金) 20:10:45.78

解くって何をするん？

**デフォルトの名無しさん** · 2020/04/24(金) 20:28:58.54

論文のurlを表示するとかでいいんじゃね？

**デフォルトの名無しさん** · 2020/04/24(金) 20:56:21.49

お題
XORゲートは4つのNANDゲートで構成できることが知られている
この構成方法をプログラムで探索せよ

i番目のNANDゲートの入力を(ai,bi)、出力をciとする
XORゲートの入力を(X,Y)、出力をZとする

出力例
X->a1
Y->b1
X->a2
c1->b2
Y->a3
c1->b3
c2->a4
c3->b4
c4->Z

**デフォルトの名無しさん** · 2020/04/24(金) 23:27:45.63

>>286
Step 6, Solution 1
0 : -1, -2: 0, 0, 1, 1 : 2
1 : -1, -2: 0, 1, 0, 1 : 2
2 : 1, 0: 1, 1, 1, 0 : 3
3 : 2, 0: 1, 1, 0, 1 : 3
4 : 2, 1: 1, 0, 1, 1 : 3
5 : 4, 3: 0, 1, 1, 0 : 2

**デフォルトの名無しさん** · 2020/04/25(土) 02:15:29.89

謎

**デフォルトの名無しさん** · 2020/04/25(土) 08:29:40.90

>>286 Ruby
https://ideone.com/OJiVYh
対称など考慮せずに 384通りの解が出てきた
ループ判定は手抜き

**デフォルトの名無しさん** · 2020/04/25(土) 09:02:48.23

[0,0,0,0]　は Array.new(4, 0)
[ nil,nil, nil,nil, nil,nil, nil,nil ] は Array.new(8)
って書いた方が分かりやすいな
あとcase-when はthenを使うのが良し

**デフォルトの名無しさん** · 2020/04/25(土) 13:22:15.71

細かっw

**289** · 2020/04/27(月) 07:09:24.46

>>286 Ruby
https://ideone.com/TERW16
svg で回路図化、配線は手抜き

**デフォルトの名無しさん** · 2020/04/27(月) 09:21:19.63

次は全加算器をやってみよう。
４入力セレクタ辺りで限界でしょう。

**デフォルトの名無しさん** · 2020/04/27(月) 18:53:24.75

このスレってアルゴリズムとかデータ構造を解説してくれる人はあまりいなんだな

**デフォルトの名無しさん** · 2020/04/27(月) 19:18:51.96

聞かれなかったから

**デフォルトの名無しさん** · 2020/04/27(月) 19:29:48.45

>>294
わからないことあったら聞こうよ
ガキじゃねえんだからさ

**デフォルトの名無しさん** · 2020/04/27(月) 19:39:12.12

そらコードしか書かんわな

**デフォルトの名無しさん** · 2020/04/27(月) 19:49:07.31

アルゴリズムは金になるからここじゃあ書かないよ。
聞きたくなるようなコードをチラ見せするのがプロ。

**デフォルトの名無しさん** · 2020/04/27(月) 19:50:45.91

聞きたくなるようなのあったか？

**デフォルトの名無しさん** · 2020/04/27(月) 19:54:18.21

そもそもここにそんな高等なお題でねえだろ

**デフォルトの名無しさん** · 2020/04/27(月) 21:06:36.61

知らない言語の長いコードを読むのは難しいからアルゴリズムだけ書いてほしい
そうじゃなかったら何のために披露してるのかわからない

**デフォルトの名無しさん** · 2020/04/27(月) 21:16:33.23

知らない言語を知ればいいだけやん

**デフォルトの名無しさん** · 2020/04/27(月) 21:17:48.49

（誰かがきっと俺のコードをじっくり読んでくれるはず…！）

**デフォルトの名無しさん** · 2020/04/27(月) 21:26:35.22

perlとかだと全くわからん
暗号にしか見えん
まあそれが楽しいんだろうけどw

**デフォルトの名無しさん** · 2020/04/27(月) 22:44:33.33

アルゴリズムを教えるためのスレじゃないからなｗ

**デフォルトの名無しさん** · 2020/04/27(月) 22:46:29.62

アルゴリズムの自信作を披露するスレだろ？

**デフォルトの名無しさん** · 2020/04/27(月) 22:49:14.07

やりましたの報告スレじゃね？
しらんけど

**デフォルトの名無しさん** · 2020/04/27(月) 22:50:44.47

お題：ワープ付き迷路
始点(S)、終点 (G)、通路(.)、ワープ(0-9)、壁(#)で構成される大きさH×Wの迷路を考える
プレイヤーは、隣接する壁以外のマスにコスト1で移動することができる
ワープマスに入った場合、プレイヤーは対となるワープマスにコスト0で強制的に移動する
迷路中に存在する0-9の個数は、各数字について0個または2個である

始点から終点に移動するときの最小コストを求めよ
ただし、終点に到達できない場合は"impossible"と出力せよ

4 6
1#S...
....#.
#####.
1..G..
=> 7 (ワープを使わずに右に進むとコストは8)

3 3
S1G
###
1##
=> impossible (ワープ先で身動きが取れなくなる)

1 22
S01234567890123498765G
=> 5 (S→0→9→4→5→G)

**デフォルトの名無しさん** · 2020/04/27(月) 22:57:02.43

>>301
披露してる側には意味はあるだろう。
お前の方には読めないコードでは意味がないのかもしれないけど、それはお前の都合でしかないだろう。

**デフォルトの名無しさん** · 2020/04/27(月) 23:03:37.42

まあそうムキになるな
余裕がある人はコメントなりレスなりで解説入れたりすればいいと思うよ

**デフォルトの名無しさん** · 2020/04/27(月) 23:15:10.00

>>309
例えば？

**デフォルトの名無しさん** · 2020/04/27(月) 23:44:27.07

>>311
とりあえず思い付くままにかいてみると、
アルゴリズムだけだったらとるに足らない問題だったり、逆に難しいけどそれただの数学の問題だよねってのが多いけど、それをプログラミング言語で書くから解く方も面白いし見る側も面白い。
同じ問題でも使う言語によって使える機能や記法が異なるから、様々な回答、解法が出てくる。
大抵の人は複数言語が読めるし詳しくなくてもちょっと考えたり調べれば読めるから、読めない人がいることをケアする必要性は特にない。
Jとか一部の言語のワンライナーとかは読めないことが多いけど、むしろそういう読めないようなコードで実現されていることが面白いし、読めないながらも感心してしまう。
アルゴリズムを疑似言語的に書こうとするとどうしても曖昧さや人によって解釈が異なる問題が出てしまうが、仕様が定義された言語を使えばその問題は回避できる。

**デフォルトの名無しさん** · 2020/04/27(月) 23:47:51.61

312
>>292とか>>268ってどういうアルゴリズムなん？
やっぱ概要入れてくれたほうが親切だと思う

**デフォルトの名無しさん** · 2020/04/27(月) 23:51:19.00

スマホのほうにはslipコマンドが設定してあるのでＩＤちょっと違いますが
自分はID:KzmnkBMzです

**デフォルトの名無しさん** · 2020/04/27(月) 23:55:26.10

>>313
説明つけてくれればそりゃ親切だろうけど、回答する人に初めからそこまで求めるなよ。
疑問があれば質問すればいいだけでしょ？

**デフォルトの名無しさん** · 2020/04/27(月) 23:59:22.23

>>315
そういう見方もあるかもしれないですね
親切なレスには説明ついていて助かりますね

**デフォルトの名無しさん** · 2020/04/28(火) 01:00:38.45

こういう流れを見てると、つくづくプログラマーって学生時代に冴えなかった奴等の巣窟なんだって痛感するよね…

**デフォルトの名無しさん** · 2020/04/28(火) 01:33:53.12

自分語りかよ…
人を自分と一緒にしないでくれ

>>313　言っちゃー悪いそのレベルだと、まだまだ山のように勉強が必要だと思う

**デフォルトの名無しさん** · 2020/04/28(火) 01:38:11.95

誰かに教えるスレじゃないんだからそういう見方しかないと思うけど…

**デフォルトの名無しさん** · 2020/04/28(火) 01:38:37.06

>>317
それとブラック企業で使い潰され余裕ない奴な

**デフォルトの名無しさん** · 2020/04/28(火) 01:46:12.43

俺は職業プログラマではないけどプライド高い人は多そうなイメージ
他板でもプログラミングスレは大抵荒れてる

**デフォルトの名無しさん** · 2020/04/28(火) 01:48:31.06

勘違いしている底辺が大半
ごく一部が優秀
でもその付加価値に見合った価格が支払われない残念な分野

**デフォルトの名無しさん** · 2020/04/28(火) 04:03:48.39

教えて欲しいと言えないバカが文句言うスレ

**デフォルトの名無しさん** · 2020/04/28(火) 04:09:27.13

酷いアスペを見た

**デフォルトの名無しさん** · 2020/04/28(火) 04:11:48.33

>>324
減った？

**デフォルトの名無しさん** · 2020/04/28(火) 04:29:18.44

>>294のワード効きすぎだろ
何がそんなに刺さったんだ？
実際は1人が騒いでるだけか？？

**デフォルトの名無しさん** · 2020/04/28(火) 04:53:50.52

スレへのヘイトになってるからねえ
死ねよ自己中

**デフォルトの名無しさん** · 2020/04/28(火) 04:55:48.64

>>294
こいつだけは絶対に許さない
2chの兵力あげてぶっ潰す

**デフォルトの名無しさん** · 2020/04/28(火) 05:02:44.84

執念やば

**デフォルトの名無しさん** · 2020/04/28(火) 05:04:21.21

そしてキモ

**デフォルトの名無しさん** · 2020/04/28(火) 05:17:51.27

とうしつこはい…

**デフォルトの名無しさん** · 2020/04/28(火) 05:58:30.72

疑問があったら聞けばいいのに

**デフォルトの名無しさん** · 2020/04/28(火) 06:47:24.12

自然科学＋グラフ理論＋手書き作業＝アルゴリズム

**デフォルトの名無しさん** · 2020/04/28(火) 06:58:04.37

単振り子のアルゴリズムなんて運動方程式解くだけだろ
近似すれば高校生でも解ける

**デフォルトの名無しさん** · 2020/04/28(火) 06:58:48.43

アルゴリズムを勉強するスレでもないし
アルゴリズムを競うスレでもない

**デフォルトの名無しさん** · 2020/04/28(火) 06:59:56.72

>>334
振り子の運動方程式を解くのは非常に難しい

**デフォルトの名無しさん** · 2020/04/28(火) 07:01:29.73

>>336
中学生か？
それとも日本語初心者か？

**デフォルトの名無しさん** · 2020/04/28(火) 07:03:30.32

運動方程式を解く
の意味がわかってないアホ

**デフォルトの名無しさん** · 2020/04/28(火) 07:04:23.62

振幅が小さい時は簡単に微分方程式解けるだろ
日本語が読めないアホ

**デフォルトの名無しさん** · 2020/04/28(火) 07:05:19.37

近似にしても
±90度振れる振り子を近似するのは高校生には出来ない

**デフォルトの名無しさん** · 2020/04/28(火) 07:05:41.36

>>339
条件の後付け

**デフォルトの名無しさん** · 2020/04/28(火) 07:06:24.06

>>334「近似すれば高校生でも解ける」
後付けじゃねえよ。最初から言ってるわ
死ねよ

**デフォルトの名無しさん** · 2020/04/28(火) 07:06:58.86

振幅が小さいとき

**デフォルトの名無しさん** · 2020/04/28(火) 07:07:14.65

単振り子の微分方程式解くときに他にどんな近似するっていうんだ
真面目に精神障害者だろコイツ

**デフォルトの名無しさん** · 2020/04/28(火) 07:09:17.81

>>344
それしか知らないのに簡単とか言うな

**デフォルトの名無しさん** · 2020/04/28(火) 07:10:42.04

解析的には解けない
シミュレーションに頼る
シミュレーションの精度を上げるにも技術がいる

一言で簡単とか言うアホは何もわかってない

**デフォルトの名無しさん** · 2020/04/28(火) 07:10:47.87

>>345
死ねよアホ
お前がアホだからこの程度すら簡単に思えないだけ
死ね

**デフォルトの名無しさん** · 2020/04/28(火) 07:12:17.62

自分が頭悪いの棚に上げていちゃもんつけられても困るわ

**デフォルトの名無しさん** · 2020/04/28(火) 07:32:33.87

10cmの理想的な単振り子
90度の位置から初速度ゼロで離して
ちょうど10分後の位置を求めよ

簡単だって言うならやってみて

**デフォルトの名無しさん** · 2020/04/28(火) 07:37:31.08

近似が高校で習う1通りしか無いと思ってる時点でアホだし
そもそも近似でしか解けない

｢単振動近似なら高校生でも解ける｣
これなら誰も反対しない

**デフォルトの名無しさん** · 2020/04/28(火) 07:38:59.20

お題
10cmの理想的な単振り子
90度の位置から初速度ゼロで離して
ちょうど10分後の位置を求めよ

**デフォルトの名無しさん** · 2020/04/28(火) 07:43:14.50

振り子の運動方程式解くときに近似って言われて振幅が小さい場合を想定できないのは障害者のお前くらいだわ

**デフォルトの名無しさん** · 2020/04/28(火) 07:44:14.89

>>351
社会の迷惑だからさっさと死んどけ

**デフォルトの名無しさん** · 2020/04/28(火) 07:56:20.53

>>293 Ruby
半加算器
https://ideone.com/QbSnhU
https://ideone.com/GzscIo

**デフォルトの名無しさん** · 2020/04/28(火) 07:57:37.92

プログラマの９９％はリコメンドしない情報盗人。俺調べ。

**デフォルトの名無しさん** · 2020/04/28(火) 07:58:28.31

そもそも
>>334の｢近似すれば｣は｢高校生でも解ける｣にしかかかってないし

**デフォルトの名無しさん** · 2020/04/28(火) 07:59:19.57

高校生で習う知識が全てと思ってしまう高校生レベルのアホ

**デフォルトの名無しさん** · 2020/04/28(火) 13:50:52.20

底辺ITドカタは気性が荒いなぁ

**デフォルトの名無しさん** · 2020/04/28(火) 18:50:58.23

ごめん

**デフォルトの名無しさん** · 2020/04/28(火) 18:55:56.80

これでもサラリーマンの年収の上位5%に入るんだ

◆QZaw55cn4c · 2020/04/28(火) 18:58:28.67

>>349
重力加速度を指定ください

**デフォルトの名無しさん** · 2020/04/28(火) 19:02:43.42

9.80665

**デフォルトの名無しさん** · 2020/04/28(火) 19:31:55.80

数学の話になると毎度現れるアスペ君今日も来てて草
アスペが重度なのか数学コンプが重度なのか

**デフォルトの名無しさん** · 2020/04/28(火) 19:43:22.13

>>308
C 幅優先探索
https://ideone.com/IsSgky