作者hero11 ( )
看板Fortran
標題Re: [問題] 簡單的問題
時間Wed Dec 21 21:46:41 2011
※ 引述《hero11 ( )》之銘言：
: ※ 引述《hero11 ( )》之銘言：
: : 字串 s1 = 'hi'
: : 字串 s2 = ' how are you'
: : 我想要讓結果可以輸出 'hi how are you'
: : write(*,*) s1+s2
: : 無法成功 請問要怎麼改?
: : 我是fortran 新手~
那我要用陣列呢??
字元變數 test
字元陣列 s(5) 內容物為[a b c d e]
do i = 1,5
test=test//s(i)//';'
enddo
write(*,*) test
結果程式跑出來怪怪的,沒有到我預期的結果
我想要的結果是 ==> a;b;c;d;e;
該怎麼改呢?!
: 那如果我要迴圈呢?
: 假設我有 S 字串陣列 ==> 內容是 A B C D E F ...
: 我想要在每一個英文字母中插入分號並輸出
: 讓結果能顯示出以下的效果
: A;B;C;D;E;F;....
: 所以我想知道在FORTRAN裡面是怎麼處理字串相加的?
: 我可以讓一個Character ==> s
: s = s1 + s2 ?? 這樣嗎?
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 163.13.115.87
※ 編輯: hero11 來自: 163.13.115.87 (12/21 21:49)
1F：推 terryys:檢查字串長度夠不夠，然後要test=trim(test)//s(i)//';' 12/21 22:16
2F：→ terryys:因為test在後面加一點東西會比test長，需要trim把空白去掉 12/21 22:17
3F：→ hero11:謝謝 我成功了!! 12/22 00:32
4F：→ hero11:另外我想請問要怎麼剪除字串 12/22 00:32
5F：→ hero11:假設我想把a;b;c;d;e; 減為 a;b;c;d;e (少一個分號) 12/22 00:33
6F：→ Semisphere:就在迴圈裡改一下，i=5時不要補分號 12/22 09:56
7F：→ hero11:解決了!! 那我再問一個 要怎麼real值轉成character ? 12/22 12:21
8F：→ Semisphere:/字串 詳見read用法 12/22 13:18
9F：→ hero11:那個好像是字串轉整數 我想要的是將浮點數轉字串 12/22 13:55
10F：推 terryys:write(字串,格式) 浮點數 12/22 14:22