/* Day 1: Pgm 1.1                      */
  /*  simple test problem              */
  /*                                   */
  /* one way to do comments            */

   data a ;
     input name $ iq 12-14 shoesize ;
     datalines ;
   John    105   9.5
   Paul    118  10.0
   Jane    121   7.5
   Irene    98   8.0
   George   95  11.0 
 ;
  proc print data=a ;                  * print it out ;
  run ;