写一个fortran中的自加程序

好的，这个问题我可以回答。请见以下代码：

program self_add
implicit none
integer :: num = 0
num = num + 1
write(*,*) num
end program self_add

这是一个简单的Fortran程序，其中一个整数变量num被初始化为0，然后自加一次，再将结果打印出来。