Largest proper divisor of n: Difference between revisions

m
→‎{{header|Ring}}: aligned columns
No edit summary
m (→‎{{header|Ring}}: aligned columns)
Line 1,444:
 
=={{header|Ring}}==
<lang ring>? "working..."
see "working..." + nl
see "Largest proper divisor of n are:" + nl
see "1 "
row = 1
limit = 100
? "Largest proper divisor ofup to " + limit + n" are:"
 
see " 1 "
rowcol = 1
for n = 2 to limit
for m = 1 to n-1 >> 1
if n % m = 0 div = m ok
div = m
ok
next
rowif =div row< +10 1see " " ok
see "" + div + " "
if rowcol++ % 10 = 0 ? "" ok
see nl
ok
next
see? "done..." + nl</lang>
{{out}}
see "<pre>working..." + nl
see "Largest proper divisor ofup nto 100 are:" + nl
1 1 1 2 1 3 1 4 3 5
1 6 1 7 5 8 1 9 1 10
7 11 1 12 5 13 9 14 1 15
1 16 11 17 7 18 1 19 13 20
1 21 1 22 15 23 1 24 7 25
17 26 1 27 11 28 19 29 1 30
1 31 21 32 13 33 1 34 23 35
1 36 1 37 25 38 11 39 1 40
27 41 1 42 17 43 29 44 1 45
13 46 31 47 19 48 1 49 33 50
done...</pre>
 
see "done..." + nl
</lang>
{{out}}
<pre>
working...
Largest proper divisor of n are:
1 1 1 2 1 3 1 4 3 5
1 6 1 7 5 8 1 9 1 10
7 11 1 12 5 13 9 14 1 15
1 16 11 17 7 18 1 19 13 20
1 21 1 22 15 23 1 24 7 25
17 26 1 27 11 28 19 29 1 30
1 31 21 32 13 33 1 34 23 35
1 36 1 37 25 38 11 39 1 40
27 41 1 42 17 43 29 44 1 45
13 46 31 47 19 48 1 49 33 50
done...
</pre>
=={{header|Ruby}}==
<lang ruby>require 'prime'