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

[過去ﾛｸﾞ] プログラミングのお題スレ Part15 (1002ﾚｽ)
上下前次 1-新

このｽﾚｯﾄﾞは過去ﾛｸﾞ倉庫に格納されています｡
次ｽﾚ検索歴削→次ｽﾚ栞削→次ｽﾚ過去ﾛｸﾞﾒﾆｭｰ

554: 蟻人間 ◆T6xkBnTXz7B0 2019/09/22(日)22:00 ID:rZK31NHQ(2/5) AAS
>>553
カレンダー苦手？
そりゃごめんね。誰でも解けるような問題解いて面白い？もしかして

555: 2019/09/22(日)22:02 ID:35++XhB6(4/6) AAS
とりあえずNGにした

556: 2019/09/22(日)22:03 ID:35++XhB6(5/6) AAS
うっかり回答しないように連鎖にしとく方がいいか

557: 2019/09/22(日)22:23 ID:W3ewN8v1(3/4) AAS
>>548
\ls -l --time-style=+%a:%T ~/ | perl -lane 'print $F[5]' | sed "/^$/d" | perl -F: -lane '{++$i{$F[0]}; $acc{$F[0]} += $F[1]*3600 + $F[2] *60 + $F[3] }END{ print "$_ ". $acc{$_}/$i{$_} . " seconds" for keys %acc}'
日 49262.7 seconds
金 52984.3125 seconds
火 56316.8461538462 seconds
木 47056.3333333333 seconds
月 53660.7894736842 seconds
土 49998.1538461538 seconds
水 48117.5 seconds

558: 2019/09/22(日)22:24 ID:W3ewN8v1(4/4) AAS
スルーだったか

559(5): 蟻人間 ◆T6xkBnTXz7B0 2019/09/22(日)22:44 ID:rZK31NHQ(3/5) AAS
お題: 自分のプログラムファイルが何バイトかを表示せよ。

560(1): 2019/09/22(日)22:48 ID:Yf8464Y3(1/3) AAS
>>548 Perl5、なお>>550は(utimeを使えばできますが)回答は作成いたしません

