Amicable pairs: Difference between revisions

Content deleted Content added

Inline

@@ Line 5,939: / Line 5,939: @@
 :18416
 Execution Time: 162 seconds</pre>
+=={{header|Vlang}}==
+{{trans|Go}}
+<lang Go>fn pfac_sum(i int) int {
+    mut sum := 0
+    for p := 1;p <= i/2;p++{
+        if i%p == 0 {
+            sum += p
+        }
+    }
+    return sum
+}
+fn main(){
+    a := []int{len: 20000, init:pfac_sum(it)}
+    println('The amicable pairs below 20,000 are:')
+    for n in 2 .. a.len {
+        m := a[n]
+        if m > n && m < 20000 && n == a[m] {
+            println('${n:5} and ${m:5}')
+        }
+    }
+}</lang>
+{{output}}
+<pre>
+The amicable pairs below 20,000 are:
+and   284
+and  1210
+and  2924
+and  5564
+and  6368
+and 10856
+and 14595
+and 18416
+</pre>
 =={{header|Wren}}==