[表示 : 全て 最新50 1-99 101- 201- 301- 401- 501- 601- 2chのread.cgiへ]
Update time : 05/09 20:03 / Filesize : 140 KB / Number-of Response : 601
[このスレッドの書き込みを削除する]
[+板 最近立ったスレ&熱いスレ一覧 : +板 最近立ったスレ/記者別一覧] [類似スレッド一覧]


↑キャッシュ検索、類似スレ動作を修正しました、ご迷惑をお掛けしました

七行プログラミング part5



1 名前:デフォルトの名無しさん mailto:sage [2006/03/16(木) 09:02:39 ]
7行×79文字なら言語は問いません。
過去作品は、もしかしたら>>2-20あたりに。

前スレ
pc8.2ch.net/test/read.cgi/tech/1051703369/
part 3
pc2.2ch.net/tech/kako/1033/10331/1033143528.html
part 2
pc3.2ch.net/tech/kako/1018/10188/1018840143.html
part 1
pc.2ch.net/tech/kako/984/984182993.html


500 名前:デフォルトの名無しさん mailto:sage [2007/07/11(水) 00:07:15 ]
総和テーブルでいいじゃんか

501 名前:デフォルトの名無しさん mailto:sage [2007/07/11(水) 08:57:14 ]
そうわ思わないな

502 名前:デフォルトの名無しさん mailto:sage [2007/07/12(木) 02:21:33 ]
CPU対戦の七行すごろくを考えてみたんだが、
動作確認テストをやっている最中に虚しくなってやめた。

ゲームって難しいなぁ。


503 名前:デフォルトの名無しさん mailto:sage [2007/07/13(金) 00:56:21 ]
>>1 を見てたんだけど、
part4って297レスしかつかなかったの?


504 名前:デフォルトの名無しさん mailto:sage [2007/07/13(金) 00:58:33 ]
>>40にあった。ごめん。


505 名前:デフォルトの名無しさん mailto:sage [2007/07/15(日) 13:11:08 ]
自動生成の迷路ゲーム…なんて無理か。

506 名前:デフォルトの名無しさん mailto:sage [2007/07/15(日) 19:06:02 ]
迷路を作るだけなら前あったかも

507 名前:デフォルトの名無しさん mailto:sage [2007/07/15(日) 22:41:39 ]
Javaの3Dな迷路があったと思ふ

508 名前:6 mailto:sage [2007/07/16(月) 01:29:02 ]
交点の座標を詳しく求めてる

俺工房だから間違えてるのかもしれない



509 名前:デフォルトの名無しさん mailto:sage [2007/07/16(月) 01:58:27 ]
#include <stdio.h>
double s(double c){double x;int i,n;n = 10;x = 0;do {x += 1;} while (x * x < c);
for (i = 0;i < n;i++) {x = (x + c / x)/2;}return x;}int main(){double c;int a;
scanf("%d", &a);c = s(a);printf("√は%lfです。\n", c);return 0;}



ニュートン法を使ったあれです。
いじくってやってください。

510 名前:デフォルトの名無しさん mailto:sage [2007/07/16(月) 21:05:29 ]
1.空白はつめる
2.初期化と代入は一緒に
3.+=1は++に
でだいぶ短くなる予感。
ニュートン法とやらがあってるんかは知らんけどw

511 名前:デフォルトの名無しさん mailto:sage [2007/07/16(月) 21:27:20 ]
int printf(const char*,...);int scanf(const char*,...);main(){int c,n=10;double
x=0;scanf("%d",&c);do x++;while(x*x<c);while(--n)x=(x+c/x)/2;printf("sqrt(%d)=\
%f\n",c,x);return 0;}

512 名前:デフォルトの名無しさん mailto:sage [2007/07/16(月) 23:12:42 ]
typedef int f(const char*,...);f printf,scanf;double c,x,n=10;main(){for(scan\
f("%lf",&c);x*x<c;)++x;for(;n--;x/=2)x+=c/x;return!printf("√は%fです。\n",x);}

