<em>// PascalABC.NET 3.2, сборка 1385 от 14.02.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin var y:=Range(2,36,2).Select(i->i*i).ToArray; y.Println end.
<u>Результат</u>
4 16 36 64 100 144 196 256 324 400 484 576 676 784 900 1024 1156 1296
Угадайте правило, по которому составлена последовательность, продолжите её:а) 2,2,4,8,32,256,8192...б) п,в,с,ч,п,с....в) 1,11,21
Мефродий
А) 2097152, каждый следующий произведение двух предыдущих
б) в, это вервые буквы дней недели
в) 1113213211, тут элементарно, даже писать не буду
г) 36 - 1, 200 - 2, справа от дефиса, кол-во "кружков" в записи числа
3) 45
4)
Program z4; Var b,a,i,m:integer; Begin read(b);for i:=1 to b do beginread(a);if a>0 and (a mod 2 = 0 )then m:=m+a; end;writeln(m);End.
Ответ:
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)
Объяснение: