[duguying2245]

我编了个程序 针对你给的数据。不知道你的系统多大。大的话用for循环就不好了。希望对你有用 呵呵。
A=[2-9i,6+4i,7,5-3i;i,4,5+8i,9];
p=0;
for m=1:2
for n=1:4
x=imag(A(m,n));
if (x<1)&(x>-1)
p=p+1;
y(p)=m;z(p)=n;
number=p;

end
end
end

fprintf('\n*** 实数个数 = %2.0f \n',number);

%查看实数
for p=1:number
A(y(p),z(p))
end