【fortran】1~100までの和を出力したい

前提・実現したいこと

1から100までの数字を足していき、その過程の数字をターミナルに出力したい。

【イメージ】
wa = 1
wa = 3
wa = 6
・・・
wa = 5050

fortran
1program loop
2    implicit none
3    integer i, wa
4    wa = 0
5    do i = 1,100
6        wa = wa + i
7        write(*,*) 'wa = ', wa
8    enddo
9end program loop

発生している問題・エラーメッセージ

出力されない

試したこと

8と9行目にpauseを入れて、同じディレクトリのa.exeを開いたところ、ここに出力されていました。
fortran初心者故、至らないところもあるかもしれませんが、何卒よろしくお願い致します。
visual studio code を使用しています。

行動規範の内容に同意します

回答1件

特に問題はないようですが？
gfortran-8の結果です。

fortran
1program loop
2    implicit none
3    integer i, wa
4    wa = 0
5    do i = 1,100
6        wa = wa + i
7        write(*,*) 'wa = ', wa
8    end do
9end program loop

text
1usr ~/Project/test % ./a.out 
2 wa =            1
3 wa =            3
4 wa =            6
5 wa =           10
6 wa =           15
7 wa =           21
8 wa =           28
9 wa =           36
10 wa =           45
11 wa =           55
12以下略