FORTRAN初心者です。。

１０００以下の整数のうち、７で割ると２余る数を全て合計するプログラムをつくりたいのですがわかりません…
どなたか教えてください。