作者sunnywei (魏桑)
看板Fortran
標題[問題] 讀取文字和數值的問題
時間Fri Mar 30 01:52:51 2012
各位大大好~
最近要讀一筆資料
#RecordLength(sec): 44.00
我主要是想讀 44.00那個數值
我的概念是
先把前面文字讀掉 在讀後面的值
所以我寫成 read (10,'(a21,a5)') length,sec
文字得格式 應該是沒問題
但是我後面那個SEC 讀到的卻是另外一個差異很大值(幾乎=0)
之後又想到另外一種
read(10,'(a21)') length
read(10,'(a5)') sec
這樣讀兩層...
但是出來的值卻變得非常大
實在是令我非常苦惱啊!!
拜託各位大大解惑啊!!
--
j&= y+ y* jv+ yy-v v &
wE!" j17$T 7MPC NU$E- Ej&v-
O*K^ yHH:Ovm+ UMMK BMNTO: H1="7'
jO&OH: "OH7"E~ U0H1 BB71` jCf'U:
vM1H1 jB-j1 wHhHh*-/$B]B- BKJUK
^HI'OH j""^N1 "OHOK~ H$H"Da jP'N ^ 這次，是我的真心話...
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 220.132.38.13
1F：→ awer89:A21,F5.2 ?? 03/30 02:00
2F：推 btoker:REAL::SEC 03/30 09:49
3F：→ btoker:READ(10,"(A80)") LENGTH 03/30 09:49
4F：→ btoker:IF(LENGTH(1:19)=="#RecordLength(sec):") THEN 03/30 09:50
5F：→ btoker:READ(LENGTH(23:),*) SEC 03/30 09:50
6F：→ btoker:END IF 03/30 09:50
7F：→ btoker:WRITE(*,*)SEC 03/30 09:50
8F：推 kkarthur:READ(10,*) length,sec 即可 03/30 10:22
9F：推 btoker:@@" 我傻了 03/30 10:47
解決了 果真 READ(10,*) length,sec 即可...
其實這個 格式是我從別人的格式中COPY下來的
所以完全不了解在幹嘛== 只知道數字代表格數...
多謝大家的幫忙 也謝謝MKKAR大的幫忙 感恩
※ 編輯: sunnywei 來自: 220.132.38.13 (03/30 19:49)