显然是【-1,1】，你自己看看就是了，不要说你不晓得
program mainimplicit noneINTEGER IDO I=1,10WRITE(*,*)2*RAND()-1ENDDOWRITE(*,*)"输出完成！"READ(*,*)end
以上处理结果！
