大写字输出，怎么样用fortran95语言编写程序
1个回答
展开全部
character:: c
read(*,*) c
if ( c.ge.'激桥a' .and. c.le.'孙宏z'则铅册) c = char(ichar(c) - ichar(a) + ichar(A))
write(*,*) c
end
read(*,*) c
if ( c.ge.'激桥a' .and. c.le.'孙宏z'则铅册) c = char(ichar(c) - ichar(a) + ichar(A))
write(*,*) c
end
本回答由网友推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
