继续学习Fortran。今天的作业是英文字母大小写转换，即大写字母转换为小写字母，小写字母转换为大写字母。
这道题主要是考查字符与ASCII码之间的转换。依据规则，小写字母的ASCII码减32就是大写字母的ASCII码，同样，大写字母的ASCII码加32就是小完蛋字母的ASCII码。然后再转换为字符。
字符转ASCII函数：ichar（）；ASCII转字符函数：char（）；字符长度函数：len_trim（）。
代码输入：
program test15
implicit none
integer::i
character(len=20)::str_s
write(*,*)"输入字符串:"
read(*,*)str_s
do i=1,len_trim(str_s),1
if(str_s(i:i).GE."a".AND.str_s(i:i).LE."z") then
str_s(i:i)=char(ichar(str_s(i:i))-32)
else
if(str_s(i:i).GE."A".and.str_s(i:i).LE."Z") then
str_s(i:i)=char(ichar(str_s(i:i)) 32)
end if
end if
end do
write(*,*)"转换后:",str_s
pause
stop
end program test15
朋友们看到代码中有"GE","LE","AND"等，其实这是Fortran的特色运算符：
关系运算符
新版的Fortran中，也可以直接用>,<,>=等数学符号。
逻辑运算符
掌握了Fortran基础语法，后面的作业就有些难度了，下期见，让我们一起学Fortran。
Fortran我也是初学，好久不写代码了，欢迎朋友们指正。
