逆序打印单词

lihu8918

[Fortran] 纯文本查看 复制代码

Do i=1, len(a)
  b(i:i)=a(len(a)+1-i:len(a)+1-i)
End Do