继续学习Fortran。今天的作业是英文字母大小写转换,即大写字母转换为小写字母,小写字母转换为大写字母。
这道题主要是考查字符与ASCII码之间的转换。依据规则,小写字母的ASCII码减32就是大写字母的ASCII码,同样,大写字母的ASCII码加32就是小完蛋字母的ASCII码。然后再转换为字符。
字符转ASCII函数:ichar();ASCII转字符函数:char();字符长度函数:len_trim()。
代码输入:
program test15implicit 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 stopend program test15
朋友们看到代码中有\”GE\”,\”LE\”,\”AND\”等,其实这是Fortran的特色运算符:
关系运算符
新版的Fortran中,也可以直接用>,=等数学符号。
逻辑运算符
掌握了Fortran基础语法,后面的作业就有些难度了,下期见,让我们一起学Fortran。
本文内容由互联网用户自发贡献,该文观点仅代表作者本人。如发现本站有涉嫌抄袭侵权/违法违规的内容,请发送邮件至 5733401@qq.com 举报,一经查实,本站将立刻删除。本文链接:https://fajihao.com/i/147077.html