Questão 1885507

Sobre o programa em linguagem Fortran apresentado na figura abaixo, assinale a afirmação correta, considerando que ele compilado da seguinte forma:

\$ gfortran concurso.f90 -o concurso.x

e, se compilado, da forma:

\$ ./concurso.x A701 01-04-06-12-15

program Concurso_FURG

implicit none

integer, allocatable :: dd (:)

integer :: i

character (len=8) :: estacao

character (len=100) :: dds

call getarg (1,estacao)

call getarg (2,dds)

if (estacao (1:1) == "A" .and. mod (len(trim(dds)) +1,3 == 0) then

__allocate (dd((len(trim(dds)) +1)/3))

__do i=l, (len (trim(dds)) +1) /3, 1

___read (dds (( i-1) * 3+1 : (i - 1) -3+2), *) dd (i)

__enddo

__if (( len (trim (dds)) +1)/3 - 1 > 0) print *, dd ((len (trim (dds)) +1) / 3-1) - dd (1)

else

__print *, "Argumentos incorretos"

endif

end

"concurso. f90" 21L. 511C __________________________ 21.0-1 __________Tudo