プログラミングのお題スレ Part16at TECHプログラミングのお題スレ Part16 - 暇つぶし2ch■コピペモード□スレを通常表示□オプションモード□このｽﾚｯﾄﾞのURL■項目テキスト350:デフォルトの名無しさん 19/12/17 19:34:15.94 JvBVW/sd.net >>317 C++ 数値のままやってみた https://ideone.com/iUEQFI 351:デフォルトの名無しさん 19/12/17 20:02:20.13 bKU/e1zO.net >>341 Ruby p 'acgtaattgaaagggtctt'.gsub(/[^a]+/,' ').split.uniq.sort_by{|s| s.size}.last.size 352:デフォルトの名無しさん 19/12/17 21:06:34.08 eGUcswGM.net お題 1～1,000 の整数の内、3 か5 の倍数だけを選んで、その合計を求めよ 353:デフォルトの名無しさん 19/12/17 21:42:29.19 p+XnOFki.net >>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 354:デフォルトの名無しさん 19/12/17 21:42:34.96 Q1C16S4i.net >>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 次ページ最新レス表示レスジャンプ類似スレ一覧スレッドの検索話題のニュースおまかせリストオプションしおりを挟むスレッドに書込スレッドの一覧暇つぶし2ch