连接两个整数

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(无整数溢出).