$b=1189;printf'A%-2d%3$5.0fmm x%5.0fmm
',$_,$a=$b,$b*=.707 for 0..10