Free pascal怎么求一个数的位数输入随意一个数,输出它的位数.还有,这个题请不要用字符串做,

发布时间：2021-03-07 18:35:49

Free pascal怎么求一个数的位数输入随意一个数,输出它的位数.还有,这个题请不要用字符串做,只能用整数的变量

网友回答

varn,ans:longint;
beginreadln(n);
ans:=0;
while n>0 dobegininc(ans);
n:=n div 10;
end;writeln(ans);
end.
以上问题属网友观点，不代表本站立场，仅供参考！