PROGRAM Definite_Integral


    IMPLICIT NONE


    integer:: a,b,c,i,n

    read*, n

    i=2

    do i,n-1


    if(mod(n,i).EQ.0)then

    

        print*, "소수아니야 병신아"

    else

        print*, "소수야 병신아"

end if

end do



END PROGRAM Definite_Integral


뭐가 틀렷다는데 에러를 봐도 뭔소린지를 모르겠어요.
    do i,n-1
    1
Error: Unclassifiable statement at (1)
../Definite_Integral.f90:15.3:

end do
   1
Error: Expecting END PROGRAM statement at (1)
make: *** [Definite_Integral.o] Error 1

에러는 읽는 방법같은거 없나요