anarchy golf - Equations 解答編

anarchy golf - Equations

うん、まぁそんなことだろうと。

まじめに解いてる人は少ないね。

投稿した内容はこれ

char*p;a,b;main(i,s){for(;p=gets(s);a=a-b&&!puts(s))for(;*p;a=i?a-i?a<i?a+i:a-i:a*a:*p++=='='?b=a,0:a)i=strtol(p,&p,0);}

本とはもう少し縮めて118Byteだったけど投稿し忘れ。

char*p;a,b;main(i,s){for(;p=gets(s);a=a-b&&!puts(s))for(;*p;a=i?a-i?a<i?a+i:a-i:a*a:*p++&1?b=a,0:a)i=strtol(p,&p,0);}

まじめに左辺と右辺を計算して一致しなかったら出力という普通のもの。

もう一個がこれ。正答誤答をパターン化して一問目でどちらのパターンか判定する。

トップ取れそうなら投稿しようと思ったけどinaniwaさんには届かなかったのでやめといた54byte。
main(f,s){for(;gets(&s);f&1||puts())f=f/2?:s*3%73+69;}

で、そのinaniwaさん。

main(i,s){for(;gets(s);)s%48%9*5%++i&&puts();}

これは良く通ったな、と^^;

今実験コード回してもとおらなそうなことが多いようですが。