data distance;
   miles=23;
   kilometr = 1.61*miles;
proc print;
run;