[0715]JSOI Test digit

digit

时间限制:1秒内存限制: 64 MB

试题描述

JSOI2012夏令营开始了!
    报到的时间很长很无聊，于是，大家聚在一起玩一个数字接力游戏。游戏是这样的：任何一个人先报一个整数（据说，是报到处会计让某个学校交的费用~），比如6593，然后下一个人做这样一个工作：将这个整数中的各位数字全部取出，再将他们相乘得到一个新的整数，上面的例子就是6*5*9*3=810，然后立刻报出来。下一个人继续这样的工作，先取出810中的每一个数字再相乘，得到：8*1*0=0。得到了一个个位数，这儿是0，游戏就结束了。
    对于我们这些学习编程的同学来说，我们很快想到了用计算机编程模拟这一过程。
    你行吗？不行就只能上C层次了：）

输入要求

有多组测试数据（小于等于10组），以一个0表示结束。
每组数据为一个整数n(10 <= n <= 2000000000)。

输出要求

对于每组输入数据，输出一行，为按顺序输出游戏过程中产生的每一个数直到一个个位数结束。

输入样例

10
98886
0

输出样例

10 0
98886 27648 2688 768 336 54 20 0
Var n:string;
    ans:qword;
    i,j:longint;
    bo:boolean;
begin
readln(n);
while (n<>'0') do
begin
    write(n);
    while (n<>'0') do
    begin
      bo:=false;
      ans:=1;
      for i:=1 to length(n)do ans:=ans*(ord(n[i])-48);
      str(ans,n);
      if (ans<10) and (ans<>0)then
      begin
        writeln(' ',ans);
        bo:=true;
        break;
      end;
      if (n<>'0') then write(' ',n);
    end;
    if not bo then writeln(' ',0);
    readln(n);
end;
end.

转载于:https://www.cnblogs.com/shy-/archive/2012/07/16/2593247.html

[0715]JSOI Test digit相关推荐

[0715]Jsoi Test elevator
elevator 时间限制:1秒内存限制: 64 MB 试题描述夏令营报到结束了,回到宿舍干什么呢?根据教练员的安排,大家只能讨论一些往年JSOI夏令营的老题目.于是,N次参加夏令营的小X同学立 ...
[0715]Jsoi Test sequence
sequence 时间限制:1秒内存限制: 64 MB 试题描述由于夏令营第一天,童鞋们兴奋过了头,结果到了11:00,Mr.OldSheep查房的时候,发现小X同学还在宿舍里带头侃大山.于是, ...
HDOJ 1060 Leftmost Digit
Author Ignatius.L题目大意:1.第一行输入一个整数T代表接下来有T组测试数据.2.接下来的T行,每行输入一个整数(1<=N<=1,000,000,000).3.输出结果为N ...
npj Digit. Med. | 基于人工智能的FDA批准的医疗器械和算法现状
摘要人工智能(AI)/机器学习(ML)时代开始之际,人们对其寄予了很高的期望,专家们预见AI/ML在诊断.管理和治疗各种医疗条件方面显示出潜力.然而,AI/ML在日常临床实践中的实施障碍重重,尤其是 ...
Digit Sum II（ ABC044ARC060）
问题 G: Digit Sum II 时间限制: 1 Sec 内存限制: 128 MB 提交: 36 解决: 11 [提交][状态][讨论版][命题人:admin] 题目描述 For intege ...
hdoj Last non-zero Digit in N! 【数论】
找规律! 求N!最后非0位的值.比方2是120的最后一个不是0的值. 输入N比較大,要大数保存. 注意到最后0的个数是与5的因数的个数相等.设f(n)为n!的最后非0位. 那么f(n)=((n%5)! ...
stone/reverse/string/digit(完美消除)
stone/reverse/string/digit(完美消除) stone: [问题描述] 平平去海边度假,海边有一片美丽的鹅卵石滩.平平在鹅卵石滩上捡了 $n$ 块美丽的鹅卵石,并把它们排成一个 ...
洛谷 2953 [USACO09OPEN]牛的数字游戏Cow Digit Game
洛谷 2953 [USACO09OPEN]牛的数字游戏Cow Digit Game 题目描述 Bessie is playing a number game against Farmer John, ...
linux文件名通配符：* ？ [:digit:]数字 [:lower:]小写字母 [:upper:]大写字母
通配符命令简介: 匹配符合相关条件的符号,匹配文件名查找. 通配符类型: *:匹配任意长度的任意字符 ?:匹配任意单个字符 []:匹配指定范围内的任意单个字符 [^]:匹配指定范围之外的任意单个字符 ...
POJ 1150 The Last Non-zero Digit 《挑战程序设计竞赛》
为什么80%的码农都做不了架构师?>>> POJ 1150 The Last Non-zero Digit超大组合数:求超大组合数P(n, m)的最后一个非零位.4.1更加复杂 ...

[0715]JSOI Test digit

[0715]JSOI Test digit相关推荐

最新文章

热门文章