[過去ﾛｸﾞ]
プログラミングのお題スレ Part9 [無断転載禁止]©2ch.net (1002ﾚｽ)
プログラミングのお題スレ Part9 [無断転載禁止]©2ch.net http://mevius.5ch.net/test/read.cgi/tech/1480579110/
上
下
前次
1-
新
通常表示
512ﾊﾞｲﾄ分割
ﾚｽ栞
抽出解除
ﾚｽ栞
このｽﾚｯﾄﾞは過去ﾛｸﾞ倉庫に格納されています｡
次ｽﾚ検索
歴削→次ｽﾚ
栞削→次ｽﾚ
過去ﾛｸﾞﾒﾆｭｰ
227: デフォルトの名無しさん [] 2017/05/24(水) 21:48:00.75 ID:7oyfe1wq お題：以下を出力 857142 714285 571428 428571 285714 142857 http://mevius.5ch.net/test/read.cgi/tech/1480579110/227
228: デフォルトの名無しさん [sage] 2017/05/24(水) 22:07:09.20 ID:L9mU+g8W >>227 とりあえずPythonでやってみた https://ideone.com/UCpMVm http://mevius.5ch.net/test/read.cgi/tech/1480579110/228
229: デフォルトの名無しさん [sage] 2017/05/24(水) 22:19:15.30 ID:lEJcnLZT >>227 法則性がわからん 文字列じゃなくあくまで数値で？ http://mevius.5ch.net/test/read.cgi/tech/1480579110/229
231: デフォルトの名無しさん [sage] 2017/05/24(水) 23:33:01.85 ID:0ssPtL9D >>227 C http://ideone.com/eRLqLi http://mevius.5ch.net/test/read.cgi/tech/1480579110/231
233: デフォルトの名無しさん [sage] 2017/05/24(水) 23:51:10.59 ID:99+UTRWu >>227 Ruby 6.downto(1){|i|p i*1000000/7} http://mevius.5ch.net/test/read.cgi/tech/1480579110/233
234: デフォルトの名無しさん [sage] 2017/05/25(木) 01:00:30.19 ID:vvyNjvHe >>227 Perl use 5.016; use integer; say 857142 / $_ for 1..6; http://mevius.5ch.net/test/read.cgi/tech/1480579110/234
236: デフォルトの名無しさん [sage] 2017/05/25(木) 13:01:14.56 ID:+8TeyhTL >>227 Squeak/Pharo Smalltalk (142857 * (6 to: 1 by: -1)) asStringWithCr => '857142 714285 571428 428571 285714 142857' http://mevius.5ch.net/test/read.cgi/tech/1480579110/236
237: デフォルトの名無しさん [sage] 2017/05/25(木) 13:21:29.71 ID:+8TeyhTL >>227 GNU Smalltalk 6 to: 1 by: -1 do: [:i | (142857 * i) displayNl] http://ideone.com/yNgDeB http://mevius.5ch.net/test/read.cgi/tech/1480579110/237
238: デフォルトの名無しさん [sage] 2017/05/25(木) 18:49:32.83 ID:F0MQej0l >>227 common lisp (do ((i 6 (- i 1))) ((equal i 0)) (print (floor (/ (* 1000000 i) 7)))) http://mevius.5ch.net/test/read.cgi/tech/1480579110/238
240: デフォルトの名無しさん [sage] 2017/05/25(木) 21:35:24.87 ID:Z+pf95Ly >>227 @Mathematica In[1]:=142857// IntegerDigits// NestList[RotateLeft,#,Length[#]-1]&// Map[FromDigits,#]&// Sort// Reverse// Map[{#}&,#]&// Grid Out[1] = 857142 714285 571428 428571 285714 142857 http://mevius.5ch.net/test/read.cgi/tech/1480579110/240
241: デフォルトの名無しさん [] 2017/05/25(木) 21:56:10.72 ID:ShXkIc2G >>227 Io a := 999999 / 7 for(i, 6 * a, a, -a, i println) http://mevius.5ch.net/test/read.cgi/tech/1480579110/241
242: デフォルトの名無しさん [sage] 2017/05/25(木) 22:10:21.35 ID:73MQsPzv >>227 Nim for i in countdown(6,1): stdout.writeline i*142857 http://mevius.5ch.net/test/read.cgi/tech/1480579110/242
243: デフォルトの名無しさん [sage] 2017/05/25(木) 23:50:37.58 ID:SwCyV6dp >>227 ruby puts (1..6).map {|i| i * 142857}.reverse >>227 rust fn main() { //println!("{}", (1..7).rev().map(|i| (142857 * i).to_string()).collect::<Vec<_>>().join("\n")); for i in (1..7).rev() {println!("{}", 142857 * i)} } http://mevius.5ch.net/test/read.cgi/tech/1480579110/243
245: デフォルトの名無しさん [sage] 2017/05/28(日) 14:54:52.19 ID:/dM5Kslk >>227 SWI-Prolog main(N, X) :- X1 is X * N, write(X1), nl, N > 1, N1 is N - 1, main(N1, X). :- main(6, 142857). http://mevius.5ch.net/test/read.cgi/tech/1480579110/245
ﾒﾓ帳
(0/65535文字)
上
下
前次
1-
新
書
関
写
板
覧
索
設
栞
歴
ｽﾚ情報
赤ﾚｽ抽出
画像ﾚｽ抽出
歴の未読ｽﾚ
AAｻﾑﾈｲﾙ
Google検索
Wikipedia
ぬこの手
ぬこTOP
1.455s*