for[i 0 10][make " 840.6*power .707 i pr(word bl form i -1 "A%-2.f form : 5 0 "mm\ x form :/.707 5 0 "mm)]bye