/* Day 6: Pgm 6.2               */
  /*                              */
  /* simple program with input    */
  /*   modification of pgm6.1     */
   data a ;
    u = x*4 ;
    input x ;   * read in some data ;
    y = x*4 ;
    n = _n_ ;
    output ;    * write obs in dataset a ;
    x = x + 1 ;
    n = _n_ ;
    output ;    * write another obs in dataset a ;
   cards ;
    3
    -7
 ;
 run ;          * end of data step ;
   proc print data=a ;
    title 'may 29, pgm 6.2' ;
 run ;