作者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