use File::Find 'find';
sub hier {
　my $mtime = (lstat)[9];
　push @epochs, $mtime if -f _;
}
find({wanted => \&hier}, "$ENV{USERPROFILE}/My Documents");
@w = ([],[],[],[],[],[],[]);
for (@epochs) {
　($sec, $min, $hour, $wday) = (localtime $_)[0..2,6];
省20

561: 2019/09/22(日)22:50 ID:JOdgUuSI(1/2) AAS
>>548
馬鹿っぽ

562: 2019/09/22(日)22:53 ID:JOdgUuSI(2/2) AAS
蟻人間、プログラミングに興味を持ち始めた中学生臭がすごい

563: 蟻人間 ◆T6xkBnTXz7B0 2019/09/22(日)23:00 ID:rZK31NHQ(4/5) AAS
>>559
はいはい、模範解答出せばいいんでしょ？

// C++/Win32
#include <windows.h>
#include <stdio.h>
int main(void)
{
char buf[MAX_PATH];
GetModuleFileNameA(NULL, buf, MAX_PATH);
WIN32_FIND_DATAA find;
省5

564: 蟻人間 ◆T6xkBnTXz7B0 2019/09/22(日)23:03 ID:rZK31NHQ(5/5) AAS
>>559 別解ね。
/* C */
#include <stdio.h>
int main(int argc, char **argv)
{
FILE *fp = fopen(argv[0], "rb");
fseek(fp, 0, SEEK_END);
printf("%ld bytes\n", ftell(fp));
fclose(fp);
return 0;
省1

565: 2019/09/22(日)23:10 ID:Yf8464Y3(2/3) AAS
>>559 Perl5

print -s $0, "bytes\n";

実行
~ $ perl 15_559.pl
25bytes

566: 2019/09/22(日)23:25 ID:35++XhB6(6/6) AAS
>>514 Pharo/Squeak Smalltalk

| suffixes fn |

suffixes := #(st nd rd), (Array new: 7 withAll: #th).
suffixes := (0 to: 9) gather: [:idx | suffixes].
suffixes from: 11 to: 13 put: #th.

fn := [:n | n asString, (suffixes atWrap: n)].

fn value: 1. "=> '1st' "
fn value: 23. "=> '23rd' "
fn value: 12. "=> '12th' "

567(1): 2019/09/22(日)23:32 ID:Yf8464Y3(3/3) AAS
>>560 修正、0割回避、localtimeが返すepochのmtimeはUTCベースなのでTZ設定追加し9時間ずれ対策

$ENV{TZ} = 'UTC';
use File::Find 'find';
use Time::Piece;
sub hier {
　my $mtime = (lstat)[9];
　push @epochs, $mtime if -f _;
}
find({wanted => \&hier}, "$ENV{USERPROFILE}/My Documents");
print "Number of files = " . @epochs . "\n";
省15

568(3): 蟻人間 ◆T6xkBnTXz7B0 2019/09/23(月)00:23 ID:JAc5gnVl(1) AAS
>>548
出題の狙い。犯罪捜査において被疑者または関係者の生活パターンを知りたいときに、パソコンのファイルの日時の統計のデジタル鑑識により、パソコンの使用実態が類推可能であることを示すものである。

569: 2019/09/23(月)00:28 ID:GyCF+Do4(1) AAS
出勤とか寝る時間があまり変わらないという仮定で
同一人物の疑いがある2つのコテハンを
数百スレ分から時間別書き込み頻度から検証したことがあるが
それにくらべると得られる情報少なすぎて草

570: 2019/09/23(月)00:30 ID:iF+DbCXr(1/2) AAS
>>568
馬鹿っぽ

571: 2019/09/23(月)01:01 ID:ZSRjXCoe(1/2) AAS
>>568
朝と夜に作ったファイルの平均は昼になるし
ダウンロードした大規模なOSSのアーカイブを展開した物とか入っているんで
曜日ごとの平均時刻じゃー何の傾向も分かりません

572: 2019/09/23(月)01:43 ID:ZSRjXCoe(2/2) AAS
>>567
そうじゃねぇだろ、file systemのmtimeはUTCベースなのに
わざわざlocaltimeでTZ=JST_9の日時に変換してから
時分秒だけTime::Pieceに食べさせるから
GMTとして解釈され9時間ずれたんだよ。
それを回避するためTZ環境変数にUTCを設定するとは
何たる尻の青い、くちばしの黄色い、まだ駆け出しの青二才、未熟者

573: 2019/09/23(月)04:00 ID:Sp7ybd6s(1) AAS
>>559 Common Lisp
外部ﾘﾝｸ:ideone.com (sbcl)
外部ﾘﾝｸ:ideone.com (clisp)

ideoneは、sbclの場合は compile-file で作成したファイルを実行しているらしく
結果が異なっているのはそのため

574: 蟻人間 ◆T6xkBnTXz7B0 2019/09/23(月)12:05 ID:Pxp3zDR1(1) AAS
>>548
C++/Win32 模範解答。
外部ﾘﾝｸ:gist.github.com

575: 2019/09/23(月)12:49 ID:iF+DbCXr(2/2) AAS
模範解答(汚ねえスパゲティ)

576: 2019/09/23(月)13:54 ID:2RLjyW/B(1) AAS
>>504 Lua

a={}
for x in io.lines() do a[x]=(a[x] or 0)+1 end
for k,v in pairs(a) do print(k,v) end

577: 2019/09/27(金)01:42 ID:/3CUbuCi(1/3) AAS
>>521
Kotlin
外部ﾘﾝｸ:paiza.io

578: 2019/09/27(金)02:44 ID:/3CUbuCi(2/3) AAS
>>522
Kotlin
外部ﾘﾝｸ:paiza.io

579: 2019/09/27(金)02:50 ID:/3CUbuCi(3/3) AAS
>>550
シェルスクリプト (find, touch コマンド使用)

2019/09/27 02:48:00 に合わせる場合

#!/bin/sh
find あるフォルダ -type f -exec touch -t 201909270248.00 {} \;

580(1): 2019/09/27(金)19:49 ID:jf7tgLq0(1/2) AAS
>>548
Powershell

ls ([Environment]::GetFolderPath(5)) -Recurse -Force |? {!$_.PSIsContainer} `
|% {$_.LastWriteTime} | sort {[int]$_.DayOfWeek} | group {"{0:ddd}" -f $_} `
|% {"{0}{1,10:T}" -f $_.Name, [DateTime][Int64]($_.Group |% {$_.TimeOfDay.Ticks} | measure -Average).Average}

581: 2019/09/27(金)19:57 ID:jf7tgLq0(2/2) AAS
>>580をコピペで実行するときは、`の後の半角空白を削除しないとエラーになる。

582(5): 2019/09/27(金)21:29 ID:vBAnAZ37(1) AAS
お題：リスト等の重複する要素を削除し、大きい順に並び替えよ
[3, 1, 4, 1, 5]
↓
[5, 4, 3, 1]

java
外部ﾘﾝｸ:ideone.com

rust
外部ﾘﾝｸ:ideone.com

ruby
外部ﾘﾝｸ:ideone.com
省2

583: 2019/09/27(金)22:41 ID:kWPPTdrf(1) AAS
>>582 Ruby

p [3, 1, 4, 1, 5].uniq.sort_by(&:-@)

# => [5, 4, 3, 1]

584: 2019/09/27(金)23:07 ID:Z4UqEtTG(1) AAS
>>582 javascript
[...new Set([3, 1, 4, 1, 5])].sort().reverse()

585: 2019/09/28(土)00:13 ID:OLAr2jSy(1) AAS
>>582 Pharo/Squeak Smalltalk

#(3 1 4 1 5) asSet sorted: #> "=> #(5 4 3 1) "

586: 2019/09/28(土)00:23 ID:gcUBCYXO(1) AAS
>>582 Perl5 二回答

%h = map{$_=>1} qw(3 1 4 1 5);
@a = sort{$b<=>$a} keys %h;
print "@a\n";

use List::Util 1.45 'uniq';
@a = uniq sort{$b<=>$a} qw(3 1 4 1 5);
print "@a\n"

実行結果、いずれも
~ $ perl 15_582.pl
5 4 3 1

587: 2019/09/28(土)00:52 ID:HcOq9X6n(1/7) AAS
>>568
それだったら曜日毎の1時間毎のファイル数でグラフにするとかしないと分かりづらいのではないか？

ああ。そういうお題作ればいいか。

588(4): 2019/09/28(土)01:09 ID:HcOq9X6n(2/7) AAS
お題: 指定のディレクトリ以下にある全てのファイルの更新日時を取得し、曜日毎、及び時間毎にしてグラフにして出せ。

これは同じ曜日の同じ時間で更新されているファイルのカウントということね。例えば今週と先週の土曜日の7:00代の更新ファイルが一つづつあれば土曜日7時代のカウントが2になる。
で、グラフにする時は表示方法はなんでもいいので例えばテキストでアスタリスク2個で出す。(後でこちらでもプログラム作るのでそれ参考にしてもいい)。
ディレクトリの指定方法は普通なら引数での指定が良いだろうけどプログラムに埋め込んでも標準入力やファイルから読み込んでも何でもいい。それはこのお題では肝心な事ではないので。

589(3): 2019/09/28(土)02:06 ID:63IK4172(1/3) AAS
それだったらファイル、ディレクトリ操作は除外してランダムに日時発生させるとかでいいだろ
機種依存するので
ランダム生成は依存しない

590: 2019/09/28(土)03:07 ID:HcOq9X6n(3/7) AAS
>>588
作った。

Kotlin
外部ﾘﾝｸ:paiza.io

591: 2019/09/28(土)03:08 ID:HcOq9X6n(4/7) AAS
>>589
？

592(1): 2019/09/28(土)03:10 ID:63IK4172(2/3) AAS
unixタイムとかで、日時と整数は一対一対応してるだろ
ランダム生成で日時は作れる

593: 2019/09/28(土)03:15 ID:HcOq9X6n(5/7) AAS
>>592
いや、そうじゃなくて >>589 は何番のレスに対するレスなの？

594(1): 2019/09/28(土)03:30 ID:63IK4172(3/3) AAS
何番と限らず日時と整数は一対一できるから日時が関係するあらゆる問題

595: 2019/09/28(土)03:58 ID:HcOq9X6n(6/7) AAS
>>594
いや、 >>589 は何かを読んだ結果書いたんでしょ? 何を読んで書いたの?

596: 2019/09/28(土)04:47 ID:HcOq9X6n(7/7) AAS
>>588
もう一つ作った。

Perl
外部ﾘﾝｸ:paiza.io

597: 2019/09/28(土)10:58 ID:bVbqLRNA(1) AAS
>>582
@Mathematica

deleteDuplicatesSort[lst_] := lst //
　DeleteDuplicates //
　Sort[#, Greater] & ;

In[1] := deleteDuplicatesSort[{3, 1, 4, 1, 5}]
Out[1] = {5, 4, 3, 1}

# Mathematica のカーネルがいつの間にか無償開放されてた！
#
# 「「Mathematica」や“Wolfram|Alpha”の核「Wolfram Engine」が開発者向けに無償開放」
省1

598: 2019/09/28(土)15:09 ID:E6lKnilk(1/4) AAS
C++標準のファイルシステムでは、パスは取れるが、時間を取得する関数がないっぽい。

599: 2019/09/28(土)15:18 ID:E6lKnilk(2/4) AAS
あぁ、あったわ。C++17で入ったからまだ不明瞭だ。自分にとって。

600: 2019/09/28(土)15:36 ID:E6lKnilk(3/4) AAS
>>559
外部ﾘﾝｸ:coliru.stacked-crooked.com
C++。C++17がいる。結構サクッとかけたな。

601: 2019/09/28(土)16:35 ID:E6lKnilk(4/4) AAS
>>548
外部ﾘﾝｸ:ideone.com
C++。マイドキュメントの列挙だけで力尽きた。ぐはぁ・・・。

602: 2019/09/28(土)21:56 ID:yaf8uxdw(1) AAS
>>588
PowerShell

$path = [Environment]::GetFolderPath(5)
$all = ls $path -Recurse |? {!$_.PSIsContainer} |% {$_.LastWriteTime}
$max = [Math]::Max(10, ($all | group DayOfWeek, Hour | measure Count -Max).Maximum)

"時" + (("日月火水木金土" -split "") -join "|".PadRight(9))
"--+" + ("-" * 10 + "+") * 7

$y = $all | group Hour -AsHashTable
0..23 |% {
if ($y[$_]) {
省11

603(2): 蟻人間 ◆T6xkBnTXz7B0 2019/09/29(日)02:59 ID:8mEp/ii8(1/4) AAS
お題: 地球上の2地点を緯度・経度で指定すると、(球面上の)直線距離を求めてくれるプログラム。

地球がほぼ球体であることを仮定してもよい。

604(1): 蟻人間 ◆T6xkBnTXz7B0 2019/09/29(日)03:04 ID:8mEp/ii8(2/4) AAS
ロンドンからニューヨーク。
北京から台湾。
ニュージーランドからトルコ。

605(2): 蟻人間 ◆T6xkBnTXz7B0 2019/09/29(日)03:16 ID:8mEp/ii8(3/4) AAS
参考に: 外部ﾘﾝｸ:keisan.casio.jp

606(1): 蟻人間 ◆T6xkBnTXz7B0 2019/09/29(日)03:55 ID:8mEp/ii8(4/4) AAS
ヒント: 度をラジアンに変換。dの公式に代入する。緯度経度はグーグルマップで調べる。コサインの逆関数はアークコサイン。

607: 2019/09/29(日)09:16 ID:GG+B8frl(1/3) AAS
数学の問題どすな

地球半径をR、緯度をΦ、経度をΘとすると
地表上の点Pの座標(x,y,z)は

(x,y,z)=R(cosΦcosΘ,cosΦsinΘ,sinΦ)
(R,0,0)は赤道上の東(西)経0度の地点
(ギニア湾　ガーナ　アクラ沖約600km)

(0,R,0)も赤道上の東(西)経180度の地点
(太平洋　ナウル島から約1450km)

二地点の座標をベクトルに見立て
内積をR^2で割って逆余弦関数に
省1

608: 2019/09/29(日)09:23 ID:GG+B8frl(2/3) AAS
ちょい間違った
(0,R,0)は東経90度の赤道上の太平洋上の地点で
スリランカ・コロンボから約1360kmの地点
(-R,0,0)がナウル島から1450kmの地点
(0,-R,0)はガラパゴス諸島から20～25km程度の
太平洋上の地点

609: 2019/09/29(日)09:25 ID:GG+B8frl(3/3) AAS
表計算ソフトを使うのが効率的ね

610: 2019/09/29(日)10:48 ID:UzLHlBWt(1) AAS
地球を球に近似する時点でナンセンス。解く価値無し

611: 2019/09/29(日)11:06 ID:VkSI6pCv(1) AAS
仮定してもよい　なんだから球に近似しないで書けばいい話じゃね？

612(1): 2019/09/29(日)12:00 ID:bEy1wMJX(1/2) AAS
>>603 大円距離の問題なんだから、距離が一番短くなる2点間の長さとすべき、
great-circular distance

>>605 の数値を使い
地球の半径を　6378.137 km
2点の緯度経度　
139.74477,35.6544 ,
39.8261, 21.4225

Python

外部ﾘﾝｸ:ideone.com

答え　 9,491.28 km

613: 2019/09/29(日)12:03 ID:bEy1wMJX(2/2) AAS
>>612 2点間の経度緯度　の間違い

614(1): 2019/09/29(日)12:33 ID:mYJaebwB(1/2) AAS
>>603-6

use Math::Trig qw{deg2rad acos};
($lat1, $long1) = map{deg2rad $_} (51.507448,-0.1287243); # ロンドンウエストミンスターチャールズ1世騎馬像
($lat2, $long2) = map{deg2rad $_} (40.712775,-74.005973); # ニューヨークCity Park Hall(市庁舎)
$theta = $long1 - $long2;
$dist = sin($lat1) * sin($lat2) + cos($lat1) * cos($lat2) * cos($theta);
$dist = 6378.137 * acos($dist);
printf "%.2f[Km]\n", $dist;

実行結果
~ $ perl 15_604.pl
省3

615: 2019/09/29(日)12:34 ID:mYJaebwB(2/2) AAS
>>614 アンカーしくった
>>603-606 だた…orz

616(1): 2019/09/29(日)19:44 ID:aa2vZ2v/(1) AAS
お題:8queenで面白いパターンを見つけよ。

617(1): 2019/09/29(日)23:06 ID:OI4EUI6E(1) AAS
お題:もっと面白いお題を考えよ。

618: 2019/09/29(日)23:45 ID:m0Odf/xn(1) AAS
>>588 C
外部ﾘﾝｸ:ideone.com

619: 2019/09/29(日)23:51 ID:k4CvVXqN(1) AAS
>>616
面白いってひどく曖昧だな

620(4): 蟻人間 ◆T6xkBnTXz7B0 2019/09/30(月)02:22 ID:i5LhrskR(1) AAS
お題: サイズ15x15の空白マス('_')がある。黒マス('#')をいくつかランダムに置いて、空白マスが縦または横向きに5マス連続に並ばないようにしたい。ただし、
1. なるべく早く黒マスを配置せよ。
2. 実行のたびに常にランダムにまんべんなく配置せよ。
3. 黒マスが縦または横に隣り合ってはいけない。
4. (ア)全て並べる、そして(イ)並びが正しいか検証する、の(ア)と(イ)を15回繰り返してかかる時間を実測せよ。

621: 2019/09/30(月)09:19 ID:eZfyppwl(1) AAS
>>617
考えた。

でもこれは発表しない。誰にも教えない。墓まで持っていく。

622: 2019/09/30(月)10:08 ID:4XC9Ks9U(1) AAS
>>620
馬鹿っぽ

623(1): 2019/09/30(月)16:46 ID:ypiuCBLp(1/4) AAS
>>620
外部ﾘﾝｸ:ideone.com
C++。ふえ～。円の当たり判定しようと思ったのに、うごかないよ～。
コード間違ってるのか、数学ぶっ壊れたのかわからん。
デバッグしてくれる人募集。

コード間違ってるんやったら、俺の認識限界がおかしいな。

624(1): 2019/09/30(月)17:15 ID:ypiuCBLp(2/4) AAS
>>623
外部ﾘﾝｸ:ideone.com
C++。代替え案。実行ごとにパターンが変わって敷き詰めた一例。
変わってないと思うなら0点のパターンを見てみよう。

625: 2019/09/30(月)17:20 ID:ypiuCBLp(3/4) AAS
じっそうじかんは多分2時間以内だ。

626(1): 2019/09/30(月)17:55 ID:tHR3tKyN(1) AAS
>>624
代替案(だいたい-あん)と言いなさい

627: 2019/09/30(月)18:25 ID:ypiuCBLp(4/4) AAS
>>626
あー。すっかり忘れてた。。。

628: 2019/09/30(月)20:18 ID:H9c5jpU6(1) AAS
>>620
なるほど
コレだな

黒マスルール - Wikipedia
外部ﾘﾝｸ:ja.wikipedia.org

画像ﾘﾝｸ[jpg]:ja-kouka.shinobi.or.jp

出来上がった白黒の升目に上手いこと単語を置くとクロスワードパズルになる
「縦または横向きに5マス連続に並ばない」は「縦または横向きに4マスまで連続に並んでもいい」だ
そこにさらに追加ルールを仕込むとクロスワードパズルの枠が出来上がる

629(14): 2019/10/01(火)07:35 ID:NlppalS8(1/3) AAS
お題

言語限定（コマンドプロンプト・パワーシェル・bash/csh等のUNIXシェル)

10000までの素数を列挙して出力

当然だが、スクリプト言語処理系やコンパイラに丸投げさせるのは禁止
というか、技量の程度が疑わてしまうのでお勧めしない

630: 2019/10/01(火)08:06 ID:7l0S2vrN(1) AAS
「○○は禁止」系のお題はろくなのがないから禁止した方がいい

631: 2019/10/01(火)08:35 ID:NlppalS8(2/3) AAS
プログラミング言語なんて、禁止の塊で出来たものなんで
「禁止の所産」って奴な

632: 2019/10/01(火)08:56 ID:H2UNgdyX(1) AAS
>>629
シェルスクリプトスレ池

633: 2019/10/01(火)09:02 ID:zsyRP5Ba(1) AAS
>>629
C で書いておけば許されるかんじがする
外部ﾘﾝｸ:pastebin.com

実行
画像ﾘﾝｸ[jpg]:i.imgur.com

最大の素数の幅を見てからきちんと整列される
~/bin/is_prime.exe 50900 60000
50909 50923 50929 50951 50957 50969 50971 50989 50993 51001
51031 51043 51047 51059 51061 51071 51109 51131 51133 51137

634: 2019/10/01(火)09:20 ID:j8m55EYr(1) AAS
>>629 Linux
$ primes 2 10001
2
3
...
9967
9973

635: 2019/10/01(火)09:21 ID:R4cuDBX/(1) AAS
遅くまともな言語ではないやつで、どうにかして動くのを作れというお題なんだろ
まともな言語使用してしまえばお題からずれてるかと

636: 2019/10/01(火)09:53 ID:PlApYvsP(1/2) AAS
配列使えるシェルもあるからそういうの使えば楽かも
shでもsetすりゃ配列だが

まあでも遅そうで実用性なさげ

637(3): 2019/10/01(火)12:56 ID:ygg8X6aa(1/6) AAS
>>629 コマンドプロンプト(Windows)
外部ﾘﾝｸ:ideone.com

おそい…コマンドプロンプトよーわからんですよ

638: 629 2019/10/01(火)13:54 ID:NlppalS8(3/3) AAS
>>637
スゴイｗ
やれば出来るものですね。
10000を超えても出力し続けてますｗ

639: 2019/10/01(火)14:02 ID:ygg8X6aa(2/6) AAS
あ、10000までの制限がないｗｗ
limit=100までにしてるから10000以降に出た数値は信頼性ないｗｗｗ

修正したものを実行して確認中…10000で止まったらUPる…遅い(´・ω・`)

640: 2019/10/01(火)14:07 ID:ygg8X6aa(3/6) AAS
>>629 コマンドプロンプト (>>637の修正版)
外部ﾘﾝｸ:ideone.com

637は書いてたはずのecho 2も消えてた(´・ω・`)

641: 2019/10/01(火)15:07 ID:ygg8X6aa(4/6) AAS
まあまだ 49(7*7) 289(17*17) 961(31*31) 2209(47*47) 3721(61*61) 6241(79*79)を出力するバグがあったわけだがｗ

642(1): 2019/10/01(火)15:44 ID:ygg8X6aa(5/6) AAS
>>629 コマンドプロンプト修正版2
外部ﾘﾝｸ:ideone.com
もうバグないといいな

643: 2019/10/01(火)16:30 ID:7XyHUR/V(1) AAS
シェルスクリプトでチョコチョコと何かやる分には良いが、プログラムを書くというのとは違うだろ。
プログラムはそれなりのものた^_^書いた方が効率的。

どっちからでも起動できるんだから餅は餅屋。

644: 2019/10/01(火)16:32 ID:9fvqkmcJ(1) AAS
^_^;

645: 2019/10/01(火)17:17 ID:PlApYvsP(2/2) AAS
>>629
bash
外部ﾘﾝｸ:paiza.io

でもやっぱ遅くてpaiza.ioではtimeoutして最後まで出てこないw

646(1): 2019/10/01(火)21:04 ID:rsBZCnlu(1) AAS
>>629
遅くても構わなければ、PowerShellではとても簡潔に書ける。

$p = 2..10000
while ($p) {
　　$p[0]
　　$p = @($p |? {$_ % $p[0]})
}

647: 2019/10/01(火)21:59 ID:Ueonb/Q5(1) AAS
誰が遅くても構わないと言った

648(3): 2019/10/01(火)22:03 ID:x7eW/FrR(1) AAS
お題: ハッシュマップを実装せよ

649: 2019/10/01(火)22:05 ID:ygg8X6aa(6/6) AAS
俺が書いたコマンドプロンプトのよりは早いぞｗ

650: 2019/10/01(火)22:21 ID:H9NeHROf(1) AAS
>>648
ジェネリックに書くとして、ハッシュ関数はどうやって書けばいいんだ？
std::vector<std::list<T>>> HashMap;
っていう感じのことはできそうではあるけどな。

651: 2019/10/02(水)07:55 ID:YpMEiTCH(1) AAS
# Java

HashMap<String, Integer> shop = new HashMap<String, Integer>();

shop.put("apple", 100);
shop.put("banana", 125);
System.out.println(shop.get("banana")); //=> 125

# Python

shop = { 'apple':100 , 'banana':125 }
print(shop['banana'])
# 125

652: 2019/10/02(水)12:25 ID:56vpBHGI(1) AAS
それは実装ではない。

653: 2019/10/02(水)13:20 ID:+RotAwEg(1/2) AAS
>>648
このスレの住民のレベルに合っていてかつプログラマにとって必要不可欠な知識なので良いお題

上下前次 1-新書関写板覧索設栞歴

あと 349 ﾚｽあります
ｽﾚ情報赤ﾚｽ抽出画像ﾚｽ抽出歴の未読ｽﾚ AAｻﾑﾈｲﾙ

ぬこの手ぬこTOP 0.079s