我想用fortran实现一个对角矩阵,这个对角矩阵的值为+1或-1,且出现的概率相等,其它位置的值为0,如何实现?

 

谢谢