fortran 生成随机点(x,y)0
问题描述:
fortran 生成随机点(x,y)0
答
program randPoint implicit none integer i real ::x,ycall random_seed () !随机种子 do i=1,100 call random_number (x) call random_number (y)write(*,"(a,f6.3,f6.3,a)") "(",x,y,")" end do end program rand...