O programa em FORTRAN abaixo faz a leitura de um número digitado pelo usuário e verifica se esse
número é primo. Os números à frente das diretivas são apenas para referência como identificador da linha de
programa.
1 - program numeroprimo
2 - integer::i,x,cont
3 - write(*,*) “Entre o numero para testar se e primo ou nao”
4 - read(*,*)x
5 - cont=0
6 - do i=1,x
7 - if(mod(x,i)/=0) then
8 - cont=cont+1
9 - end if
10 - end do
11 - if (cont<=2) then write(*,*)”O numero e primo” else write(*,*) “O numero nao e primo "
12 - end if
13 - end program
Identifique a resposta correta: