c234567
　　　 do k=1,100
　　　　write(*,*) "k=",k
　　　 enddo
　　　 stop
　　　 end

※１　ちなみにこのスクリプトをそのままコピペしても、コンパイルできないと思います。
※２　ルール１：7列目からスクリプトを書く。一行目は"c"が入っており、
　　　これはコメント行（スクリプトにはなんら影響しない行）を意味するので1列目から書いてます。
※３　ルール２：最後はかならず、「stop」「end」で締めくくる。
※４　ルール３：ファイル名は「○○○.f95」とすること。○○○の部分は任意。ただし日本語はだめ。
※５　write(*,*):　write文。（）内はどこに出力するか、どのような書式で出力するかを記述。
　　　今回の場合、（）内一つ目の＊は「画面に出力」、二つ目の＊は「書式無し」を意味する。