
请各位高手用Fortran 帮我编写一道题目 题目:输入一个字母,显示它是大写还是小写字母。 感激不尽。
2个回答
展开全部
IMPLICT NONE
CHARACTER ::C
WRITE(*,*) '请输入一个字符'
READ(*,'(A1)') C
IF ( C.GE.'A' .AND. C.LE.'Z') THNE
WRITE(*,*) '输入的字母', C, '是大写字母'
ELSEIF ( C.GE.'a' .AND. C.LE.'z') THNE
WRITE(*,*) '输入的字母', C, '是小写字母'
ENDIF
END
CHARACTER ::C
WRITE(*,*) '请输入一个字符'
READ(*,'(A1)') C
IF ( C.GE.'A' .AND. C.LE.'Z') THNE
WRITE(*,*) '输入的字母', C, '是大写字母'
ELSEIF ( C.GE.'a' .AND. C.LE.'z') THNE
WRITE(*,*) '输入的字母', C, '是小写字母'
ENDIF
END
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询