プログラミングのお題スレ Part22 (863ﾚｽ)
上下前次1-新
抽出解除 ﾚｽ栞
ﾘﾛｰﾄﾞ規制です｡10分ほどで解除するので､他のﾌﾞﾗｳｻﾞへ避難してください｡
12: 2023/08/07(月)19:28:19.42 ID:dolrRGoi(2/2) AAS
>>11
言われてみればRustに見えるな。
Rustは趣味で学習始めたばかりでよく分からなかった。
55(1): 蟻人間 ◆T6xkBnTXz7B0 2023/08/20(日)21:28:53.42 ID:KEiNPJgB(1) AAS
お題: お風呂の準備。
容積225Lの浴槽に適温39度のお湯200Lを用意したい。
次の２つのスイッチのON/OFFを切り替えてお湯を用意するプログラムを作れ。
スイッチ1: これをONにすると浴槽に水温20度の水を分速10Lで投入する。
スイッチ2: これをONにすると浴槽の水を800ワットの電熱線で加熱する。
ただし、浴槽に容積の1/2以上の水またはお湯が入っていないときは、空焚き防止のため、加熱しないものとする。
放熱は考慮しなくてもよい。
省6
58(1): 2023/08/21(月)05:17:48.42 ID:9NybdpKD(1) AAS
>>56
200年分のデータを配列を貯め込む>>51の方法よりも
そのようなメモリ消費を必要としないイテレータを作る案は好ましい方法ですね
しかし-100や+100は今回たまたまのマジックナンバーに過ぎないですし
例えばお題が「指定した年とその後(またはそれ以前に)同じカレンダーになる年を100個求めよ」もありえます
したがって作成しておくべき汎用イテレータは指定した年から順方向に返すイテレータと逆方向に返すイテレータでしょう
それがあれば今回のお題を含めた様々なバリエーションのお題に対応できると思います
71(3): 2023/08/26(土)20:03:48.42 ID:LJcWLtrE(1) AAS
文字列Sの中に含まれる回文をすべて列挙ってどうやったらいいですかね(*_*)
aとかbみたいな一文字でも回文とみなしますです
文字列Sは1文字以上100文字以下で、半角英字であることがわかってます
とんでもない計算量になる気がするのですが、鮮やかなやりかたってないものかと…トホ(ヽ´ω`)
112: 2023/09/30(土)18:00:29.42 ID:oqu6hf3+(1) AAS
>>111 node
const swap = (text, [w1, w2]) => text.split(w1).map(v => v.replaceAll(w2, w1)).join(w2)
const swapAll = (text, rules) => rules.reduce(swap, text)
const text = '緑のカバンに500万入れて白の紙で黄色のカバン言うて書きながら赤のカバン言いながら置いてくれたら俺黒のカバン言いながら取りに行くわ'
const rules = [['赤', '緑'], ['黒', '白'], ['黄', '青']]
省4
291(1): 288 2024/02/27(火)21:45:30.42 ID:nu8aoj+0(1) AAS
>>282 c
外部ﾘﾝｸ:ideone.com
・288の移植
307: 2024/03/10(日)11:20:30.42 ID:Doj9A/yB(1) AAS
>>306
すごすぎるだろ、日本の未来を頼む
354: 2024/06/03(月)13:25:02.42 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:01.42 ID:p+D7Hh++(1) AAS
>ruby -ne 'p eval($_.gsub(":","*"))'
1:2:9
18
388: 2024/08/03(土)22:08:55.42 ID:/AInVOhB(1/2) AAS
>>386
出直し
448: 2024/11/13(水)22:22:31.42 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]
省3
466: 01/03(金)15:30:14.42 ID:aGLRGnDr(1/3) AAS
>>464 lisp
外部ﾘﾝｸ:ideone.com
504: 01/27(月)21:24:28.42 ID:LHxZVLOG(1) AAS
>>500 octave
外部ﾘﾝｸ:ideone.com
function s = f(s)
[~, ia] = unique(s);
s(ia) = [];
if 1 < length(s)
[~, ia] = unique(s, 'first');
省7
611(1): 02/15(土)00:28:45.42 ID:/PgyVRU9(1) AAS
>>606
正規表現みたい非人間的な書式はやめようぜっての
811(1): 806 08/21(木)22:19:54.42 ID:fAlkh9Aq(1) AAS
>>799 ruby
外部ﾘﾝｸ:ideone.com
・問題A時に若干端折る
上下前次1-新書関写板覧索設栞歴
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ
ぬこの手 ぬこTOP 0.040s