fortran - 连接两个整数

Question

在 Fortran 中将两个整数连接到一个整数的最佳方法是什么？

integer a = 999
integer b = 1111

integer c应该是 9991111
谢谢，
SM。

Answer 1

这是一个示例代码，可以满足您的需求。它将整数写入字符串，修剪并连接它们，然后从连接的字符串中读取结果整数:

integer :: a,b,c
character(len=99) :: char_a,char_b,char_c

a = 999
b = 1111

write(unit=char_a,fmt=*)a
write(unit=char_b,fmt=*)b

char_c = trim(adjustl(char_a))//trim(adjustl(char_b))

read(unit=char_c,fmt=*)c

print*,c

end

编辑:请注意，此示例适用于任何整数长度，假设它们适合各自的 kind (没有整数溢出)。