$j=1189;printf"A%-2d%5dmm x%5dmm ",$_,$j*=$k=.7074,$j/$k for 0..10