home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1993 #1 / NN_1993_1.iso / spool / comp / lang / pascal / 8028 < prev    next >
Encoding:
Internet Message Format  |  1993-01-11  |  1.3 KB

  1. Path: sparky!uunet!think.com!rpi!batcomputer!ghost.dsi.unimi.it!37.1!avl0
  2. From: avl0@cine88.cineca.it
  3. Newsgroups: comp.lang.pascal
  4. Subject: Re: <None>
  5. Message-ID: <1993Jan11.111918.635@cine88.cineca.it>
  6. Date: 11 Jan 93 11:19:18 +0100
  7. References: <1993Jan9.040609.2373@ccsvax.sfasu.edu>
  8. Organization: CINECA, Italian Interuniversity comp. centre
  9. Lines: 33
  10.  
  11. In article <1993Jan9.040609.2373@ccsvax.sfasu.edu>, z_youngjb@ccsvax.sfasu.edu writes:
  12. > jl
  13. > kjkjlkjlkjljlkjlkjlj
  14.  
  15. Obviously NOT! You can not kjkjl your kjlk ... BUT while your jljlk is in the
  16. lkjlj you can try to jlkll the jjlk.
  17.  
  18. > kljkljlkjlkjlk
  19.  
  20. This is not a problem for ljklj until k goes to lkjlkl of your kkllj.
  21.  
  22. Try this.
  23.  
  24.   BEGIN get( <your kljljj> );
  25.         FOR i := 1 TO jkjlkl DO squeeze( <your kljljj> );
  26.         REPEAT lengthen( <your kljljj> )
  27.         UNTIL <length it's enough>
  28.         put( <your bjajcjkjk>, <your kljljj>)
  29.   END.
  30.  
  31. You should have an output like that:
  32.  
  33. AAAAARRRRRGGGHHHHHHHH !
  34.  
  35. BTW: $$%@^%#^****{}@ kk FAQ !! 
  36.  
  37. -- 
  38. "To be or not to be,  /// Marco Voli    [voli@cineca.it]     | ph.+39-51-598411
  39.  that is the         /// Supercomputing Group                | FAX+39-51-594872
  40.  problem"           /// CINECA  Interuniversitary Computing Centre
  41.  Billy the kidder  /// via Magnanelli 6/3 - 40033 Casalecchio (BO) ITALY
  42.