1樓:字元魔法師
簡單說,你需要以二進位制的方式處理這個資料檔案。
1)二進位制檔案、文字檔案在Fortran中是兩種讀寫格式,概念要清楚。
2)要知道二進位制檔案內部的資料結構,否則的話沒辦法讀出來。
下面是我的示例,題主願意搜的話還有很多例子。
integer(4
)::fncharacter
(len
=255)::
file_name
integer(4
)::struct_len
integer(4
)::iso,
isrtype
::recOne_t
character
(len=84
),dimension(3
)::label
character
(len=6
),dimension
(400)::
constName
real(8
),dimension(3
)::timeData
integer(4
)::numConst
real(8
)::AUreal(8
)::EMRAT
integer(4
),dimension(3
,0:11
)::coeffPtr
integer(4
)::DENUM
integer(4
),dimension(3
)::libratPtr
integer(4
)::RSize
end type
type
::recTwo_t
real(8
),dimension
(400)::
value
end type
type
(recOne_t)::
rec_one
type
(recTwo_t)::
rec_two
struct_len
=sizeof
(rec_two
)open
(unit=fn
,file
=trim
(file_name
),Access
='DIRECT'
,status
='OLD'
,Form
='Unformatted'
,RECL
=struct_len
,iostat
=iso
)read(fn
,rec=1
,iostat
=isr
)rec_one
read(fn
,rec=2
,iostat
=isr
)rec_two
close(fn
)注:在Fortran中以二進位制開啟檔案open時要指定Access ='DIRECT', Form ='Unformatted' 與RECL = struct_len,其中struct_len是內部結構TYPE(在Fortran77中結構是RECORD定義的)的長度,也是每個記錄條目的長度。讀、寫的時候使用rec=n指定操作的第n個結構條目。
2樓:筱傑
因為不知道你檔案的格式長什麼樣,也不知道你問的是什麼語言,只能隨便寫了幾種給你參考。
這些都是基礎知識,隨便搜一下都有很多文章,建議下次自己想辦法解決。
C:int
ReadFile
(const
char
*filepath
,char
*buffer
,int
length
)size_t
count
=fread
(buffer,1
,length,fp
);fclose(fp
);return
count;}
C++:
intReadFile
(std
::string
filepath
,char
*buffer
,int
length)in
.read
(buffer
,length
);returnin.
gcount
();}
C#:var
bytes
=File
.ReadAllBytes
(filepath
);建議下次問問題前,先學會如何提問
大二進律所實習能做什麼?
牛逼的果果爹 如果你下定決心要做律師,那去律師事務所就有很多的事情要做要觀察了。如果你的時間足夠長 三個月起步 系統下來乙個訴訟案子怎麼辦,會走過哪些流程,仲裁案子的各種步驟,顧問單位會有哪些奇奇怪怪的問題都會有一些具體的了解。 張小林 題主才大二,進去暑期實習的話,其實學習大於工作的,多跟公司內部...
里昂二大語言中心?
這邊的行政巨無敵坑爹,你選了intensif也不一定有,去了會發現直接給你分到semi因為intensif人不夠沒開成!但他是不會提前跟你說的! 滋滋 你好,曾在里昂二大的語言中心就讀過一年。讀了乙個學期的強化班和乙個學期的半強化班。總體而言那一年的就讀體驗是愉悅的。的確第一學期強化班的時候班上十幾...
關於喀納斯門票,一進,二進門加車什麼意思?
1 喀納斯景區門票185元 門票半價優惠政策 65 69歲老人,4 6級殘疾人,6 18歲學生 憑身份證購買 18歲以上本科學歷以下學生 憑學生證或准考證購買 2 觀光車收費標準 序號專案全價票1觀魚臺旅遊觀光車往返60元 人次,單程30元 人次2喀納斯旅遊觀光車一次進入100元 人次,二次進入增加...