试编写一查表求平方的子程序SQR（设X在累加器A中，A小于15，平方数存入工作寄存器R7中）。