Заполните массив случайными числами в [0, 1000] и вычислите разность максимального среди элементов, имеющих чётные значения, и максимального среди элементов, имею- щих нечётные значения, в заданном целочисленном массиве из 30 положительных эле- ментов (в предположении, что в массиве есть и чётные, и нечётные элементы)

// PascalABC.NET 3.2, сборка 1389 от 01.03.2017
//Внимание! Если программа не работает, обновите версию!
begin
writeln('исходный массив:');
var a:=ArrRandom(30,0,1000).Println();
writeln('разность: ',a.Where(x->x mod 2=0).Max()-a.Where(x->x mod 2<>0).Max());
end.

Var
A:array[1..30] of integer;
i,Mc,Mn:integer;

Begin
For i := 1 to 30 do
    Begin
    A[i]:=random(1001);
    if A[i] mod 2 = 0 then Mc:=A[i]
    else Mn:=A[i];
    Write(A[i],' ');
    End;
WriteLn;

For i:= 1 to 30 do
    if (Mc<A[i])and(A[i] mod 2 = 0) then Mc:=A[i]
    else if (Mn<A[i])and(A[i] mod 2 <> 0) then Mn:=A[i];

WriteLn(Mc,' - ',Mn,' = ',Mc-Mn);
End.

140

Объяснение:

ландыши & васильки - 650

ландыши & лютики - 230

ландыши & (васильки | лютики) - 740

ландыши & васильки & лютики - ?

ландыши & (васильки | лютики) = (ландыши & васильки) | (ландыши & лютики) - распределительный закон

Обозначим:

ландыши & васильки = А

ландыши & лютики = В

Тогда:

ландыши & васильки & лютики = А & В (ландыши & васильки & ландыши & лютики = ландыши & васильки & лютики - закон повторения)

А | В = А + В - А & В

А & В = А + В - А | В

А & В = 650 + 230 - 740 = 140

#include <iostream>

#include <cmath>

#include <algorithm>

#include <vector>

using namespace std;

int absSum(vector<int> &k){

   int sum = 0;

   for(auto &i: k) sum += abs(i);

   return sum;

}

void solve(){

   int n, m;

   cin >> n >> m;

   vector<vector<int>> a(n, vector<int> (m));

   for(vector<int> &i: a)

       for(int &j: i)

           cin >> j;

   pair<int, int> ans = {absSum(a[0]), 0};

   for(int i = 1; i < n; i++){

       int curSum = absSum(a[i]);

       if(curSum > ans.first) ans = {curSum, i};

   }

   cout << "Line #" << (ans.second + 1) << " has the biggest absolute sum: " << ans.first;

}

signed main() {

   solve();

}