Re: [問題] 簡單的問題

[hero11 ( )]

※ 引述《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)
推 terryys:檢查字串長度夠不夠，然後要test=trim(test)//s(i)//';'
→ terryys:因為test在後面加一點東西會比test長，需要trim把空白去掉
→ hero11:謝謝 我成功了!!
→ hero11:另外我想請問要怎麼剪除字串
→ hero11:假設我想把a;b;c;d;e; 減為 a;b;c;d;e  (少一個分號)
→ Semisphere:就在迴圈裡改一下，i=5時不要補分號
→ hero11:解決了!!  那我再問一個 要怎麼real值轉成character ?
→ Semisphere:/字串 詳見read用法
→ hero11:那個好像是字串轉整數  我想要的是將浮點數轉字串
推 terryys:write(字串,格式) 浮點數