<em><u>Современное решение:</u></em>
// PascalABC.Net 3.0, сборка 1066
begin
var k:=ReadInteger('Количество элементов в массиве: ');
var a:=ArrRandom(k,-25,25);
Writeln('Сгенерированный массив: ',a);
Writeln('Сумма четных элементов равна ',a.Where(x->x mod 2=0).Sum)
end.
<em><u>Тестовый прогон:</u></em>
Количество элементов в массиве: 15
Сгенерированный массив: [6,18,19,20,12,-20,7,19,-17,10,14,-25,10,-11,-13]
Сумма четных элементов равна 70
Ответ:
X ∨ (X ∧ Y) = X - закон поглощения
(X ∨ Y) ∨ Z = X ∨ (Y ∨ Z) - закон ассоциативности
X ∨ Y = Y ∨ X - закон коммутативности
=> (x ∧ y) ∨ (( x ∧ ¬z) ∨ y) = (x ∧ y) ∨ (y ∨ ( x ∧ ¬z)) = ((x ∧ y)∨ y) ∨ ( x ∧ ¬z) = (y ∨ (x ∧ y)) ∨ ( x ∧ ¬z) = y ∨ ( x ∧ ¬z)
Объяснение:
Сочные:вишня,яблоко,крыжовник,томат.
сухие:двухкрылатка,мак,пшеница,подсолнечник,орех.