[問題] 開文件求平均
integer x, y, sum
real mean
open(unit=1,file='Gradeold.txt')
read(1,*)x,y
sum=0
do i=1,62
sum=sum+y
end do
mean=sum/62
write(*,*)"mean",mean
end
請問一下
哪裡打錯了
我怎麼執行都是100
感謝
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 114.45.178.157
→
11/24 20:52, , 1F
11/24 20:52, 1F
→
11/24 21:04, , 2F
11/24 21:04, 2F
→
11/24 21:04, , 3F
11/24 21:04, 3F
討論串 (同標題文章)
Fortran 近期熱門文章
PTT數位生活區 即時熱門文章
