Newsgroups: fj.lang.c
Path: galaxy.trc.rwcp.or.jp!sparky!uunet!ccut!sh.wide!wnoc-kyo!kuis!isfs!senda
From: senda@kuis.kyoto-u.ac.jp (Shuji Senda)
Subject: Re: One Line Program (Re: IPA92GP (9/16-lap))
In-Reply-To: sakamoto@sm.sony.co.jp's message of 21 Sep 92 12:22:06 GMT
Message-ID: <SENDA.92Sep21233350@cr-x.kuis.kyoto-u.ac.jp>
Sender: news@kuis.kyoto-u.ac.jp
Nntp-Posting-Host: cr-x.kuis.kyoto-u.ac.jp
Organization: Dept. of Info. Sci., Kyoto Univ
References: <3764@akiu.gw.tohoku.ac.jp> <1992Sep21.122206.19594@sm.sony.co.jp>
Distribution: fj
Date: Mon, 21 Sep 1992 14:33:50 GMT
Lines: 26
Xref: galaxy.trc.rwcp.or.jp fj.lang.c:587
X-originally-archived-at: http://galaxy.rwcp.or.jp/text/cgi-bin/newsarticle2?ng=fj.lang.c&nb=587&hd=a
X-reformat-date: Mon, 18 Oct 2004 15:18:22 +0900
X-reformat-comment: Tabs were expanded into 4 column tabstops by the Galaxy's archiver. See http://katsu.watanabe.name/ancientfj/galaxy-format.html for more info.


$B@gED!w5~Bg$G$9!#(B

In article <1992Sep21.122206.19594@sm.sony.co.jp>, sakamoto@sm.sony.co.jp (Tomohiko Sakamoto) writes:

Tomohiko> $B$b$O$d!"(Bfj.jokes $B%M%?$G$O$J$$$N$G!"(Bfj.lang.c $B$K0\$C$F$-$^$7(B
Tomohiko> $B$?!#(B1 $B%i%$%s%W%m%0%i%`$NDj5A$H$$$&$N$OCN$j$^$;$s$,!"$3$3$G$O!"(B
Tomohiko> 256$B%P%$%HL$K~$G!"%X%C%@%U%!%$%k$N(B include $B$J$7!"(B; $B$,$R$H$D$@(B
Tomohiko> $B$1!"$H$$$&$3$H$K$7$F$*$-$^$7$g$&!#J8;z%3!<%I$O(B ASCII $B$G$9!#(B

($BCfN,(B)

Tomohiko> $BB>$KLLGr$$%W%m%0%i%`$r$4B8CN$NJ}!"%U%)%m!<$h$m$7$/!#(B

$B$3$&$$$&$N9%$-$G$9!#@N$_$+$1$F!"$9$4$$$J$H;W$C$?%7%0%K%A%c$r>R(B
$B2p$7$^$9!#!V(B; $B$,0l$D$@$1!W$G$O$J$$$N$G$9$,!#(B

/*  rcarter@wpi.wpi.edu */      /* Amazing */             /* Joseph H. Allen */
int a[1817];main(z,p,q,r){for(p=80;q+p-80;p-=2*a[p])for(z=9;z--;)q=3&(r=time(0)
+r*57)/7,q=q?q-1?q-2?1-p%79?-1:0:p%79-77?1:0:p<1659?79:0:p>158?-79:0,q?!a[p+q*2
]?a[p+=a[p+=q]=q]=q:0:0;for(;q++-1817;)printf(q%79?"%c":"%c\n"," #"[!a[q-1]]);}

$BFbMF$O<B9T$7$F$N$*3Z$7$_$H$$$&$3$H$G!#!#!#(B
--
JUNET      : senda@kuis.kyoto-u.ac.jp ($B@gED=$;J!wCSED8&(B.$B5~Bg>pJs(B)
Nifty Serve: NAG01567 ($B#C#y#b#e#r(B $B#S#p#o#r#t#s(B $B#C#R!]#X(B) FLABO staff
