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

---

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

---

42: 39 2021/07/01(木)19:49:58.87 ID:rhoqKmqn(2/2) AAS
>>36 Ruby
str = '2021 7 0'
y, m, s = str.scan( /\d+/ ).map( &:to_i )
( '日月火水木金土'.chars.rotate(s) + [' '] * (( Time.new( y, m, 1 ).wday - s ) % 7) + (1 .. [31, 30, 29, 28].find{|d| Time.new( y, m, d ).month == m }).to_a.map{|d| '%2d' % d } ).flatten.each_slice(7){|w| puts w * ' ' }

---

410: 2021/11/08(月)23:49:02.87 ID:sIrE8Ymr(3/3) AAS
どういたしまして。
じゃあ、振り込み宜しく

---

618: アリ人間 ◆T6xkBnTXz7B0 2022/07/26(火)22:36:21.87 ID:SFGiBpCo(1) AAS
>>615
派生お題: 文字列処理を使わずに与えられた整数を回文にせよ。

---

636: 96 2022/08/06(土)01:06:37.87 ID:pYJx8bVL(2/3) AAS
>>635
これ各行の行末の改行まで含めてreverseしてsortキーとするので、
もし入力ファイルの最後の行に改行が欠けていて無かったらsort結果がおかしくなる。
そのような万が一の場合に対してもrubstさも持たすならこうか

chomp(@a = <>);
print "$$_[0]\n" for sort{$$a[1] cmp $$b[1]} map{[$_, scalar reverse]} @a;

---

654: 2022/08/07(日)20:58:47.87 ID:xO94aiKw(3/3) AAS
>>648
perl5 # sub squash0 を>653 で書き替えた
外部ﾘﾝｸ:paiza.io

---

958: 2022/11/09(水)01:55:16.87 ID:QvIAsso6(1) AAS
なぜ同じ書き込みが４つもある？

---

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

---

ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ

---

ぬこの手 ぬこTOP 0.225s*