プログラミングのお題スレ Part22 (882ﾚｽ)
上下前次1-新
354: 2024/06/03(月)13:25 ID:21u+58W3(1) AAS
>>348
Windows のPowershell 上で、Ruby の1-liner を使う
末尾の改行を削除して、: で分割して、
文字列を数値型に変換してから、全ての要素を掛ける。
%Q で、ダブルクォーテーションをエスケープする。つまり、split(":")
echo '01:2:09' | ruby -ne 'puts $_.chomp.split(%Q[:]).map(&:to_i).inject(:*)'
18
355: 2024/06/03(月)15:28 ID:p+D7Hh++(1) AAS
>ruby -ne 'p eval($_.gsub(":","*"))'
1:2:9
18
356(3): 2024/06/07(金)06:27 ID:ZJzD8UbY(1) AAS
お題：引数sとnを取りシーザー暗号化を行う関数を作れ
sは平文、nはずらす文字数（負数可）、返り値は暗号化後の文字列
同様の関数で「Hello, World!」を暗号化し復号化せよ
357: 2024/06/07(金)09:04 ID:tQi+9x5m(1/2) AAS
#! ruby
class String
def to_c(n)
if %r|^n|=~n
n=(n.sub(%r|^n|,"").to_i+26)%26
lb=("A".."Z").to_a.join
sb=("a".."z").to_a.join
la=lb[n..25]+lb[0..n-1]
sa=sb[n..25]+sb[0..n-1]
return self.tr(lb,la).tr(sb,sa)
省10
358: 2024/06/07(金)09:04 ID:tQi+9x5m(2/2) AAS
#! ruby
class String
def to_c(n)
if %r|^n|=~n
n=(n.sub(%r|^n|,"").to_i+26)%26
lb=("A".."Z").to_a.join
sb=("a".."z").to_a.join
la=lb[n..25]+lb[0..n-1]
sa=sb[n..25]+sb[0..n-1]
return self.tr(lb,la).tr(sb,sa)
省10
359: 2024/06/07(金)21:13 ID:U/DqAKAj(1) AAS
>>356
R
外部ﾘﾝｸ:ideone.com
360: 2024/06/07(金)23:24 ID:KUK95Vnh(1) AAS
Haskell
範囲外の数値は平文字をそのまま返すこととした。
import Data.Char
cearsar n |(-26) <= n && n <= 26 = map (f n)
where
f x = chr.(+x).ord
cearsar _ = cearsar 0
sample:
ghci> cearsar 50 "Hello, World!"
"Hello, World!"
省4
361: 2024/06/07(金)23:28 ID:KMptjexu(1) AAS
TA = [ * ?\x20 .. ?\x7E ]
TS = TA.join
def caesar( s, n ) s.tr( TS, TA.rotate( n ).join ) end
s = "Hello, World!"
p caesar( s, 0 ) #=> "Hello, World!"
p caesar( s, 1 ) #=> "Ifmmp-!Xpsme\""
p caesar( s, -1 ) #=> "Gdkkn+~Vnqkc "
p caesar( s, 20240607 ) #=> "Jgnnq.\"Yqtnf#"
p caesar( caesar( s, 20240607 ), -20240607 ) #=> "Hello, World!"
p caesar( 'HAL9000', 1 ) #=> "IBM:111"
362: 9 2024/06/11(火)14:41 ID:NjINqn/m(1) AAS
>>348 Perl5
($x = '04:05:06') =~ s/:/*/g;
print eval $x;
363(3): 9 2024/06/13(木)14:34 ID:XgNTPGgf(1/3) AAS
>>349
> 「バイトが1だったら次の4バイトを読み込んで整数として出力し、」
正直、意味がわからんかった
例で見ると
1 1 0 0 0 → 1
1 128 0 0 0 → 128
ということだが
1に続く4バイトを加算して出力するって意味だったのかいな
364: 2024/06/13(木)14:48 ID:sldne70j(1) AAS
>>363
整数が4バイト型という脳内補完だった
365(2): 2024/06/13(木)14:54 ID:lNMgjwmg(1/2) AAS
>>363
出題者がエンディアンを知らなくて説明もなくリトル環境を前提にしてしまっている
エンディアンを知っている人たちは出題には書かれてないけど例よりリトル前提だと読み取ってこたえている
366(1): 2024/06/13(木)14:59 ID:fAZ1qthZ(1) AAS
>>365
リトルエンディアンはビットが逆って事じゃ無いぞ
10 00なら
00 10だぞ
367(1): 2024/06/13(木)15:00 ID:lNMgjwmg(2/2) AAS
>>366
例>>363を見てないのか？
368: 9 2024/06/13(木)17:03 ID:XgNTPGgf(2/3) AAS
>>365
ああそういうことか「4バイトを読み込んで整数」と書いてあるのはそういう意味だったのか
ならわかるかも。
オレは4バイト一個一個が整数だと捉えて、それを「4バイトを読み込んで整数」とは何のこっちゃと？になってたわ
369: 9 2024/06/13(木)17:07 ID:XgNTPGgf(3/3) AAS
すまんね68系で育ったもんですぐ連想できなんだ
370: 2024/06/14(金)21:10 ID:H7FTNa+g(1) AAS
>>367
例が間違えてるか説明が足りて無い
要は4バイトを読み込んでと説明してるが「一気に4バイト読み込む」とおかしくなる
1バイトずつ順に4バイトを読み込んでという説明なら例が腑に落ちる
371: 2024/06/14(金)21:15 ID:cNkcubsv(1) AAS
例を示しての出題だから
372: 警備員[Lv.23] 2024/06/15(土)16:15 ID:h/vMPGM+(1) AAS
>>356
Kotlin
面倒なのでASCIIコード(0x20-0x7e)でしかシフトしないやつを作った。
まあでも Kotlin は Java 同様に内部でUnicodeで扱っているので平仮名とか漢字とか全然違う言語の文字とかも比較的楽に追加できると思う。
外部ﾘﾝｸ:paiza.io
373: 2024/06/19(水)15:22 ID:xfTENZQh(1) AAS
>>348 awk
外部ﾘﾝｸ:ideone.com
374: 2024/06/20(木)17:43 ID:0f6ktMCR(1/2) AAS
お題：迷路生成を様々な言語で
例：
C
外部ﾘﾝｸ:ideone.com
375: 2024/06/20(木)20:17 ID:0f6ktMCR(2/2) AAS
外部ﾘﾝｸ:paiza.io
376: 2024/06/21(金)02:17 ID:wIxdZD1d(1/2) AAS
迷路。やっつけで汚い。乱数自前
C
外部ﾘﾝｸ:paiza.io
Rust
外部ﾘﾝｸ:paiza.io
377: 2024/06/21(金)05:01 ID:wIxdZD1d(2/2) AAS
乱数改良
C
外部ﾘﾝｸ:paiza.io
Rust
外部ﾘﾝｸ:paiza.io
378: 2024/07/26(金)09:46 ID:PcAUXe08(1) AAS
お題：配管サイズの「A呼称」「B呼称」の相互変換
外部ﾘﾝｸ[jsp]:www.keyence.co.jp
などに掲載されている「A呼称」から「B呼称」への変換。及びその逆変換。
「A呼称」は整数値で(8とか)、「B呼称」は実数(0.125とか)または分母を8とする分数の分子(1とか)で表すものとする。
規格に存在しない場合(42Aとか)は考慮しなくてもよい。
表を引くだけなら簡単過ぎるので、ツェラーの公式の様な「技巧的」な解法を求む。
379: 2024/07/27(土)06:14 ID:QMQQaL7S(1/2) AAS
REM 呼称変換.bat
chcp 65001
ruby -x "%~f0"
ruby tmp.rb
goto end
#~
#!ruby
#encoding: utf-8
Encoding.default_external='UTF-8'
require 'base64'
省16
380: 2024/07/27(土)06:15 ID:QMQQaL7S(2/2) AAS
KSBiPSN7Yn0iCiAgICBlbmQKICBlbmQKICBkZWYgYl90b19hCiAgICBuPXNl
bGYKICAgIGlmIG48MTAKICAgICAgYz0wLjEyNQogICAgICBAQGMuZWFjaHt8
ZXwgYz1lIGlmIGUvbjw9MS4wfQogICAgICBhPUBAYVtAQGMuaW5kZXgoYyld
CiAgICAgIGI9QEBiW0BAYy5pbmRleChjKV0KICAgICAgcmV0dXJuICIoYj0j
e2J9PSN7Y30pIGE9I3thfSIKICAgIGVsc2UKICAgICAgYj1uLnRvX2kKICAg
ICAgYT1iKjI1CiAgICAgIHJldHVybiAiKGI9I3tifSkgYT0je2F9IgogICAg
ZW5kCiAgZW5kCmVuZAoKd2hpbGUgMQogIGFyPVsi77yh5ZG856ew44GL44KJ
77yi5ZG856ewIiwi77yi5ZG856ew44GL44KJ77yh5ZG856ewIiwi57WC5LqG
Il0KICBtc2c9YXIubWFwLndpdGhfaW5kZXh7fGUsaXwiI3tpKzF9OiN7ZX0i
fS5qb2luKCJcbiIpKyJcbiIKICBwcmludCBtc2crImlucHV0IG51bWJlciA+
省9
381(2): 2024/07/30(火)12:03 ID:zP/xDheD(1) AAS
お題
C言語のトライグラフ(可能ならダイグラフも)と普通のテキストとの相互変換。
ファイルまたは標準入力から読んで変換した結果を標準出力に出力する。
面倒なら文字列変換する関数とそれをテストするメイン関数のみでも良い。
382(1): 警備員[Lv.8] 2024/08/03(土)07:16 ID:HS6IEZQf(1/2) AAS
お題
Unicode 文字列を UTF-9 へ変換する。また UTF-9 を Unicode 文字列に変換する。
ただし1バイトが9bitではないコンピュータを使用する場合は9bit以上で扱いやすいbit数の変数(例えば 16bitの変数)を代用して下9bitのみを使用する等しても良い。
UTF-9 の仕様は RFC 4042 を見るか、または下記URLのページを参照。
外部ﾘﾝｸ:www.wdic.org
383: 警備員[Lv.9] 2024/08/03(土)17:38 ID:HS6IEZQf(2/2) AAS
>>381
Kotlin
Digraph, Trigraph の変換と逆変換
外部ﾘﾝｸ:paiza.io
外部ﾘﾝｸ:paiza.io
Map と正規表現使った簡単な変換なので他の言語で作っても大差ないと思う。
384(2): 2024/08/03(土)20:58 ID:S2fEkJP0(1/4) AAS
お題
整数の格子がある（伝われ）
任意の2点間を線で結ぶ（座標成分は実数）
格子と交わるところで線を分割せよ
BEｱｲｺﾝ:23qe8.png
385: 2024/08/03(土)21:19 ID:VMb0ie+F(1/2) AAS
>>384
jwwの外部変形としてこんな感じで交点で分割させるの作ったことあるけどプログラミングスレののお題としては座標指定もなく漠然としすぎていていかがなものか。ちょっと伝わんなかった。
386(2): 2024/08/03(土)21:36 ID:dM8NlTKR(1) AAS
ごめん、画像から察してほしい
遊びだから曖昧なところは適当で
画像ﾘﾝｸ[png]:i.imgur.com
387: 2024/08/03(土)21:50 ID:VMb0ie+F(2/2) AAS
>>386
二直線の交点は連立方程式を解けば良くて行列を使えば簡単だけど、どういう回答が求められてるのかが分からず途方に暮れております
388: 2024/08/03(土)22:08 ID:/AInVOhB(1/2) AAS
>>386
出直し
389: 2024/08/03(土)22:28 ID:Dl6/uvrz(1/3) AAS
クイズと「プログラミングのお題」との決定的な違い
検証するための入力(問題)と出力(解答)例が明記されているかどうか
390(1): 2024/08/03(土)22:29 ID:S2fEkJP0(2/4) AAS
テンプレに書いてなかったしいいやって思っちゃった
ここまで伝わらんもんなのか…
391: 2024/08/03(土)22:35 ID:S2fEkJP0(3/4) AAS
具体例を計算するのはめんどくさいけど、例えばさっきの絵で言えば右上が始点で左下が終点なら始点側から順番に座標を出力するとかね
392: 2024/08/03(土)22:41 ID:Dl6/uvrz(2/3) AAS
入力例とその時の出力例を
データとして数種類用意すればOK
例えば>>234とか>>343を参考
393: 2024/08/03(土)22:42 ID:t4RpIT1N(1) AAS
>>390
そういうことは伝える努力をしてから言おうな
394(1): 2024/08/03(土)22:44 ID:S2fEkJP0(4/4) AAS
めんどくさい
そこまでして出そうと思わんから興味ないならスルーで
395: 2024/08/03(土)22:52 ID:/AInVOhB(2/2) AAS
この頭の悪さを見るに学校の課題か何かを丸投げしようとしてるのかな
396: 2024/08/03(土)23:04 ID:Dl6/uvrz(3/3) AAS
入出力例があると仕様が定まってプログラミングのお題が成立する
入出力例がないと宿題を手伝わせようとしているだけの可能性も否定できないね
397: 2024/08/04(日)00:49 ID:iskScWib(1) AAS
>>394
ドンマイ、出題の意図は分かった気がするので改めて出題
お題
１０mm方眼用紙、左下原点、入力された任意の直線と方眼線との交点を求めよ
（例）始点（3.5,5.2）終点（6.3,8.1）
398: 2024/08/04(日)04:51 ID:9TVMMXOl(1) AAS
>>384
nodejs
外部ﾘﾝｸ:www.mycompiler.io
399(1): 2024/08/09(金)23:38 ID:PnKZlDGe(1) AAS
お題：与えられた線分を指定された長さLで分割せよ。ただし最後に余る分は長さLでなくてもよい。
線分([始点,終点])=[[0,0],[100,100]]
L=50
↓
[[[0,0],[50,50]],[[50,50],[100,100]]]
400: 警備員[Lv.7] 2024/08/10(土)04:24 ID:C1sXjWXk(1) AAS
>>399
その例おかしくない？それか問題がおかしいか。
長さがLということはx=yの線を分割する場合は座標はx, y 共にL/√2倍にならないか?
401: 2024/08/10(土)08:05 ID:cX2Nc5cZ(1/2) AAS
ごめん、ミスった
402: 2024/08/10(土)08:07 ID:cX2Nc5cZ(2/2) AAS
修正
線分([始点,終点])=[[0,0],[120,0]]
L=50
↓
[[[0,0],[50,0]],[[50,0],[100,0]],[[100,0],[120,0]]]
403: 2024/08/10(土)08:54 ID:DYGkQoQe(1) AAS
REM 座標計算.bat
chcp 65001
ruby -x "%~f0"
goto end
#~
#!ruby
#encoding: utf-8
Encoding.default_external='UTF-8'
require "matrix"
while 1
省20
404(3): 2024/08/20(火)15:28 ID:YrWgN0+y(1) AAS
お題:今日、または任意の日付から、もういくつ寝るとお正月かを求めよ。（昼寝は除く）
405: 2024/08/20(火)18:03 ID:UEEknM+z(1) AAS
>>404 lisp
外部ﾘﾝｸ:ideone.com
406: 2024/08/21(水)11:05 ID:kc5yLFga(1) AAS
>>404
徹夜はどうしますか？
407(1): 警備員[Lv.12] 2024/08/22(木)08:01 ID:dwyU9o+h(1/2) AAS
>>404
bash のコマンドラインから expr コマンドと date コマンドを利用して次のようにして計算した。
実際に日数が経過後に1月1日になっているかの確認もした。
$ expr $( date -d '2024/12/31' +%j ) - $( date +%j ) + 1
132
$ date -d 'now +132 days'
2025年 1月 1日 水曜日 07:58:54 JST
$
408: 警備員[Lv.12] 2024/08/22(木)08:04 ID:dwyU9o+h(2/2) AAS
>>407 をちょっと改良
今年に限定しないやりかた。
$ expr $( date -d $(date +%Y)'/12/31' +%j ) - $( date +%j ) + 1
132
$
409: 2024/08/24(土)01:28 ID:Ou5o/VfJ(1) AAS
ロケール設定なしとかジョークかよ
410: 2024/08/24(土)07:25 ID:/cWP8Umv(1/2) AAS
こまけぇこたぁいいんだよ（AA略）
411: 2024/08/24(土)23:36 ID:/cWP8Umv(2/2) AAS
てかこのお題で私、期間中にヨーロッパから帰国しますんでってな特殊ケースまで折り込めって方が無理に思えるけど、ロケール設定した模範解答をどぞ、
412: 2024/08/24(土)23:58 ID:D7M8BxWI(1) AAS
せっかくだから､旧正月も考慮して
413(2): 2024/09/01(日)04:58 ID:sYmH1KkQ(1) AAS
お題：複数の文字列が格納されている配列と配列の添字がある。標準入力からnextが入力されたら文字列を表示し添字を進め、prevが入力されたら文字列を表示して添字を戻す。添字が始点と終点に達したら始点は終点に、終点は始点に移動させる。動作は例に合うように実装せよ。
v = ["aaa","bbb","ccc"]
next
aaa
next
bbb
prev
aaa
next
bbb
省4
414: 2024/09/01(日)08:19 ID:MmIh9kGJ(1) AAS
>>413 lua
外部ﾘﾝｸ:ideone.com
415: 2024/09/01(日)11:51 ID:Zfu0bsG/(1) AAS
>>413
REM nextprev.bat
ruby -x "%~f0"
exit
#~
#!ruby
#encoding: utf-8
i=0;v=["aaa","bbb","ccc"]
while 1
puts v[i]
省11
416(4): 2024/09/03(火)07:13 ID:1bP400Ev(1) AAS
お題
引数aから引数bまでの数列を返す関数がある。この関数を数列にゾロ目が含まれていた場合に空の数列を返すように実装せよ
417(1): 2024/09/03(火)07:56 ID:Jxau6mSM(1/3) AAS
>>416 lisp
外部ﾘﾝｸ:ideone.com
418(1): 2024/09/03(火)09:22 ID:HQsZJT0t(1/3) AAS
>>417
windowsを使ってるんですが>>417を実行するにはどのような環境を整えれば良いでしょうか?
419(1): 2024/09/03(火)10:00 ID:VHciJKZC(1) AAS
417ではないが，clispかsbclをインストールすればいいよ．Windowsでもできるし，WSLならさらに簡単にできる
420: 2024/09/03(火)10:17 ID:HQsZJT0t(2/3) AAS
>>419
ありがとうございます
そうするとemacsが使えるようになるのでしょうか?
それともプログラミング言語としてのlisp環境が整うだけでしょうか?
421: 2024/09/03(火)13:27 ID:Jxau6mSM(2/3) AAS
>>418
Windowsは不断使いしていないんで開発環境とかemacsとかはわからないけど、動かすだけなら
外部ﾘﾝｸ[html]:www.sbcl.org からWindows版のSBCLインストーラーを落としてインストール
コマンドプロンプトなどのコマンド行で
sbcl --script ファイル名 とすると「ファイル名」のファイルをスクリプトとして実行します
--script を付けない場合REPLが起動します(Pythonでいうところの対話モード)
これの終了は (quit) と入力してEnterキー
422(1): 2024/09/03(火)13:38 ID:Jxau6mSM(3/3) AAS
ちょっと試すだけならウェブサービスを使う手も
Common Lispを動かせるオンラインコンパイラーサイト
外部ﾘﾝｸ:rextester.com
外部ﾘﾝｸ:www.jdoodle.com
外部ﾘﾝｸ:wandbox.org
これらはideoneとは異なり "Share" とか "Save" とかをクリックしない限り保存・公開されない(はず)
423: 2024/09/03(火)22:13 ID:HQsZJT0t(3/3) AAS
レス頂いた方、ありがとうございます
とりあえず>>422辺りで試してみます
424: 2024/09/04(水)03:34 ID:k+9kMn3u(1) AAS
REM zorome.bat
ruby -x "%~f0"
exit
#~
#!ruby
while 1
print "input a > "
a=$stdin.gets.chomp
exit if a==""
a=a.to_i
省18
425: 2024/09/04(水)06:34 ID:FQ5fjJ2m(1) AAS
>>416
fn is_zorome(n: i32) -> bool {
let s = n.abs().to_string();
let b = s.as_bytes();
if b.len() > 1 {
b[1..].iter().all(|&d| d == b[0])
} else {
false
}
}
省11
426: 警備員[Lv.7] 2024/09/29(日)14:12 ID:Sdg7KlJR(1) AAS
>>416
Kotlin
(URL投稿禁止になってるようなので先頭の https:／／ は抜きで)。
paiza.io/projects/nPK7U1uDtt4b7O2saECP0A
[入力]タブの方で開始、終了の値を入れている。とりあえず 10 40 を入れてある。
一桁の数を指定した場合は全てゾロ目扱いになるので出力は空のリストになる。
427(3): 2024/10/08(火)17:17 ID:CS1PHEoT(1) AAS
お題：文字列を中央寄せする関数を作れ。
関数は文字列、全体の横幅（整数）、余白を埋める文字、を引数に取る。横幅分の文字列を引数の文字で作成し、その中央に引数の文字列を埋め込み戻り値として返せ。
428: 2024/10/08(火)19:52 ID:Rq2an05y(1) AAS
py
text.center
429(1): 警備員[Lv.12] 2024/10/09(水)00:07 ID:O5zCFPJO(1) AAS
>>427
文字幅についてはどう考えれば良い？
エンコーディングが UTF-8 や UTF-16 だとバイト数や要素数が画面の表示幅と一致しないわけだが。
一致するような Shift-JIS だったとしても端末のフォント設定次第で表示幅が変わる。
430: 2024/10/09(水)00:38 ID:j8RLE5Fj(1) AAS
EUCにも半角2バイト文字なんてあったりする
431: 2024/10/09(水)00:56 ID:LtADXZKH(1) AAS
asciiの前提では
全角判定関数は切り分けるべきだし
432: 2024/10/09(水)01:18 ID:4B3K5XUV(1/3) AAS
#ドラクエ３が超好きだったので、お題にしてみる。ただしロト３のファミコン版のドラクエな！ｗ
"こちらの職業は勇者、戦士、空手家、僧侶、柔道家の５人がかりｗ
勇者から柔道家までの5人の攻撃回数が異なります。"まずは変数と確率の問題。
勇者＝you戦士＝sen,空手家＝kara,僧侶=sou
まず勇者は1~２回攻撃、戦士は1~３回攻撃、空手は2~３回攻撃、柔道は足払いで相手を２０％で麻痺させることができる。（１ターン何もできない）１０％では超麻痺。（２ターン何も敵は動かない）
５％でクリティカルヒットの足払いで３ターン敵は何もできない。
柔道は敵に攻撃を加えられない分、足払いで相手を痙攣させる。
（勇者の１回分の攻撃は100〜200、２０％の確率でクリティカルヒットの攻撃になることがある。
（戦士の攻撃は２００〜３００、２０％の確率で攻撃がクリティカルヒット１回になることがある。
（空手家）空手家の攻撃は３５０〜５００、ただし２０％の確率で攻撃がクリティカルヒットとなるときがある。youはぞろ目（１１１とか２２２とか９９９まで）の場合はロトの剣を取得する。
省14
433: 2024/10/09(水)01:22 ID:YvVjSPhZ(1/2) AAS
プログラミングする以前に読むのが面倒くさい
434: 2024/10/09(水)01:43 ID:4B3K5XUV(2/3) AAS
しまった。初期化してなかったなｗ変数のところ。
あとsouの回復もホイミ、ベホイミ、ベホマラーの３種類だけ。
その３種類がぞろ目の時（１１１，２２２など）
そしたらベホマズンを使える。ほぼ運ゲーですｗ
人修羅みたいに取り巻きがいます。それはバラモスエビルと神龍です。
ある一定時期を過ぎると取り巻きが一斉にHPを連続してあげまくるので
取り巻き先に倒さないと厳しいです。取り巻き＝tori種類１の取り巻き＝tori0
種類２の取り巻き＝tori1 5人だとなかなか倒せないから６人目の魔法剣士＝maken
だれか
これをいれよう。
省15
435(3): 2024/10/09(水)01:45 ID:YvVjSPhZ(2/2) AAS
頑張って読んだけどこのままでは多分スレチ、ずっと条件を簡単にして出題し直してみる。
お題
勇者（HP1000）対魔王（HP5000）、先鋒勇者、サイコロ（目は１から６）を振って出た目だけ相手にダメージを与えられ、交互に攻撃しHP0となったら負け。魔王のサイコロは１個だけど勇者のサイコロはN個（N=1～10）の時の勇者の勝率を求めよ。
436: 2024/10/09(水)02:10 ID:4B3K5XUV(3/3) AAS
# RPGの攻撃状況を再現
# モンスターと戦っている。
# 1から10のサイコロをふって、
# 6未満の場合、サイコロの目だけダメージを与えたと表示。
# 6以上の場合、クリティカルヒットとして、100のダメージを与えたと表示。
# 0の場合、防御されたとして、０ダメージを表示。
import random
hit = random.randint(0,10)
if 1 <= hit < 6:
print("スライムに、" + str(hit) + "のダメージを与えた！")
省5
437: 2024/10/09(水)18:59 ID:Vd16zyId(1) AAS
>>429
asciiで。
438(10): 2024/10/11(金)05:53 ID:EzY86rdr(1/2) AAS
お題：文字列の中で1つ以上連続している空白をすべて空白4つに置換せよ。ただし正規表現は使ってはならない。
例：
"abc def ghi" -> "abc def ghi"
439: 438 2024/10/11(金)05:54 ID:EzY86rdr(2/2) AAS
5chは空白を1つに置換するらしく例は出せない。脳内保管せよ。
440(1): 2024/10/11(金)20:53 ID:BlO5cFoG(1/2) AAS
>>438
perl -lpE'$_=join$"x4,split$"'
(文字列を入れる)
441: 2024/10/11(金)20:58 ID:BlO5cFoG(2/2) AAS
>>440
splitのあとの$"は不要だった。
どちらにしてもタブも置換してまうのでアウトかも。
442: 2024/10/11(金)22:15 ID:H5F5jhxE(1) AAS
>>438
R
外部ﾘﾝｸ:ideone.com
443(1): 2024/10/12(土)01:34 ID:OB4ycmPb(1/3) AAS
>>435
こういう場合の確率の計算はよく分からなかったので実際にそれぞれ一万回ずつ戦わせてみた。
サイコロ1個で100000戦0勝
サイコロ2個で100000戦0勝
サイコロ3個で100000戦0勝
サイコロ4個で100000戦0勝
サイコロ5個で100000戦47171勝
サイコロ6個で100000戦100000勝
サイコロ7個で100000戦100000勝
サイコロ8個で100000戦100000勝
省2
444(1): 2024/10/12(土)01:39 ID:OB4ycmPb(2/3) AAS
>>443
#!ruby
#encoding: utf-8
$stdout=open("kekka.txt","w")
i=100000 #対戦回数
k=0 #勇者の勝ち
n=1 #勇者のサイコロの数
hpm=5000 #魔王のＨＰ
hpy=1000 #勇者のＨＰ
445: 2024/10/12(土)01:39 ID:OB4ycmPb(3/3) AAS
>>444
while n<=10
j,t=0,0
while j<i
hpy-=rand(1..6)
if hpy<=0
j+=1
t,hpy,hpm=0,1000,5000
next
end
省17
446: 警備員[Lv.12] 2024/11/05(火)05:27 ID:srt1vo+S(1) AAS
>>427
Kotlin
スペースが何個なのか分り易くするために '*' をスペースの代わりに入れて呼び出している。
外部ﾘﾝｸ:paiza.io
447: 2024/11/13(水)22:01 ID:nRkxNwtG(1/2) AAS
>>435
R
f=\(N){
u=1000
m=5000
while(u>0 & m>0){
m=m-sum(sample(6,N,replace=TRUE))
u=u-sample(6,1)
}
u>m
省16
448: 2024/11/13(水)22:22 ID:nRkxNwtG(2/2) AAS
>>435
Wolfram
f[N_] :=(
u=1000;
m=5000;
Until[u<=0 || m<=0, m-=Total@RandomChoice[Range[6],N];u-=Total@RandomChoice[Range[6],1]];
Boole[u >= m]
)
Table[Mean@Table[f[x],10^3],{x,1,10}] // N
{0., 0., 0., 0., 0.511, 1., 1., 1., 1., 1.}
449(3): 2024/12/31(火)22:33 ID:5KitXLte(1) AAS
ベクターにあるこれを解いてくれ
昔2ch、5chスレでやってたができず
いまだと4x4はパワーで行けるとおもうが
4x4盤タイルゲーム for Windows
対戦するたびに学習して次第に強くなる「最善手探索+対戦学習型知能ゲーム」
450: 2025/01/01(水)12:58 ID:emEmRiID(1) AAS
他力本願か？
451: 2025/01/01(水)13:30 ID:WMbw73Fu(1) AAS
出題の仕方でプログラミング能力の無さがわかる
452: 2025/01/01(水)13:32 ID:ZpviU2f/(1/7) AAS
>>438
Java
外部ﾘﾝｸ:paiza.io
453: 2025/01/01(水)13:54 ID:ZpviU2f/(2/7) AAS
>>427
Java
外部ﾘﾝｸ:paiza.io
上下前次1-新書関写板覧索設栞歴
あと 429 ﾚｽあります
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ
ぬこの手 ぬこTOP 0.031s