Question

fortran语言怎样把一个字母从小写变成大写输出

Answer 1

这个是一个很有趣的问题，也是常常加密中会采取的一个思路 。
方法如下：假如是要把abcd变成ABCD
program 1
implicit none
integer i
integer strlen
integer,parameter::key=4
character(len=20)::string
write(*,*)"string:"
read(*,*)string
strlen=len_trim(string)
do i=1,strlen
string(i:i)=char(ichar(string(i:i))+key) !因为小写字母的ascii码要比大写的小4 所 以key=4
write(*,"('string:',a20)")string
end do
stop
end

Answer 2

转变成ASCII码，再转换回去就好了

Answer 3

CHARACTER C
! 此处略去字符型变量C的值的获得方式
IF (C.GE.'a'.AND.C.LE.'z') C = CHAR(ICHAR(C) - ICHAR('a') + ICHAR('A'))
! 以下内容省略