输入一个正整数，判断它的位数 用fortran程序 急急急急急急急急急急 100
展开全部
输入正整数的部分没研究过，不知道你是想从哪里输入一个数
判断位数可以用下面这个试试
do i=1, 999
if (x/(10.0**i)<1.0)
write(*,*) '位数',i
endif
enddo
判断位数可以用下面这个试试
do i=1, 999
if (x/(10.0**i)<1.0)
write(*,*) '位数',i
endif
enddo
本回答被网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
