Fortran Coder

查看: 13251|回复: 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 币
29 元
贡献
9 点
沙发
发表于 2020-11-15 09:21:46 | 只看该作者
先写到一个字符变量中,然后将字符变量中的空格去掉。

81

帖子

0

主题

0

精华

专家

F 币
471 元
贡献
232 点

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

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 点
5#
 楼主| 发表于 2020-11-16 08:34:52 | 只看该作者
caiqingdong 发表于 2020-11-15 09:21
先写到一个字符变量中,然后将字符变量中的空格去掉。

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

81

帖子

0

主题

0

精华

专家

F 币
471 元
贡献
232 点

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

QQ
6#
发表于 2020-11-16 09:02:32 | 只看该作者
mastergxm 发表于 2020-11-16 08:31
采用“g0”,0表示没有宽度? 可行吗?

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

本版积分规则

捐赠本站|Archiver|关于我们 About Us|小黑屋|Fcode ( 京ICP备18005632-2号 )

GMT+8, 2024-12-26 12:04

Powered by Tencent X3.4

© 2013-2024 Tencent

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