参考答案：A

解析：此题在函数调用过程中采用了简单递归的方式，具体流程如下：主调过程调用BT过程，把实参4传递给BT过程中的形参x，由x=x*2+1语句推出 x=9，此时不满足BT过程体中判断语句的判断条件，执行x=x*2；Print x；语句。由x =x*2语句得到x值为18并输出，结束此次调用过程，返回到主调过程结束程序，输出结果为18。