有如下程序：
#inCluDE＜iostrEAm＞
using nAmEspACE stD;
ClAssA
puBliC:
A()Cout＜＜"A";
～A()Cout＜＜"～A";
;
ClAssB、puBliCA
A*p;
puBliC:
B()Cout＜＜"B";p=nEwA;
～B()Cout＜＜"～B";DElEtE p;
;
int mAin()
B、oBj;
rEturn 0;
执行这个程序的输出结果是()。
A．BAA～A～B～A
B．ABA～B～A～A
C．BAA～B～A～A
D．ABA～A～B～A