INTEGER AA,P DIMENSION AA(0:Q),U(P),KZ(M)此处，声明 U 为数组，其大小为 P而 P 尚未确定。没有固定值。所以 U 的大小也无法确定。变量不能直接作为数组的大小。（常量，虚参，common中的变量除外）如果你确认要使用动态数组，请使用 allocatable 可分配数组。