513 名前:デフォルトの名無しさん mailto:sage [2007/07/22(日) 20:17:55 ]
>++++++++++[>+>+++>++++++++++++[<]>-]> > >++++........<<+++.---.> >..<++..
..>...<<+++.---.> >..<....>...<..................>..<.............>...<.................>..<<+++.---.>
>.......<...>..<..>..<..>.....<..................>..<............>.....<..>..<..>..<<+++.---.> >..<..
..>..<..>....<...>..<...>..<...>..<.>..<.>....<..>......<.>..<...>..<.>..<...>..<.>..<.>..<<++
+.---.> >..<.....>..<.>..<......>......<...>..<.>...<...>..<...>..<...>..<...>..<.>..<......>...<<
+++.---.> >..<....>...<.>..<.....>..<...>..<...>..<.>..<....>..<...>..<...>..<...>..<.>..<...>..
<.>..<.>..<<+++.---.> >........<..>..<......>....<.>...<.>..<.>..<....>..<...>..<....>.....<...>.....<..>..<...>..

514 名前:デフォルトの名無しさん mailto:sage [2007/07/30(月) 13:01:28 ]
>>513
なんのプログラム?

515 名前:デフォルトの名無しさん mailto:sage [2007/07/30(月) 13:02:57 ]
標準出力にBrainfuckと読める絵を出力するプログラム。

516 名前:デフォルトの名無しさん mailto:sage [2007/07/30(月) 13:03:45 ]
>>515
言語は何なのかおせーて

517 名前:デフォルトの名無しさん mailto:sage [2007/07/30(月) 13:04:23 ]
Brainfuck

518 名前:デフォルトの名無しさん mailto:sage [2007/07/30(月) 13:08:58 ]
なにこれおもすれw

+++++++++[>++++++++>+++++++++++>+++++<<<-]>.>++.+++++++..+++.>-.
------------.<++++++++.--------.+++.------.--------.>+.



519 名前:デフォルトの名無しさん mailto:sage [2007/07/30(月) 21:50:24 ]
ローマ字をSJIS半角カタカナに変換する、そんな関数があると聞き
やってまいりました。
ヘボン式訓令式どちらもサポートすると
おそらく300バイト程度の関数になるでしょうか?

520 名前:デフォルトの名無しさん mailto:sage [2007/07/30(月) 22:40:25 BE:360093863-S★(511223)]
「aiueo」のローマ字半角カナ変換して表示。
●ローマ字半角カナ変換(Sの|Sを)
 A=(「shi|chi|tsu|fu|wi|wu|we|ji|kya|kyu|kyo|sya|syu|syo|tya|tyu|tyo|nya|nyu|nyo|hya|hyu|hyo|mya|myu|myo|rya|ryu|
ryo|gya|gyu|gyo|zya|zyu|zyo|bya|byu|byo|pya|pyu|pyo|sha|shu|sho|cha|chu|cho|ja|ju|jo|ka|ki|ku|ke|ko|sa|si|su|se|so|
ta|ti|tu|te|to|na|ni|nu|ne|no|ha|hi|hu|he|ho|ma|mi|mu|me|mo|ya|yu|yo|ra|ri|ru|re|ro|wa|wo|ga|gi|gu|ge|go|za|zi|zu|ze|
zo|da|di|du|de|do|ba|bi|bu|be|bo|pa|pi|pu|pe|po|nn|n|a|i|u|e|o」の改行を空に置換)を"|"で区切る。
 B=(「シ|チ|ツ|フ|ウィ|ウ|ウェ|ジ|キャ|キュ|キョ|シャ|シュ|ショ|チャ|チュ|チョ|ニャ|ニュ|ニョ|ヒャ|ヒュ|ヒョ|ミャ|ミュ|ミョ|リャ|リュ|リョ|ギャ|ギュ|ギョ|ジャ|ジュ|ジョ|ビャ|
ビュ|ビョ|ピャ|ピュ|ピョ|シャ|シュ|ショ|チャ|チュ|チョ|ジャ|ジュ|ジョ|カ|キ|ク|ケ|コ|サ|シ|ス|セ|ソ|タ|チ|ツ|テ|ト|ナ|ニ|ヌ|ネ|ノ|ハ|ヒ|フ|ヘ|ホ|マ|ミ|ム|メ|モ|ヤ|ユ|ヨ|ラ|
リ|ル|レ|ロ|ワ|ヲ|ガ|ギ|グ|ゲ|ゴ|ザ|ジ|ズ|ゼ|ゾ|ダ|ヂ|ヅ|デ|ド|バ|ビ|ブ|ベ|ボ|パ|ピ|プ|ペ|ポ|ン|ン|ア|イ|ウ|エ|オ」の改行を空に置換)を"|"で区切る。
 Aで反復、S=Sの対象をB[回数-1]に置換。
 Sで戻る。

誰か短くしてくれ

