[過去ﾛｸﾞ] プログラミングのお題スレ Part16 (1002ﾚｽ)
上下前次1-新
このｽﾚｯﾄﾞは過去ﾛｸﾞ倉庫に格納されています｡
次ｽﾚ検索 歴削→次ｽﾚ 栞削→次ｽﾚ 過去ﾛｸﾞﾒﾆｭｰ
298: 2019/12/13(金)23:49 ID:r2S5lo/C(1/2) AAS
数学でワープできる分手計算のほうが早い
299: 2019/12/13(金)23:49 ID:QuzLYYNu(6/10) AAS
kwsk
300: 2019/12/13(金)23:50 ID:r2S5lo/C(2/2) AAS
>283
301: 2019/12/13(金)23:52 ID:QuzLYYNu(7/10) AAS
(A)は解決済み
(B)の話
302: 2019/12/13(金)23:53 ID:QuzLYYNu(8/10) AAS
数学で絞れるのは>>296くらいかと
303: 2019/12/13(金)23:56 ID:QuzLYYNu(9/10) AAS
下限の n! を計算するのは速い
そこから順番に1個ずつnを増やしていって
0を数えていかないとならない
見つからなければ上限までずっと
304(1): 2019/12/13(金)23:59 ID:QuzLYYNu(10/10) AAS
ちなみに私、東大の数学科卒なんで
305(1): 2019/12/14(土)00:07 ID:ruM/1CH5(1/3) AAS
ワープ
(* 4 1234567) 4938268
(/ 4938268 5.0) 987653.6
(/ 987653 5.0) 197530.6
(/ 197530 5.0) 39506.0
(/ 39506 5.0) 7901.2
(/ 7901 5.0) 1580.2
(/ 1580 5.0) 316.0
(/ 316 5.0) 63.2
(/ 63 5.0) 12.6
省2
306: 2019/12/14(土)00:14 ID:03SKvnKb(1/2) AAS
>>305
だからそれは>>282の(A)の話じゃろ…
307: 2019/12/14(土)00:15 ID:ruM/1CH5(2/3) AAS
Bの話か
308: 2019/12/14(土)02:58 ID:03SKvnKb(2/2) AAS
階乗の0である桁が1234567個になる最小値は1542987です。
お、出た…4時間か
309(5): 2019/12/14(土)03:55 ID:DhSlagHw(1) AAS
お題: 目覚まし時計の現在時刻とアラーム時刻が入力されるので、待機時間を出力しなさい
例:
現在時刻 = 10:00
アラーム時刻 = 16:00
待機時間 = 06:00
現在時刻 = 22:00
アラーム時刻 = 04:00
待機時間 = 06:00
310: 2019/12/14(土)09:12 ID:ruM/1CH5(3/3) AAS
>>309
これだな
外部ﾘﾝｸ:paiza.io
~/bin/sleep.pl 10:00
2909 00:48:29
のように使ってる
311: 2019/12/14(土)09:59 ID:Lp9CT80F(1) AAS
>>304
進振り何点だった？ 連投アスペ君
312(1): 2019/12/14(土)22:12 ID:8CJijD11(1) AAS
>>309
この手の処理はPowerShellが得意だな。
function WaitingTime($now, $alarm)
{
$wait = [DateTime]$alarm - [DateTime]$now
if ($wait -lt 0) {$wait += [TimeSpan]"12:00" + [TimeSpan]"12:00"}
"現在時刻 = $now"
"アラーム時刻 = $alarm"
"待機時刻 = $wait"
""
省14
313: 2019/12/15(日)00:16 ID:K3IRPfAN(1/3) AAS
>>312
キャスト出来るんだな
楽そう
314(2): 2019/12/15(日)06:09 ID:K3IRPfAN(2/3) AAS
お題: あなたは研究所で助手をしています
ある日、博士からこんな手紙が届きました
助手よ。この数値の名前を教えて欲しい
16776960
あなたは博士に返事を書こうと思います
その返事の内容をお答えください
315(1): 2019/12/15(日)07:44 ID:VJoyKt1C(1/2) AAS
>>314 直感
Yellow
316(1): 2019/12/15(日)10:09 ID:/SOvb5b/(1) AAS
黄色だな
317(13): 2019/12/15(日)11:56 ID:wptEtnNg(1) AAS
お題
与えられた自然数の0を全て右端に寄せる
例
2019 -> 2190
102030 -> 123000
123 -> 123
318: 2019/12/15(日)12:02 ID:fpSJINfx(1) AAS
>>309
Ruby で、
require 'active_support/time'
def calculate_time_span( now, alarm )
current = Time.now
now_time = Time.parse( now, current ) #=> 2019-12-15 22:00:00 +0900
alarm_time = Time.parse( alarm, current ) #=> 2019-12-15 04:00:00 +0900
diff_time = alarm_time - now_time
# アラームが翌日の場合
diff_time = alarm_time.tomorrow - now_time if diff_time < 0
省6
319: 2019/12/15(日)13:16 ID:VJoyKt1C(2/2) AAS
>>309 Ruby
def waitTime( n, a )
Time.at( (a - n) % 86400 ).utc
end
320: 2019/12/15(日)15:13 ID:KhVK4v3Y(1/2) AAS
>>309
外部ﾘﾝｸ:ideone.com
C++。あってるかな？
321: 2019/12/15(日)15:21 ID:yZPHpztp(1) AAS
>>317 Common Lisp
外部ﾘﾝｸ:ideone.com
322: 2019/12/15(日)15:38 ID:KhVK4v3Y(2/2) AAS
>>317
外部ﾘﾝｸ:ideone.com
C++。できてるかな？
323: 2019/12/15(日)16:45 ID:K3IRPfAN(3/3) AAS
>>315-316
正解
324: 2019/12/15(日)20:15 ID:IFqyyeL5(1) AAS
>>317
これもPowerShellで簡単。
function f($n)
{
$m = -join([char[]]"$n" |? {$_ -ne "0"})
($m += "0" * ("$n".length - $m.length))
}
f 2019; f 102030; f 123
325: 2019/12/15(日)22:45 ID:myBFLrpG(1/4) AAS
お題：ハノイの塔の最少手数は一種類しかないのか？
(Part 13, 055)
結果：n枚の円盤すべてを移動させるには最低 2^n −1 回の手数がかかる。
326(3): 2019/12/15(日)22:58 ID:myBFLrpG(2/4) AAS
4ピンのハノイの塔(河内塔)
n枚の円盤は最初ピン0にある。n枚すべてをピン3に移動させる。
条件：
小円盤の上に大円盤を載せられない。
ピン1とピン2には最大1枚しか置けない。
327(2): 2019/12/15(日)23:12 ID:myBFLrpG(3/4) AAS
・n=2 のとき
12, -, -, -
2, 1, -, -
-, 1, -, 2
-, -, -, 12 (3手)
・n=3 のとき
123, -, -, -
23, 1, -, -
3, 1, 2, -
-, 1, 2, 3
省17
328(3): 2019/12/15(日)23:25 ID:myBFLrpG(4/4) AAS
・n=5 のとき
12345, -, -, -
2345, 1, -, -
345, 1, 2, -
45, 1, 2, 3
45, 1, -, 23
45, -, -, 123
5, 4, -, 123
-, 4, 5, 123
4, -, 5, 123
省17
329: 2019/12/16(月)08:07 ID:YuYKZXFs(1) AAS
お題：
ここに単語を登録したリストがある
リストには以下の種類の言葉が存在する
単語：（例）くさり
単語解説：（例）環状の部品を繋げて線状にしたもの
リストには上記ペアを１単位として、ずらずら並んでいる
（数十個くらい）
リストの中の似たような単語を探し、
以下のサンプルのようにボケ、ツッコミを繰り返すプログラムを作れ
似たような単語が見つからない場合には
省11
330: 2019/12/16(月)09:38 ID:UpTR80vx(1/2) AAS
>>326
・n≧6のとき
ピン1とピン2には各1個しか置けないから 1〜(n-1) を置くことはできない。
∴ n を ピン0 から ピン3 に直送することはできない。
∴ ピン0 → ピン1 → ピン3 と送ろう。
まず 12345 をピン2、ピン3に退避する。(n=6の場合)
123456, -, -, -
6, -, m, 12345-m (1≦m≦5)
6, -, -, 12345 は m=1 と見なす。
-, 6, m, 12345-m
省3
331(3): 2019/12/16(月)10:03 ID:UpTR80vx(2/2) AAS
条件を変えたらどうなるか？
条件(1,1)
ピン1、ﾋﾟﾝ2には最大で１枚しか置けない。 >>326
条件(1,2)
ピン1には最大で1枚、ピン2には最大で2枚しか置けない。
条件(2,2)
ピン1、ピン2には最大で2枚しか置けない。
332: 2019/12/16(月)12:12 ID:ZZ8St2Js(1) AAS
>>331
pin1,pin2に置ける枚数(の合計)に上限があれば
移動可能枚数に上限がつく
333: 2019/12/16(月)14:51 ID:b9yK9thh(1/2) AAS
>>314
common lisp
(format t "~R" 16776960)
sixteen million, seven hundred and seventy-six thousand, nine hundred and sixty
334: 2019/12/16(月)15:02 ID:b9yK9thh(2/2) AAS
>>317
perl5
cat digits
2019
102030
123
cat digits | perl -lane '$zero = 0; while (s/0//) {++$zero}; print $_ . "0" x $zero;'
2190
123000
123
335: 2019/12/16(月)17:56 ID:rcGH9Ke6(1) AAS
>>317 Ruby
def f(n)
n.to_s.chars.partition{|x| x !="0"}.join .to_i
end
336: ◆QZaw55cn4c 2019/12/16(月)20:29 ID:NZyGx79l(1) AAS
>>326
これ昔やったことがありますが、すっかり忘れてしまったのは残念ですね…
337: 2019/12/16(月)22:11 ID:Ppfui4Eb(1) AAS
>>317 PowerShell
function f($n) {($n -replace "0", "") + ($n -replace "[^0]", "")}
338(1): 2019/12/17(火)01:24 ID:XiWpNBJ4(1/2) AAS
>>317 Common Lisp
外部ﾘﾝｸ:ideone.com
339: 2019/12/17(火)04:04 ID:XiWpNBJ4(2/2) AAS
>>317 Common Lisp
>>338は間違いでした
修正版: 外部ﾘﾝｸ:ideone.com
340: 2019/12/17(火)13:17 ID:EDJKyz+u(1) AAS
AA省
341(5): [age] 2019/12/17(火)17:33 ID:/DSBUbt2(1) AAS
お題
任意の文字列からaが連続する最も長い長さを出力してください
入力:acgtaattgaaagggtctt
期待値:3
342(1): 2019/12/17(火)18:10 ID:Etag1t/i(1/2) AAS
>>341 Common Lisp
外部ﾘﾝｸ:ideone.com
343: 2019/12/17(火)18:50 ID:Etag1t/i(2/2) AAS
>>342
うん? またバグってた
>>341 Common Lisp
外部ﾘﾝｸ:ideone.com
344: 2019/12/17(火)19:34 ID:JvBVW/sd(1) AAS
>>317 C++
数値のままやってみた
外部ﾘﾝｸ:ideone.com
345: 2019/12/17(火)20:02 ID:bKU/e1zO(1) AAS
>>341 Ruby
p 'acgtaattgaaagggtctt'.gsub(/[^a]+/,' ').split.uniq.sort_by{|s| s.size}.last.size
346(10): 2019/12/17(火)21:06 ID:eGUcswGM(1) AAS
お題
1〜1,000 の整数の内、3 か5 の倍数だけを選んで、その合計を求めよ
347: 2019/12/17(火)21:42 ID:p+XnOFki(1) AAS
>>346
Rで2通りの求め方
d <- c(3, 5, -3 * 5)
q <- 1000 %/% d
cat(sum(d * q * (q + 1) / 2), "\n")
cat(sum(which(1:1000 %% 3 == 0 | 1:1000 %% 5 == 0)), "\n")
--- 実行結果 ---
234168
234168
348(1): 2019/12/17(火)21:42 ID:Q1C16S4i(1/2) AAS
>>341 Ruby
p 'acgtaattgaaagggtctt'.scan(/a+/).max.size # => 3
>>346 Ruby
p 0.step(1000,3).sum + 0.step(1000, 5).sum - 0.step(1000, 15).sum # => 234168
349: 2019/12/17(火)21:45 ID:Q1C16S4i(2/2) AAS
>>348
typo
/a+/ => /a*/
350(2): ◆QZaw55cn4c 2019/12/17(火)21:47 ID:780pCLgH(1) AAS
お題：ファイル名の一部に空白文字が使える OS（出題者想定は Windows7） の元で、正常に argc, argv を切り出せるスタートアップ支援ルーチンを作ってください
"" で囲まれている文字列は、それが一つのファイル名またはディレクトリ名として扱うこととし、"" で囲まれていない空白は引数の区切りとします
int main() {
rearrange(...);
...
と main の頭に置いて、xargc, xargv を代わりに使う、見たいな感じでお願いします
例によって私が痛切に欲しいと思っているものです…
351(3): 2019/12/17(火)23:55 ID:jG+XSsUd(1) AAS
>>341は簡単すぎるので、
任意の文字列から連続してる文字が最も長い文字とその文字数を求めよ
最も長い文字が複数ある場合は全て出力すること
入力:acgtaattgaaagggtctt
期待値: ("a", 3), ("g",3)
352: 2019/12/18(水)00:00 ID:mWocJHci(1) AAS
期待値
の意味って学校で習わなかった？
353: 2019/12/18(水)00:01 ID:i+6d3gEf(1/5) AAS
>>350
依頼禁止
354: 2019/12/18(水)00:09 ID:i+6d3gEf(2/5) AAS
>>346 C
int s(int n){ return (1000/n)*(1000/n+1)/2*n; }
int main(){ return s(3)+s(5)-s(15); }
355(1): 2019/12/18(水)00:12 ID:i+6d3gEf(3/5) AAS
int main(){ return 234168; }
で良い気がしてきた
356: 2019/12/18(水)00:13 ID:LTfQ+mrC(1) AAS
戦が始まります
357: 2019/12/18(水)00:28 ID:i+6d3gEf(4/5) AAS
どうせコンパイルしたら>>355になる
358: 2019/12/18(水)01:55 ID:JeMlTDQr(1) AAS
>>351 Common Lisp
外部ﾘﾝｸ:ideone.com
359(1): 2019/12/18(水)06:09 ID:6RKB+CQ3(1) AAS
>>351 Ruby
p 'acgtaattgaaagggtctt'.scan(/((.)\2*)/).group_by{|s, _| s.size}.max&.last&.map{|s, c| [c, s.size]}
# => [["a", 3], ["g", 3]]
360: 2019/12/18(水)10:45 ID:AmwvkO78(1) AAS
acgtが出てくんだからながさ１億の文字列なんじゃね
361: 蟻人間 ◆T6xkBnTXz7B0 2019/12/18(水)11:33 ID:Zo1XP656(1) AAS
>>350
__getmainargs
362(1): 2019/12/18(水)12:47 ID:Xcao9p4E(1/3) AAS
acgtが出てくんだからDNA配列だろな。
a=adenine, c=cytosine, g=guanine, t=thymine
ながさ30億の塩基対なんぢゃね？（ヒトの場合）
363(1): 2019/12/18(水)13:00 ID:Xcao9p4E(2/3) AAS
>>331
・n=7 のとき
条件(1,2) または 条件(2,2) とする。
1234567, -, -, -
(>328)
67, -, -, 12345
7, 6, -, 12345
-, 6, 7, 12345
6, -, 7, 12345
(>327)
省15
364: 2019/12/18(水)13:04 ID:iEIErwam(1/4) AAS
(1,2)で8
(2,2)だと12
までは出来たぞ
365: 2019/12/18(水)13:06 ID:iEIErwam(2/4) AAS
(1,3)で11
紙と鉛筆で考えただけなんで
もっと出来るかも
366: 2019/12/18(水)13:29 ID:iEIErwam(3/4) AAS
(n,1)=3n+2
(2,2)以上だと
(m, n)=4(n+m-1)
まではいける
367: 2019/12/18(水)14:02 ID:1FTJXM5f(1) AAS
>>317
Kotlin
外部ﾘﾝｸ:paiza.io
実は数字かどうかではなく '0' かどうかで見てるだけ。
368(1): 2019/12/18(水)14:58 ID:Xcao9p4E(3/3) AAS
>>331
・n=8のとき
条件(1,2) または 条件(2,2) とする。
12345678, -, -, - (>328)
678, -, -, 12345
78, -, 6, 12345 (>328)
1234578, -, 6, -
1234578, -, -, 6 (>328)
78, -, -, 123456
8, 7, -, 123456
省19
369: 2019/12/18(水)16:04 ID:iEIErwam(4/4) AAS
(0,0)=1
(n,m)=(n+2)(m+2)-4
ですかね
370: 2019/12/18(水)21:05 ID:WdZQqUwr(1) AAS
>>359
Rでrle関数を使って楽々
MaxRepChar <- function(s) {
if (!nchar(s)) return(invisible())
r <- rle(unlist(strsplit(s, "")))
b <- r$lengths == max(r$lengths)
cat(sprintf('("%s", %d)', r$values[b], r$lengths[b]), sep = ", "); cat("\n")
}
MaxRepChar("acgtaattgaaagggtctt")
MaxRepChar("2chｽﾚ:tech
省3
371(6): 2019/12/18(水)21:06 ID:H5ShkPcr(1) AAS
f(m, n) : 動かせる最大枚数
m≧n≧1の時
x=f(m-1,n)
A:1,2,3,...,x
B:x+1,...,x+n
C:x+n+1
D:x+n+2
ABCD, -, -, -
CD, -, -, AB
C, D, -, AB
省13
372: ◆QZaw55cn4c 2019/12/18(水)22:57 ID:tbeJyQYA(1) AAS
>>371
理論はどうでもいいから動くコードを出して欲しいです、このスレ的には
373: 2019/12/18(水)23:01 ID:i+6d3gEf(5/5) AAS
ここまで出来ればあとは簡単
他の人に任せた
374: 2019/12/19(木)00:58 ID:1AoIgbUn(1) AAS
>>317 文言 wenyan-lang
外部ﾘﾝｸ[html]:wenyan-lang.lingdong.works
吾有一術。名之曰「零右寄」。欲行是術。必先得一數。曰「数」。乃行是術曰。
吾有三數。曰零。曰零。曰一。名之曰「甲」曰「乙」曰「丙」。
恆為是。若「数」等於零者乃止也。除「数」以十。所餘幾何。昔之「甲」者。今其是矣。
若「甲」等於零者。乘「乙」以十。昔之「乙」者。今其是矣。若非。乘「甲」以「丙」。
加其以「乙」。昔之「乙」者。今其是矣。也。除「数」以十。昔之「数」者。今其是矣。
除其以一。所餘幾何。減「数」以其。昔之「数」者。今其是矣。
乘「丙」以十。昔之「丙」者。今其是矣。云云。乃得「乙」。是謂「零右寄」之術也。
吾有一列。名之曰「丁」。充「丁」以二千零一十九。以一十萬二千零三十。以一百二十三。
省6
375(1): 2019/12/19(木)03:38 ID:i+MhtJYW(1/4) AAS
>>363
・n=7 のとき
条件(1,2) または 条件(2,2)
{1234}=A と略記する。
A567, -, -, - (>327)
567, -, -, A
67, 5, -, A
7, 5, 6, A
57, -, 6, A (>327)
A57, -, 6, -
省15
376(2): 2019/12/19(木)03:43 ID:i+MhtJYW(2/4) AAS
>>368
・n=8のとき
条件(1,2) または 条件(2,2)
{12345} = A と略記する。
A678, -, -, - (>328)
678, -, -, A
78, 6, -, A
8, 6, 7, A
68, -, 7, A (>328)
A68, -, 7, -
省15
377(2): 2019/12/19(木)04:34 ID:i+MhtJYW(3/4) AAS
・n=12 のとき
条件(2,2)
{12345678} = A, {9,10} = B, 11=C, 12=D と略記する。
ABCD, -, -, - (>376)
BCD, -, -, A
CD, -, B, A
D, C, B, A
BD, C, -, A (>376)
ABD, C, -, -
ABD, -, -, C (>376)
省20
378: 2019/12/19(木)07:01 ID:NLbJ7Izu(1) AAS
>>317 J
f =: 3 : 0
a =. ": y
b =. a -. '0'
". b , a -. b
)
379: 346 2019/12/19(木)11:40 ID:dMnFAlGo(1/2) AAS
>>346
Ruby で、234,168
# 蓄積変数の初期値は、0
puts ( 1..1_000 ).inject( 0 ) { |sum, num|
num % 3 == 0 || num % 5 == 0 ? sum + num : sum
}
380(1): 2019/12/19(木)13:03 ID:LRZ6v8WB(1) AAS
>>375-377
>>371で理論は出来たんだから
次は
プログラムにするか
等号の証明をするか
最短手順を調べるか
本数を増やすか
ではないでしょうか？
私は>>371で満足
出題者ありがとう
381: 2019/12/19(木)14:49 ID:i+MhtJYW(4/4) AAS
>>380
う〜む、等号の証明でござる。
382: 2019/12/19(木)16:03 ID:POC72xQm(1) AAS
どれが？
383(4): 2019/12/19(木)16:34 ID:dMnFAlGo(2/2) AAS
お題
MY FAVORITE SONGS を、Snake, Camel, Pascal にして！
my_favorite_songs, myFavoriteSongs, MyFavoriteSongs
384: 2019/12/19(木)17:08 ID:0uPukb6z(1/2) AAS
>>346
Kotlin script
ただ馬鹿正直に抜き出して足すだけ。
println((1..1000).filter { it % 3 == 0 || it % 5 == 0 }.sum())
385: 2019/12/19(木)17:42 ID:0uPukb6z(2/2) AAS
>>383
Kotlin
外部ﾘﾝｸ:paiza.io
386: 2019/12/19(木)19:39 ID:xlnTqgd4(1) AAS
>>383 Ruby
str = 'MY FAVORITE SONGS'
puts str.tr('A-Z ', 'a-z_') # => my_favorite_songs
puts str.gsub(/ (\w)/){$1.downcase}.swapcase # => myFavoriteSongs
puts str.split.map(&:capitalize).join # => MyFavoriteSongs
387: 2019/12/19(木)20:42 ID:M6N2QgoX(1) AAS
>>351 >>362 Common Lisp
外部ﾘﾝｸ:ideone.com
30億バイトでの実行結果:
% uname -p
Intel(R) Core(TM) i7-4765T CPU @ 2.00GHz
% /usr/bin/time -p sbcl --script odai-pt16-351-362-lisp-3-hash-table.lisp </tmp/random-acgt-3-billion.txt
((#\T . 17))
real 178.75
user 177.55
sys 1.17
省3
388: 2019/12/19(木)21:46 ID:XnN+NvoA(1) AAS
>>383
R
外部ﾘﾝｸ:ideone.com
389(1): 2019/12/19(木)22:59 ID:L7o4TfDh(1) AAS
>>371
f(m,n)≧2mn+m+n+1
が示せました
(2,2)の条件で13枚移動できます
390: 383 2019/12/20(金)14:24 ID:A+TGdcd9(1) AAS
>>383
Ruby で、
ary = "MY FAVORITE SONGS".split.map( &:downcase ) # すべて小文字へ
puts ary.join( "_" ) #=> my_favorite_songs
puts ary.map( &:capitalize ).join #=> MyFavoriteSongs
puts ary.map.with_index { |word, idx|
if idx == 0
word # 最初だけ、そのまま
else
word.capitalize
省2
391: 2019/12/20(金)17:55 ID:KHh/7LOP(1) AAS
>>346 julia
println(sum(Set([3:3:1000; 5:5:1000])))
392(1): 2019/12/20(金)19:38 ID:KibkA5Ab(1/3) AAS
お題（>>346の改変版）
1から100万までの整数のうち、2か3か5か7か11か13か17か19の倍数の合計を
求める処理を3000回繰り返してから、結果を表示せよ。ただし、ideoneの
実行制限時間（5秒）以内に完了すること。
393(4): 2019/12/20(金)20:40 ID:l1czkVGZ(1) AAS
>>392 C++
外部ﾘﾝｸ:ideone.com
394: 2019/12/20(金)21:09 ID:ZH5ZbPnE(1/10) AAS
今アップしようと思ったら
>>393とそっくりだった
395: 2019/12/20(金)21:22 ID:ZH5ZbPnE(2/10) AAS
素数の数をカウントする代わりに
マイナスを付けて素数を掛け算してるのが違うくらい
396: 2019/12/20(金)21:28 ID:ZH5ZbPnE(3/10) AAS
お題
3000回じゃなくてもっとマシな出し方なかったのかね？
最適化で1回の結果を使い回されて何回やっても時間同じになっちゃってたよ
3000回数分合計して、最後に3000で割ってたんだけど
最適化が頭良すぎた
397(1): 2019/12/20(金)21:49 ID:qHTdS2+z(1/2) AAS
やったー僕が考えた効率良いプログラムだと5秒以内で3000回も計算できたぞ！
そうだこれをお題にしてやろう！
上下前次1-新書関写板覧索設栞歴
あと 605 ﾚｽあります
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ
ぬこの手 ぬこTOP 0.214s*