编程问题

小猪爱睡觉

求问各位大神：

请问fortran有将一个数的不同位赋值给若干个数的方法吗？

比如说原数A为20180307，然后将A的各位赋值给三个数，如2018赋值给a，03赋值给b，07赋值给c。

烦请知道的大神解答，万分感谢！！！

lqouc

用字符串读取A，按照截取字符串转为实型或整形后赋值

weinihou

附议楼上

或者利用整除和取余来取不同位

Masterpiece

应用知识点：
一、整型向字符型的转换

1. integer num
   
2. character cnum
   
3. write(cnum,*) num

integer num<br /> character cnum<br /> write(cnum,*) num

二、字符串切片操作

1. character*11 string
   
2. character*4 a
   
3. string='01234567890'
   
4. a=string(4:7)

character*11 string<br /> character*4 a<br /> string='01234567890'<br /> a=string(4:7)

此时a='3456'

小猪爱睡觉

感谢各位的回答