プログラミングのお題スレ Part22 (425ﾚｽ)
上下前次1-新
1(3): 2023/08/03(木)13:52 ID:/xW45k0z(1) AAS
プログラミングのお題スレです。
【出題と回答例】
1 名前：デフォルトの名無しさん
お題：お題本文
2 名前：デフォルトの名無しさん
>>1 使用言語
回答本文
結果がある場合はそれも
【ソースコードが長くなったら】 (オンラインでコードを実行できる)
外部ﾘﾝｸ:ideone.com
省11
406: 08/21(水)11:05 ID:kc5yLFga(1) AAS
>>404
徹夜はどうしますか？
407(1): 警備員[Lv.12] 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] 08/22(木)08:04 ID:dwyU9o+h(2/2) AAS
>>407 をちょっと改良
今年に限定しないやりかた。
$ expr $( date -d $(date +%Y)'/12/31' +%j ) - $( date +%j ) + 1
132
$
409: 08/24(土)01:28 ID:Ou5o/VfJ(1) AAS
ロケール設定なしとかジョークかよ
410: 08/24(土)07:25 ID:/cWP8Umv(1/2) AAS
こまけぇこたぁいいんだよ（AA略）
411: 08/24(土)23:36 ID:/cWP8Umv(2/2) AAS
てかこのお題で私、期間中にヨーロッパから帰国しますんでってな特殊ケースまで折り込めって方が無理に思えるけど、ロケール設定した模範解答をどぞ、
412: 08/24(土)23:58 ID:D7M8BxWI(1) AAS
せっかくだから､旧正月も考慮して
413(2): 09/01(日)04:58 ID:sYmH1KkQ(1) AAS
お題：複数の文字列が格納されている配列と配列の添字がある。標準入力からnextが入力されたら文字列を表示し添字を進め、prevが入力されたら文字列を表示して添字を戻す。添字が始点と終点に達したら始点は終点に、終点は始点に移動させる。動作は例に合うように実装せよ。
v = ["aaa","bbb","ccc"]
next
aaa
next
bbb
prev
aaa
next
bbb
省4
414: 09/01(日)08:19 ID:MmIh9kGJ(1) AAS
>>413 lua
外部ﾘﾝｸ:ideone.com
415: 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(2): 09/03(火)07:13 ID:1bP400Ev(1) AAS
お題
引数aから引数bまでの数列を返す関数がある。この関数を数列にゾロ目が含まれていた場合に空の数列を返すように実装せよ
417(1): 09/03(火)07:56 ID:Jxau6mSM(1/3) AAS
>>416 lisp
外部ﾘﾝｸ:ideone.com
418(1): 09/03(火)09:22 ID:HQsZJT0t(1/3) AAS
>>417
windowsを使ってるんですが>>417を実行するにはどのような環境を整えれば良いでしょうか?
419(1): 09/03(火)10:00 ID:VHciJKZC(1) AAS
417ではないが，clispかsbclをインストールすればいいよ．Windowsでもできるし，WSLならさらに簡単にできる
420: 09/03(火)10:17 ID:HQsZJT0t(2/3) AAS
>>419
ありがとうございます
そうするとemacsが使えるようになるのでしょうか?
それともプログラミング言語としてのlisp環境が整うだけでしょうか?
421: 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): 09/03(火)13:38 ID:Jxau6mSM(3/3) AAS
ちょっと試すだけならウェブサービスを使う手も
Common Lispを動かせるオンラインコンパイラーサイト
外部ﾘﾝｸ:rextester.com
外部ﾘﾝｸ:www.jdoodle.com
外部ﾘﾝｸ:wandbox.org
これらはideoneとは異なり "Share" とか "Save" とかをクリックしない限り保存・公開されない(はず)
423: 09/03(火)22:13 ID:HQsZJT0t(3/3) AAS
レス頂いた方、ありがとうございます
とりあえず>>422辺りで試してみます
424: 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: 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
上下前次1-新書関写板覧索設栞歴
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ
ぬこの手 ぬこTOP 0.987s*