Oi pessoa estou com um problema que não estou conseguindo identificar ou resolver, preciso gerar vários números aleatórios entre 0 e 1 e se esses numeros forem > 0.5 então minha variável se igual a -1 e se forem menores se iguala a 1 entretando algo esta dando errado o código que fiz é esse:
program valor_medio
!----------------------------------------------------------------------
Implicit none
Real N1(10), N2(100)
Integer i, x1(10), x2(100)
!----------------------------------------------------------------------
print*,'GERANDO VARIÁVEIS ALEATÓRIAS'
print*,'-> Para 10 variáveis'
call random_number(N1)
do i=1,10
if (N1(i).lt.0.5) then
(x1(i).eq.1)
else if (N1(i).ge.0.5) then
(x1(i) = -1)
end if
write(*,*) x1(i)
end do
end program