求高手解答 - noip吧

level 2

蔷薇蓝之水楼主

我是一新手，有一问相求：给一个不多于三位的正整数，求出它是几位数，并分别打印出各位上的数字。

2014年07月13日 08点07分 1

level 2

蔷薇蓝之水楼主

求高手帮忙

2014年07月13日 08点07分 2

level 1

我爱舍瓦BM

char s[4];
scanf("%s\n",s);
printf("%d\n",strlen(s));
for(int i=0;i<strlen(s);i++)printf("%c ",s[i]);

2014年07月13日 10点07分 3

level 11

tym971008

把每一位用mod取出来

2014年07月13日 10点07分 4

level 2

蔷薇蓝之水楼主

最好是pascal语言的

2014年07月13日 11点07分 5

level 11

DanielDuanDD

var len,a:longint;
begin
read(a);
len:=0;
while a<>0 do
begin
len:=len+1;
writeln(a mod 10);
a=a div 10;
end;
writeln(len);
end.
话说我3年没写过PASCAL了……有什么弱智错误见谅……
不过重要的是理解方法，看代码只是理解的一个过程

2014年07月13日 11点07分 6

蔷薇蓝之水

谢谢

2017年08月11日 01点08分