Assuming[A > 0, D[ArcSinh[x/Sqrt[A]], x]]