Fortran编程题

来源：百度知道 编辑：UC知道 时间：2024/05/30 22:39:25
如何用fortran编程，使得输入一个单词，将它按逆序打印出来？

Program Baidu_Know
!// Write By Steven
Character(Len=256) :: cWord = "" , cWord_s = ""
Integer :: i , iLen
Read( * , * ) cWord
iLen = Len_Trim( cWord )
Do i = 1 , iLen
cWord_s( i:i ) = cWord( iLen - i + 1 : iLen - i + 1 )
End Do
Write( * , * ) Trim( cWord_s )
End Program Baidu_Know