请问高手,在Fortran90里面,要编一个程序:输入一个字母,判断它的大小写,如何编,谢谢了!
展开全部
！简单示例一下,意思应该出来了。
program main
implicit none
character(len=1)::str
read(*,*) a
if (a .le. 'z' .and. a .gt. 'a') then
write(*,*) "小写字母"
else if (a .le. 'Z' .and. a .gt. 'A') then
write(*,*) "大写字母"
else
write(*,*) "非英文字母"
end if
end program main
program main
implicit none
character(len=1)::str
read(*,*) a
if (a .le. 'z' .and. a .gt. 'a') then
write(*,*) "小写字母"
else if (a .le. 'Z' .and. a .gt. 'A') then
write(*,*) "大写字母"
else
write(*,*) "非英文字母"
end if
end program main
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
