设定一个任意数字串,数出这个数中的偶数个数,奇数个数,及这个数中所包含的所有位数的总数,例如：1234

来源：学生作业帮编辑：搜狗做题网作业帮分类：综合作业时间：2024/05/06 00:40:05

设定一个任意数字串,数出这个数中的偶数个数,奇数个数,及这个数中所包含的所有位数的总数,例如：1234
1..总：数出该数数字的总个数,本例中为 10 个.新数：“偶-奇-总” 的位序,排出得到新数为：5510.重复：将新数5510按以上算法重复运算,可得到新数：134.如此反复操作下去,最后总是达到一个神秘的数,请编程求出这个神秘的数.

此神秘的数为123.
Pascal代码如下：
var a,b,n,t:longint;
begin
readln(n);
repeat
while n>0 do
begin
t:=n mod 10;
if not odd(t) then inc(a) else inc(b);
n:=n div 10;
end;
if a+b>9 then n:=a*1001+b*101
else n:=a*101+b*11;
writeln(n); a:=0; b:=0;
until n=123;
end.

设定一个任意数字串,数出这个数中的偶数个数,奇数个数,及这个数中所包含的所有位数的总数,例如：1234 2.设定一个任意数字串,数出这个数中的偶数个数,奇数个数,及这个数中所包含的所有位数的总数,例如：12 在java中输入一个数,判断并输出这个数中包含的奇数,偶数和零数字的个数在excel中如何统计一个数中小于某个一位数的个数,例如1234这个四位数中,小于2的数有几个? 有一个四位数,它的第一个数字等于这个数中数字0的个数,第二个数字等于这个数中数字的个数, 一个数所有奇数位数之和与所有偶数位数之和的差是11的倍数,这个数就能被11整除,为什么呢? 一个四位数,它的第一个数字等于这个数中数字0的个数,第2个数等于这个数中数字1的个数,求这个四位数 VB编程题:任意输入10个整型数,显示其中奇数和偶数的个数,.. 一个四位数，它的第一个数字等于这个数中数字0的个数，第二个数字表示这个数中数字1的个数，第三个数字表示这个数中数字2的个求四位数的偶数中,所有个位数字之和是24的倍数的数的个数数出下图中所有三角形的个数有100个自然数,它们的和是2000,这些数中奇数的个数比偶数的个数少,这些数中至多有多少奇数?