521 名前:デフォルトの名無しさん mailto:sage [2007/07/30(月) 22:48:23 ]
ye/イェ とか dhu/デュ とかあるんだよ?

522 名前:デフォルトの名無しさん mailto:sage [2007/07/30(月) 22:55:52 BE:980255377-S★(511223)]
「ローマ字」のwiki見て書いたから忘れてたすまんorz

523 名前:デフォルトの名無しさん mailto:sage [2007/07/31(火) 00:25:27 ]
wyi,wyeって半角カタカナないんだな。

524 名前:デフォルトの名無しさん mailto:sage [2007/07/31(火) 03:37:18 ]
ローマ字変換、正攻法で攻めたらJavaScriptで18行になってしまた…
スレに貼れないし。鬱だ氏のうorz

525 名前:デフォルトの名無しさん mailto:sage [2007/07/31(火) 08:02:16 ]
>>520
それって擬似コード?それともなでしこ?

526 名前:デフォルトの名無しさん mailto:sage [2007/07/31(火) 14:31:21 BE:480125838-S★(511224)]
なでしこですよ
正攻法がどんなんかわからん・・・この方法じゃこれ以上削れそうにないし・・・

527 名前:デフォルトの名無しさん mailto:sage [2007/07/31(火) 14:57:44 ]
>>526
トェェイがうまく変換できません・・・

528 名前:デフォルトの名無しさん mailto:sage [2007/07/31(火) 15:01:03 ]
アッー



529 名前:デフォルトの名無しさん mailto:sage [2007/07/31(火) 16:32:24 BE:120031823-S★(511224)]
「kyouhasuunennburinidaigakuniittekoyoutoomoimasutoleleia-ltu」をローマ字半角カナ変換して言う。
//キョウハスウネンブリニダイガクニイッテコヨウトオモイマストェェイアーッ
●ローマ字半角カナ変換(Sの|Sを)
 A=(「-|ltu|xtu|la|li|lu|le|lo|xa|xi|xu|xe|xo|bb|cc|dd|ff|gg|hh|jj|kk|ll|mm|pp|qq|rr|ss|tt|vv|ww|xx|yy|zz|ye|dhu|shi|chi|tsu|
fu|wi|wu|we|ji|kya|kyu|kyo|sya|syu|syo|tya|tyu|tyo|nya|nyu|nyo|hya|hyu|hyo|mya|myu|myo|rya|ryu|ryo|gya|gyu|gyo|zya|
zyu|zyo|bya|byu|byo|pya|pyu|pyo|sha|shu|sho|cha|chu|cho|ja|ju|jo|ka|ki|ku|ke|ko|sa|si|su|se|so|ta|ti|tu|te|to|na|ni|nu|ne|
no|ha|hi|hu|he|ho|ma|mi|mu|me|mo|ya|yu|yo|ra|ri|ru|re|ro|wa|wo|ga|gi|gu|ge|go|za|zi|zu|ze|zo|da|di|du|de|do|ba|bi|bu|be|
bo|pa|pi|pu|pe|po|nn|n|a|i|u|e|o」の改行を空に置換)を"|"で区切る。
 B=(「ー|ッ|ッ|ァ|ィ|ゥ|ェ|ォ|ァ|ィ|ゥ|ェ|ォ|ッb|ッc|ッd|ッf|ッg|ッh|ッj|ッk|ッl|ッm|ッp|ッq|ッr|ッs|ッt|ッv|ッw|ッx|ッy|ッz|イェ|デュ|シ|チ|ツ|フ|ウィ|ウ|ウェ|ジ|キャ|
キュ|キョ|シャ|シュ|ショ|チャ|チュ|チョ|ニャ|ニュ|ニョ|ヒャ|ヒュ|ヒョ|ミャ|ミュ|ミョ|リャ|リュ|リョ|ギャ|ギュ|ギョ|ジャ|ジュ|ジョ|ビャ|ビュ|ビョ|ピャ|ピュ|ピョ|シャ|シュ|ショ|
チャ|チュ|チョ|ジャ|ジュ|ジョ|カ|キ|ク|ケ|コ|サ|シ|ス|セ|ソ|タ|チ|ツ|テ|ト|ナ|ニ|ヌ|ネ|ノ|ハ|ヒ|フ|ヘ|ホ|マ|ミ|ム|メ|モ|ヤ|ユ|ヨ|ラ|リ|ル|レ|ロ|ワ|ヲ|ガ|ギ|グ|ゲ|ゴ|
ザ|ジ|ズ|ゼ|ゾ|ダ|ヂ|ヅ|デ|ド|バ|ビ|ブ|ベ|ボ|パ|ピ|プ|ペ|ポ|ン|ン|ア|イ|ウ|エ|オ」の改行を空に置換)を"|"で区切る。
 Aで反復、S=Sの対象をB[回数-1]に置換。
 Sで戻る。


