/* Lesson 4-4 */                                      
 /*    File Name = les0404.sas   05/13/04   */         
options linesize=72 pagesize=20;
                                                       
data naikaku;
  infile 'naikaku0310.prn'
    firstobs=2;
  input name $ posit $ sex $ tochi
;

proc print data=naikaku;
run;
proc means data=naikaku;
run;