24小时热门版块排行榜    

查看: 2036  |  回复: 15
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

lvbida

银虫 (小有名气)

[求助] 求助高手帮忙编一个Fortran的小程序,重金悬赏......

需要一个Fortran的小程序,急求帮忙。
回复此楼
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

kmd

木虫 (著名写手)

【答案】应助回帖


jjdg(金币+1): 经典! 2011-11-03 01:28:46
program  ex0801
implicit none
  call message() ! 调用子程序message
  call message()
  stop
end
! 子程序message
subroutine message()
implicit none
  write(*,*) "Hello."
  return
end
9楼2011-11-02 14:22:17
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 lvbida 的主题更新
信息提示
请填处理意见