Как сделать powerpoint, чтобы при наведении на один объект менял например цвет другой объект?

1и 3)var ar: array[1..50] of integer; i,k,min: integer; begin; min: =100; writeln('array: '); for i: =1 to 50 do begin;   ar[i]: =random(10)-5;   write(ar[i]: 4);   if ar[i]=0 then inc(k);   if ar[i]< min then min: =ar[i]; end; writeln; writeln('0: ',k); writeln('min: ',min); end. 2) var ar: array[1..40] of integer; i,k: integer; begin; writeln('array: '); for i: =1 to 40 do begin;   ar[i]: =random(10)-5;   write(ar[i]: 4);   if ar[i]> 1 then inc(k); end; writeln('result: ',k); end.

например, это можно сделать так:

UPD: изменено

#include <iostream>

#include <set>

#include <cmath>

using namespace std;

bool prime(int n){

   for(int i = 2; i * i <= n; i++)

       if(n % i == 0)

           return false;

   return true;    

}

signed main() {

   int n;

   cin >> n;

   set<int> ok;

   ok.insert(2);

   ok.insert(3);

   ok.insert(5);

   int sum = 0, cnt = 0,cur = 2;

   while(cnt != n){

       bool norm = true;

       for(int i = 2; i * i <= cur; i++)

           if(cur % i == 0 && ( ok.find(i) == ok.end() && prime(i)) || (cur % (n/i) == 0 && ok.find(n/i) == ok.end() && prime(n/i)))

               norm = false;

       if(norm){sum += cur; cnt++;}

       cur++;

   }

   cout << sum;

}