:::::::::::.: .:. . ∧_∧ . . . .: ::::::::
:::::::: :.: . . /彡ミ゛ヽ;)ヽ、. ::: : ::
::::::: :.: . . / :::/:: ヽ、ヽ、i . .:: :.: :::
 ̄ ̄ ̄(_,ノ  ̄ ̄ヽ、_ノ ̄

530 名前:デフォルトの名無しさん mailto:sage [2007/07/31(火) 17:02:01 ]
>>529
ちょw
スレタイを7回音読しろよw

531 名前:デフォルトの名無しさん mailto:sage [2007/07/31(火) 17:05:29 BE:900234959-S★(511224)]
>>529からがんばっても10行にしかなりませんでした 難しいわorz

532 名前:デフォルトの名無しさん mailto:sage [2007/07/31(火) 19:11:57 ]
クァ/qa
クァ/qwa


533 名前:524 mailto:sage [2007/07/31(火) 20:50:37 ]
var A="xtu|ltu|kwa|ky|sw|sy|sh|tw|ty|th|ny|hy|my|ry|wh|gw|gy|zy|dw|dy|dh|by|"+
"py|qw|qy|fw|fy|jy|vy|cy|ch|xy|ly|k|s|t|n|h|m|y|r|w|g|z|d|b|p|q|f|j|v|c|x|l|"+
"a|i|u|e|o";var B="ッ|ッ|クァ|キy|スa|シy|シャ|シ|シュ|シェ|ショ|トa|チy|テy|ニy|ヒy|ミy|リy|ウァ|ウィ"+
"|ウ|ウェ|ウォ|グa|ギy|ジy|ドa|ヂy|デy|ビy|ピy|クa|キy|フa|フy|ジy|ヴy|チy|チャ|チ|チュ|チェ|"+
"チョ|y|y|カ@|サ@|タ@|ナ@|ハ@|マ@|ヤ|イ|ユ|イェ|ヨ|ラ@|ワ|ウィ|ウ|ウェ|ヲ|カ@゙|サ@゙|タ@゙|ハ@゙|ハ@゚|クァ|ク"+
"ィ|ク|クェ|クォ|ファ|フィ|フ|フェ|フォ|ジャ|ジ|ジュ|ジェ|ジョ|ヴァ|ヴィ|ヴ|ヴェ|ヴォ|カ|シ|ク|セ|コ|a|a"+
"|ア|イ|ウ|エ|オ";B=B.replace(/\|.@([゚゙]?)/g,function(e){var r="";for(var i=0;i<5;
i++)r+="|"+String.fromCharCode(e.charCodeAt(1)+i)+RegExp.$1;return r}).replace
(/([^\|]*)a\|/g,"$1ァ|$1ィ|$1ゥ|$1ェ|$1ォ|").replace(/([^\|]*)y\|/g,"$1ャ|$1ィ|$1ユ|"+
"$1ェ|$1ョ|").split("|");A=A.replace(/([^aiueo]{1,2})\|/g,"$1a|$1i|$1u|$1e|$1o|"
).split("|");var t=prompt().replace("nn","ン").replace(/([^aiueo])\1/g,"ッ$1").
replace(/n([^aiueo]|$)/g,"ン$1");for(var i=0;i<A.length;i++)t=t.replace(A[i],
B[i],"g");alert(t);
正規表現を使わないでやっていたが、なでしこのコードを参考にして13行。MS-IMEで出る字は大体出ると思うけど。
まだ冗長だなあ。

534 名前:デフォルトの名無しさん mailto:sage [2007/07/31(火) 21:52:50 BE:960250368-S★(511224)]
S="";X="-|ltu|xtu|bb|cc|dd|ff|gg|hh|jj|kk|ll|mm|pp|qq|rr|ss|tt|vv|ww|xx|yy|zz|ye|dhu|shi|chi|tsu|fu|ji|";Y=空;Z=空;
M="ky|sy|ty|ny|hy|my|ry|gy|zy|by|py|sh|ch|j|y"を"|"で 区切;N="a|u|o"を"|"で区切;Mで反復,D=対象;Nで反復,YにD&対象を一行追加;
P="l|x|w|k|s|t|n|h|m|r|g|z|d|b|p"を"|"で区切;Q="a|i|u|e|o"を"|"で区切;Pで反復,E=対象;Qで反復,ZにE&対象を一行追加;
A="{Xを"|"で区切}{\n}{Y}{Z}nn{\n}n{\n}a{\n}i{\n}u{\n}e{\n}o";B=(("ー|ッ|ッ|ッb|ッc|ッd|ッf|ッg|ッh|ッj|ッk|ッl|ッm|ッp|ッq|ッr|ッs|ッt|ッv|ッw|ッx|ッy|ッz|イェ|デュ|シ|チ|ツ|
フ|ジ|キャ|キュ|キョ|シャ|シュ|ショ|チャ|チュ|チョ|ニャ|ニュ|ニョ|ヒャ|ヒュ|ヒョ|ミャ|ミュ|ミョ|リャ|リュ|リョ|ギャ|ギュ|ギョ|ジャ|ジュ|ジョ|ビャ|ビュ|ビョ|ピャ|ピュ|ピョ|シャ|シュ|ショ|チャ|チュ|チョ|
ジャ|ジュ|ジョ|ヤ|ユ|ヨ|ァ|ィ|ゥ|ェ|ォ|ァ|ィ|ゥ|ェ|ォ|ワ|ウィ|ウ|ウェ|ヲ|カ|キ|ク|ケ|コ|サ|シ|ス|セ|ソ|タ|チ|ツ|テ|ト|ナ|ニ|ヌ|ネ|ノ|ハ|ヒ|フ|ヘ|ホ|マ|ミ|ム|メ|モ|ラ|リ|ル|レ|ロ|ガ|ギ|グ|ゲ|ゴ|
ザ|ジ|ズ|ゼ|ゾ|ダ|ヂ|ヅ|デ|ド|バ|ビ|ブ|ベ|ボ|パ|ピ|プ|ペ|ポ|ン|ン|ア|イ|ウ|エ|オ")の改行を空に置換)を"|"で区切;Aで反復,S=Sの対象をB[回数-1]に置換;

>>533を参考にして苦しいがスレタイ通りに・・・(゚Д゚;)

535 名前:デフォルトの名無しさん mailto:sage [2007/07/31(火) 21:54:14 ]
一行79文字が守られていません。お引取りください。

536 名前:デフォルトの名無しさん mailto:sage [2007/07/31(火) 21:54:48 BE:360094436-S★(511224)]
\(^o^)/ ヽ ←さじ

537 名前:デフォルトの名無しさん mailto:sage [2007/07/31(火) 22:19:30 ]
ソースコードをP2Pネットワークに置く
ソースコードのハッシュを算出する
ハッシュを元にソースコードをDLしてくる
  →事実上ソースコードはハッシュ文字数に圧縮される  ∩( ・ω・)∩ ばんざーい

538 名前:デフォルトの名無しさん mailto:sage [2007/07/31(火) 22:34:10 BE:600156465-S★(511224)]
∩( ・ω・)∩ ばんざーい



539 名前:デフォルトの名無しさん mailto:sage [2007/07/31(火) 22:36:23 ]
>>537
7行79桁でファイル共有ソフトを書けと。

540 名前:デフォルトの名無しさん mailto:sage [2007/07/31(火) 23:04:18 BE:280073827-S★(511224)]
「∩( ・ω・)∩ banza-i」をローマ字半角カナ変換して言う。
●ローマ字半角カナ変換(Sの|Sを)
 経過ダイアログはオフ。
 A=((「isoroku.net/A.txt」をHTTPデータ取得)の改行を空に置換)を"|"で区切る。
 B=((「isoroku.net/B.txt」をHTTPデータ取得)の改行を空に置換)を"|"で区切る。
 Aで反復、S=Sの対象をB[回数-1]に置換。
 Sで戻る。

//∩( ・ω・)∩ ばんざーい
//orz

541 名前:デフォルトの名無しさん [2007/08/01(水) 03:10:59 ]
>>525-526
疑似コードにしか見えんw

542 名前:デフォルトの名無しさん mailto:sage [2007/08/01(水) 08:49:44 ]
日本語でプログラミング気持ち悪い

543 名前:デフォルトの名無しさん mailto:sage [2007/08/01(水) 15:08:00 ]
>>540お前はアホか

544 名前:デフォルトの名無しさん mailto:sage [2007/08/01(水) 15:26:47 ]
日本語でプログラミングはなしがいい

545 名前:デフォルトの名無しさん mailto:age [2007/09/03(月) 14:33:17 ]
保守

546 名前:デフォルトの名無しさん mailto:sage [2007/09/03(月) 14:40:00 ]
データ外部に置いたらダメだろ
httpでプログラム取得、実行、というプログラムを書けば
汎用七行になってしまう

547 名前:デフォルトの名無しさん [2007/09/03(月) 14:41:49 ]
httpでとってきて、evalか?

こええよw


548 名前:デフォルトの名無しさん mailto:sage [2007/09/03(月) 16:38:26 ]
httpでとってきてCreateProcess



549 名前:デフォルトの名無しさん mailto:sage [2007/09/03(月) 18:44:35 ]
>>547
JavaScript が怖くて常に OFF にしてるの?

サンドボックスがまともならそんなに怖くないかと

550 名前:デフォルトの名無しさん mailto:sage [2007/09/03(月) 18:45:58 ]
実はperl

551 名前:デフォルトの名無しさん mailto:sage [2007/09/04(火) 02:51:01 ]
実はzipとか

552 名前:デフォルトの名無しさん mailto:sage [2007/09/04(火) 02:59:15 ]
ttp://www.amazon.co.jp/Short-Coding-~%E8%81%B7%E4%BA%BA%E9%81%94%E3%81%AE%E6%8A%80%E6%B3%95~-Ozy/dp/4839925232/ref=pd_bbs_sr_3/249-8159845-3310719?ie=UTF8&s=books&qid=1188842300&sr=8-3
中身見たこと無いけどこの本のことは話題にはならないのね。

553 名前:デフォルトの名無しさん [2007/09/04(火) 12:23:18 ]
図書スレで話題になってたな

554 名前:デフォルトの名無しさん mailto:sage [2007/09/12(水) 20:08:51 ]
>>553
どんな内容かおせーて

555 名前:デフォルトの名無しさん [2007/09/22(土) 00:10:16 ]
トリッキースレがなくなってますね。
トリッキースレの後継スレみたいなのないのかな。

別のスレで出た話ですが、

int my_fputwc(wint_t c, FILE *fp)
{ wint_t r = fputwc(c, fp);
return (r == WEOF) ? EOF : r;
}

int wtbl[0x10000];
void dokkade_jikkou(void ) {
int i;
for (i = 0; i < 0x10000; i++)
wtbl[i] = i;
wtbl[0xffff] = EOF;
}
int my_fputwc(wint_t c, FILE *fp) return wtbl[fputwc(c, fp);]; }

みたいなこと(WEOF(wint_tの0xffff)をEOF(intの-1)に変換)
をもっとスマートに行う方法ないですかね。

556 名前:デフォルトの名無しさん mailto:age [2007/09/22(土) 00:37:10 ]
インラインアセンブラが使え無い言語は
基本的に劣っていると考えたい・・・


557 名前:デフォルトの名無しさん mailto:sage [2007/09/22(土) 01:01:47 ]
適当に書いてみた。スマートなのかも、速いのかもよくわからん。反省はしてない。
int my_fputwc(wint_t c, FILE *fp)
{
  wint_t r = fputwc(c, fp);
  return ((!(r ^ 0xffff)) * EOF) | r;
}

558 名前:デフォルトの名無しさん mailto:age [2007/09/22(土) 01:04:03 ]
エラー デバッグ ブラウザ ツール
www.mozilla-japan.org/
シンプル プログミング ツール
proforceone.web.fc2.com/
素因数分解サンプルプログラム
Calculation processing にコピーして[RUN]

A=2*3*5*11*13*17*19;
x=A;write(" "+x+" ⇒");
for(i=2;x>=i;i++){if(0==x%i){k=0;
 for(j=2;(i>=j)&&(1>=k);j++){
  if(0==i%j){k++;}
 } if(1==k){write(" "+i);}
}}



559 名前:デフォルトの名無しさん mailto:sage [2007/09/22(土) 14:40:32 ]
>>555
どう考えてもfputwcが重すぎで大差ない気がするが
int my_fputwc(wint_t c, FILE *fp)
{ wint_t r = fputwc(c, fp);
return (~r + 0xFFFF&0xFFFF0000)^r;
}


560 名前:デフォルトの名無しさん mailto:sage [2007/10/14(日) 21:43:13 ]
保守

561 名前:デフォルトの名無しさん mailto:sage [2007/11/14(水) 22:52:05 ]
保守


562 名前:デフォルトの名無しさん mailto:sage [2007/11/14(水) 23:09:49 ]
なんかネタないかね

563 名前:デフォルトの名無しさん mailto:sage [2007/11/15(木) 04:38:01 ]
echoサーバとか

564 名前:デフォルトの名無しさん mailto:sage [2007/11/15(木) 04:41:30 ]
10 OPEN "COM1:" FOR INPUT AS #1
20 LINE INPUT #1, A$
30 PRINT #1, A$
40 IF NOT EOF(1) THEN GOTO 20
50 CLOSE #1
60 END
70

565 名前:デフォルトの名無しさん mailto:sage [2007/11/17(土) 08:34:20 ]
[,.]

4文字v

566 名前:デフォルトの名無しさん mailto:sage [2007/11/17(土) 12:01:10 ]
>>565
これなに?

567 名前:デフォルトの名無しさん mailto:sage [2007/11/17(土) 13:46:53 ]
入力したものを出力するだけのプログラムなんじゃない?

568 名前:デフォルトの名無しさん mailto:sage [2007/11/17(土) 13:57:06 ]
何もしないで戻るような気がする



569 名前:デフォルトの名無しさん mailto:sage [2007/11/17(土) 14:27:16 ]
これTCP? ポートってデフォルトは何番になるの?

570 名前:デフォルトの名無しさん mailto:sage [2007/11/18(日) 01:00:54 ]
>>565はBFのコードだろ?

571 名前:デフォルトの名無しさん mailto:sage [2007/11/18(日) 03:11:21 ]
>>565
そりゃただのechoコマンドじゃないか。

572 名前:デフォルトの名無しさん mailto:sage [2007/11/19(月) 19:24:25 ]
>>569
TCP/UDP 7

573 名前:デフォルトの名無しさん mailto:sage [2007/11/19(月) 19:31:43 ]
RFC 3091 "Pi Digit Generation Protocol" のサーバーとかどうだろう。

574 名前:デフォルトの名無しさん mailto:sage [2007/11/19(月) 23:16:44 ]
lispで何か書こうかな。。。。


もしかして過疎?

575 名前:デフォルトの名無しさん mailto:sage [2007/11/19(月) 23:27:59 ]
187byte スロットはスレ違い?

576 名前:デフォルトの名無しさん mailto:sage [2007/11/19(月) 23:30:57 ]
>>575
とりあえず書いてけよ。

577 名前:デフォルトの名無しさん mailto:sage [2007/11/19(月) 23:55:55 ]
つ <body onload=n=[1,b=2,x=3];setInterval('for(i=3;b<i--;)if(i<x)n[2-i]+=n[2-i]-7?1:-6;b+=b?-1:2;document.body.innerHTML=x?n:n+(n[0]-n[1]|n[1]-n[2]?"\\nx":"\\no")',50) onmousedown=x+=x?-1:3>


誰かもっと削ってー

578 名前:デフォルトの名無しさん mailto:sage [2007/11/20(火) 18:47:23 ]
スルーとはお前らなかなかやってくれるなw
でもやっぱりスレチだよな。ゲ製に投下してくる



579 名前:デフォルトの名無しさん mailto:sage [2007/11/20(火) 18:50:49 ]
>>577
スルーしたわけじゃないんだ。
ちょっと分野が違った。
すまね。

580 名前:デフォルトの名無しさん mailto:sage [2007/11/20(火) 20:12:05 ]
俺は1時間くらい考えてみたけど <body id=B くらいしか思いつかなかった
あとは表示が 1,2,3,x になってもいいならn=[1,b=2,x=3,"\\n"]とするとか

581 名前:デフォルトの名無しさん mailto:sage [2007/11/20(火) 21:17:33 ]
>>579
あっちで好評だったからもう気にしないんだぜw


>>580
考えてくれてたのかサンクス
なるほど、id=B はまったく思い付かなかった。コンマも気にしないからやってみたら
n=[1,b=2,x=3,"\n"]; ってエスケープ1つで動いた

これで結局 179Byte wwwこれ以上は想像もつかんw
ああ、 onclick はなんとなくタブーねww

582 名前:デフォルトの名無しさん mailto:sage [2007/11/21(水) 00:16:20 ]
何をするスクリプト?

583 名前:デフォルトの名無しさん mailto:sage [2007/11/21(水) 00:21:47 ]
>>582
使ってみるがよろし。

584 名前:デフォルトの名無しさん mailto:sage [2007/11/21(水) 00:34:49 ]
PCが見知らぬ動きをはじめた・・・!

585 名前:デフォルトの名無しさん mailto:sage [2007/11/21(水) 00:49:34 ]
n[0]-n[1]|n[1]-n[2]
n[0]*6-n[1]*5-n[2]
n[2-i]+=n[2-i]-7?1:-6;
n[2-i]=n[2-i]%7+1;

n[0]*6-n[1]*5-n[2]はちゃんと動くか分からん

586 名前:デフォルトの名無しさん mailto:sage [2007/11/21(水) 01:05:20 ]
>>585
上のは [2,1,7] で誤作動しますね
下のは (; Д )゚ ゚

587 名前:デフォルトの名無しさん mailto:sage [2007/11/21(水) 01:15:21 ]
n[0]*7-n[1]*6-n[2]
だと大丈夫?

588 名前:デフォルトの名無しさん mailto:sage [2007/11/21(水) 01:23:00 ]
動かしたけどさっぱり
最後の桁がぐるぐる回り続けてるだけだった



589 名前:デフォルトの名無しさん mailto:sage [2007/11/21(水) 01:24:21 ]
素晴らしい。
いま 174Byte ですか。まだまだ削れそうな気がしてきました

590 名前:デフォルトの名無しさん mailto:sage [2007/11/21(水) 01:30:39 ]
>>588
<body id=B onload=n=[1,b=2,x=3,"\n"];setInterval('for(i=3;b<i--;)if(i<x)n[2-i]=n[2-i]%7+1;b+=b?-1:2;B.innerHTML=x?n:n+(n[0]*7-n[1]*6-n[2]?"x":"o")',50) onmousedown=x+=x?-1:3>
これで動かないか?

591 名前:デフォルトの名無しさん mailto:sage [2007/11/21(水) 01:34:08 ]
>>590
うごく

592 名前:デフォルトの名無しさん mailto:sage [2007/11/21(水) 02:05:57 ]
ああ、わかった
B使うとかあらゆる意味で邪道だな
クソだ

593 名前:デフォルトの名無しさん mailto:sage [2007/11/21(水) 08:26:49 ]
グローバル使わないでって火狐は怒るだろうな

594 名前:デフォルトの名無しさん mailto:sage [2007/11/21(水) 08:49:45 ]
HTMLで短くするのなんてナンセンスだよ
onload=""って括ってないとか、<title>タグが無いとか、
innerHTMLで配列を代入とか、仕様違反が多すぎる。

595 名前:デフォルトの名無しさん mailto:sage [2007/11/21(水) 09:00:48 ]
titleを指摘する前に、htmlなのにhtml要素がないことに突っ込めw

596 名前:デフォルトの名無しさん mailto:sage [2007/11/21(水) 09:09:20 ]
htmlタグはHTML4では省略可能なので別になくていい
そもそもDTD宣言がないからHTML4かどうかもわからないんだけどな

597 名前:デフォルトの名無しさん mailto:sage [2007/11/21(水) 09:27:11 ]
>>594
配列は toString メソッドが暗黙に呼び出されて文字列になる

598 名前:デフォルトの名無しさん mailto:sage [2007/11/21(水) 15:55:51 ]
>>597
そもそもinnerHTMLが仕様にないので、暗黙的にtoStringが呼ばれるとは限らない
しかしArrayのtoStringの仕様がjoinだとはしらなんだ



599 名前:デフォルトの名無しさん mailto:sage [2007/11/21(水) 16:45:57 ]
そもそもここは標準規格に適合しないといけないスレじゃないだろ。

600 名前:デフォルトの名無しさん mailto:sage [2007/11/21(水) 16:53:46 ]
むしろ仕様と戦うスレ






[ 新着レスの取得/表示 (agate) ] / [ 携帯版 ]

前100 次100 最新50 [ このスレをブックマーク! 携帯に送る ] 2chのread.cgiへ
[+板 最近立ったスレ&熱いスレ一覧 : +板 最近立ったスレ/記者別一覧]( ´∀`)<140KB

read.cgi ver5.27 [feat.BBS2 +1.6] / e.0.2 (02/09/03) / eucaly.net products.
担当:undef