Question

fortran90 中输入一个字母，显示它是大写还是小写，我编的老是有问题，求高手解答

implicit none
CHARACTER ::i,c
read*,i,c
c=iachar(i)
if c>=65.and.c<=90 then
print*,"输入的是大写字母"
else
if c>=97.and.c<=122 then
print*,"输入的是小写字母"
endif
end

Answer 1

把条件用括号括起来就可以了。另外，注意iachar是fortran95及以后标准的编译器才支持的函数，如果是你的只支持fortran90，建议用ichar。

if (c>=65.and.c<=90) then
....
if (c>=97.and.c<=122) then

Answer 2

输入的是大写字母 ，，输入的是小写字母必须翻译成英语写进去。
FORTARN原程序界面不能直接输入中文。