1

ねえ、私はこのウェブサイトを初めて使用するので、おそらくいくつか間違ったことをしているのですが、これが私の質問です:

DO LOOP を次のように作成できますか (Fortran90 の場合):

program help
implicit none

real, dimension (10,10) :: imarc
integer :: R , j , k

imarc (1:10,1:10) = 50
imarc (1:10,1) = 20
imarc (1,1:10) = 20
imarc (1:10,10) = 20
imarc (10,1:10) = 20
imarc (3,3) = 100


!!! HERE IS THE DO LOOP THAT GIVES A COMPILE ERROR

DO R = 1 , 1000
  DO j = 2 , 9
    DO k = 2 , 9

    imarc (j,k) = 0.25( imarc((j-1),k) + imarc((j+1),k) + imarc(j,(k-1)) + imarc(j,(k+1)) )
    imarc (3,3) = 100

    END DO
  END DO
END DO

WRITE (*,*) "Node (5,5) =", imarc(5,5)

end program help

誰かが私の問題を解決してくれることを願っています。

ここに私が得るエラーメッセージがあります:

     imarc(j,k) = 0.25( imarc((j-1),k) + imarc((j+1),k) + imarc(j,(k-1)) +
     1
Error: Unclassifiable statement at (1)

ええと、私がすべてを正しくやったか、少なくとも誰かが私を助けてくれるのに十分なことをしたことを願っています.

本当にありがとう！！-マーク

4

1 に答える 1

1

算術演算子がありません.0.25以降だと思います*. 乗算は、代数のように隣接する量によって暗示されるわけではなく、演算子を使用する必要があります。

PSよくある質問...問題を示した小さな完全なプログラム。

于 2014-04-09T02:25:37.193 に答える