fortran中if elseif实例

在Fortran中，可以使用if elseif语句来实现条件判断。下面是一个Fortran中if elseif的实例：

program if_example
  implicit none
  integer :: num

  print *, "请输入一个整数："
  read *, num

  if (num < 0) then
    print *, "输入的数是负数"
  elseif (num == 0) then
    print *, "输入的数是零"
  else
    print *, "输入的数是正数"
  end if

end program if_example

这个例子中，首先要求用户输入一个整数，然后使用if elseif语句判断输入的数是正数、负数还是零，并输出相应的结果。