From mboxrd@z Thu Jan 1 00:00:00 1970 X-Spam-Checker-Version: SpamAssassin 3.4.4 (2020-01-24) on polar.synack.me X-Spam-Level: X-Spam-Status: No, score=-1.3 required=5.0 tests=BAYES_00,INVALID_MSGID autolearn=no autolearn_force=no version=3.4.4 X-Google-Language: ENGLISH,ASCII X-Google-Thread: 103376,9e3cf88e122a0531,start X-Google-Attributes: gid103376,public From: Gautier Subject: A good laugh... Date: 1999/01/30 Message-ID: <36B32246.CB0E3E62@Maths.UniNe.CH>#1/1 X-Deja-AN: 438715934 Content-Transfer-Encoding: 8bit Content-Type: text/plain; charset=iso-8859-1 MIME-Version: 1.0 Newsgroups: comp.lang.ada Date: 1999-01-30T00:00:00+00:00 List-Id: Written in comp.lang.pascal.borland during a <>: ---- Fr�d�ric wrote: > Ridiculous. Tell me one thing you can do in C you cannot do in Pascal. Write code, that looks like THIS: ;-))) ================================================================== #include float o=0.075,h=1.5,T,r,O,l,I;int _,L=80,s=3200;main(){for(;s%L|| (h-=o,T= -2),s;4 -(r=O*O)<(l=I*I)|++ _==L&&write(1,(--s%L?_