[問題] 新手請大家幫忙debug
※ [本文轉錄自 Programming 看板 #1CjM0zmB ]
作者: h888512 (理論型嘴砲) 看板: Programming
標題: [問題] 新手請大家幫忙debug
時間: Wed Oct 13 15:31:04 2010
是用fortran寫的
program calculate
implicit none
real x(999)
integer counter,sum
integer, parameter :: limit=46
open(8,file='data.txt',status='old')
sum=0
do counter=1, limit,1
read(8,'1x,f4.1',err=99) x(counter)
sum =sum+x(counter)
99 close(1)
end do
write(*,*) sum/46
end
compile之後沒有bug,可是讀出來的東西是0
file和compiler都放在桌面上
請大家幫幫忙,謝啦!!
--
◥▁▁▁▁ ◢
◤ ██ ／-
不..不要誤會，我不是針對你.. □–□-◢◤
我是說在座的各位，都是垃圾.... ▼ㄑ ◢
▼一 ／◣
http://www.youtube.com/watch?v=HWWMvpIhHNY
◢ /◣─ ◤ /█◣ ψdajidali
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 140.112.187.84
→
10/13 15:35,
10/13 15:35
→
10/13 15:36,
10/13 15:36
→
10/13 15:39,
10/13 15:39
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 140.112.187.84
推
10/13 16:21, , 1F
10/13 16:21, 1F
→
10/13 16:24, , 2F
10/13 16:24, 2F
推
10/13 17:12, , 3F
10/13 17:12, 3F
推
10/13 20:15, , 4F
10/13 20:15, 4F
→
10/13 20:20, , 5F
10/13 20:20, 5F
→
10/13 21:40, , 6F
10/13 21:40, 6F
Fortran 近期熱門文章
PTT數位生活區 即時熱門文章
