Такой вид информации называется осязанием
Function func1(a As Double) As Double
Dim i As Integer, b As Double
i = 1 - Sgn((Abs(a) - a) / 2)
b = Sqr(a * i)
a = a * 2 + i * (b - 2 * a)
func1 = a
End Function
1)
#include <iostream>
#include <math.h>
using namespace std;
int main() {
int n, sum = 0, k;
cin >> n >> k; //ввести размерность массива и требуемое k
int a[n];
for(int i = 0; i < n; i++) {
cin >> a[i]; //вводим массив
if(a[i]%k == 0) { cout << a[i] << endl; sum+=a[i]; }
}
cout << sum << endl;
}
2)
#include <iostream>
#include <math.h>
using namespace std;
int main() {
int n, sum = 0, k;
cin >> n;
int a[n], b[n], lenB = 0;
for(int i = 0; i < n; i++) {
cin >> a[i]; //вводим массив
if(a[i] == 0) b[lenB++] = i;
}
for(int i = 0; i < lenB; i++) cout << b[i] << ' ';
cout << endl;
}