aboutsummaryrefslogtreecommitdiff
path: root/challenge-262/deadmarshal/d/ch2.d
blob: 15f5611282f5deb87fd3d4e721e512b579ae6dd6 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
import std.stdio:writeln;

size_t count_equal_divisible(int[] arr, int k)
{
  size_t count = 0;
  foreach(i;0..arr.length-2){
    foreach(j;i+1..arr.length-1){
      if((arr[i] == arr[j] && ((i*j) % k == 0))) ++count;
    }
  }
  return count;
}

void main()
{
  int[] arr = [1,3,2,2,2,1,3];
  int[] arr2 = [1,2,3];
  writeln(count_equal_divisible(arr,2));
  writeln(count_equal_divisible(arr2,1));
}