Re: [問題] linux上的指令
如果題目是要算階乘(我不知道題目是啥啦)
又規定要用函式來用遞迴
program factor
read(*,*) n
nres=ifn(n)
write(*,*)'n=>',nres
end
RECURSIVE function ifn(n)
if (n .eq. 1) then
ifn=1
else
ifn=n*ifn(n-1)
end if
return
end
科科,亂寫的,應該會過吧
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 220.134.25.80
※ 編輯: agody 來自: 220.134.25.80 (12/04 02:58)
推
04/14 14:49,
5年前
, 1F
04/14 14:49, 1F
→
04/14 14:50,
5年前
, 2F
04/14 14:50, 2F
討論串 (同標題文章)
Fortran 近期熱門文章
PTT數位生活區 即時熱門文章