Product of decimal digits of n

From Rosetta Code
Revision as of 07:12, 25 June 2021 by CalmoSoft (talk | contribs) (Created page with "{{Draft task}} ;Task: <br><br> =={{header|Ring}}== <lang ring> load "stdlib.ring" see "working..." + nl see "Product of decimal digits of n:" + nl row = 0 limit = 100 for...")
(diff) ← Older revision | Latest revision (diff) | Newer revision → (diff)
Product of decimal digits of n is a draft programming task. It is not yet considered ready to be promoted as a complete task, for reasons that should be found in its talk page.
Task



Ring

<lang ring> load "stdlib.ring" see "working..." + nl see "Product of decimal digits of n:" + nl

row = 0 limit = 100

for n = 1 to limit

   prod = 1
   strn = string(n)
   for m = 1 to len(strn)
       prod = prod * number(strn[m])
   next    
   see "" + prod + " "
   row = row + 1
   if row%5 = 0
      see nl
   ok

next

see "done..." + nl </lang>

Output:
working...
Product of decimal digits of n:
1 2 3 4 5 
6 7 8 9 0 
1 2 3 4 5 
6 7 8 9 0 
2 4 6 8 10 
12 14 16 18 0 
3 6 9 12 15 
18 21 24 27 0 
4 8 12 16 20 
24 28 32 36 0 
5 10 15 20 25 
30 35 40 45 0 
6 12 18 24 30 
36 42 48 54 0 
7 14 21 28 35 
42 49 56 63 0 
8 16 24 32 40 
48 56 64 72 0 
9 18 27 36 45 
54 63 72 81 0 
done...