Fortran Coder

查看: 120|回复: 5

[输入输出] 怎么输出时去掉整型变量前面的空格?

[复制链接]

3

帖子

1

主题

0

精华

入门

F 币
37 元
贡献
17 点
发表于 2020-11-15 08:41:51 | 显示全部楼层 |阅读模式
Integer(kind=4), Allocatable :: Elem2Nod(:,:)


Write(21,*)Elem2Nod(temp_i,1),Elem2Nod(temp_i,2),Elem2Nod(temp_i,3)

上面只是关键代码,并未列出全部。
输出的三个整数,每个整数的前面都有很长的空格,但是因为这些整数的变化范围很大,并不能确定有几位数,可否有办法,将它们前面的空格去掉?





回复

使用道具 举报

2

帖子

0

主题

0

精华

新人

F 币
25 元
贡献
9 点
发表于 2020-11-15 09:21:46 | 显示全部楼层
先写到一个字符变量中,然后将字符变量中的空格去掉。

32

帖子

0

主题

0

精华

熟手

F 币
266 元
贡献
122 点

规矩勋章新人勋章元老勋章

QQ
发表于 2020-11-15 10:50:35 | 显示全部楼层
Write(21,'(*(g0,1x))') Elem2Nod(temp_i,1:3)
彼岸,有永恒的守候...

3

帖子

1

主题

0

精华

入门

F 币
37 元
贡献
17 点
 楼主| 发表于 2020-11-16 08:31:29 | 显示全部楼层
青衣巷 发表于 2020-11-15 10:50
Write(21,'(*(g0,1x))') Elem2Nod(temp_i,1:3)

采用“g0”,0表示没有宽度? 可行吗?

3

帖子

1

主题

0

精华

入门

F 币
37 元
贡献
17 点
 楼主| 发表于 2020-11-16 08:34:52 | 显示全部楼层
caiqingdong 发表于 2020-11-15 09:21
先写到一个字符变量中,然后将字符变量中的空格去掉。

     write(filename1,'(I10)')Elem2Nod(temp_i,1)
非常感谢,在网上找到类似上面的关键代码,已经实现目标。谢谢!

32

帖子

0

主题

0

精华

熟手

F 币
266 元
贡献
122 点

规矩勋章新人勋章元老勋章

QQ
发表于 2020-11-16 09:02:32 | 显示全部楼层
mastergxm 发表于 2020-11-16 08:31
采用“g0”,0表示没有宽度? 可行吗?

just try it~
彼岸,有永恒的守候...
您需要登录后才可以回帖 登录 | 极速注册

本版积分规则

QQ|捐赠本站|Archiver|关于我们 About Us|群聊|Fcode

GMT+8, 2020-12-5 09:50

Powered by Discuz! X3.2

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表