推 BREAKBEAT:清楚明瞭 感謝 06/15 10:41
我寫兩種程式給你看好了
我自己也才剛學一年
不對的請糾正
ex1 未使用副程式
program ex1
implicit none
integer :: a,b,c
read(*,*)a,b
c=a+b
write(*,*)c
pause
end program
ex2 使用副程式
program ex2
implicit none
integer :: a,b,c
read(*,*)a,b
call haha(c,a,b)
write(*,*)c
pause
end program
subroutine haha(z,x,y)
implicit none
integer :: x,y,z
z=x+y
end
這兩個跑出來會一樣
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 218.175.224.190
※ 編輯: magaiml 來自: 218.175.224.190 (06/12 19:57)