//PascalABC.NET 3.4.2
begin
var ar := arrrandom(100, -100, 100);
ar.Println.Take(5).Sum.Println;
ar.TakeLast(5).Sum.Println;
end.
const - служебное слово задающее программе константу, то есть неизменяемое значение.
Оно задаётся следующим образом:
const
Pi = 3.14;
Name = 'Михаил'
a = 123;
Cлужебное слово CONST в программе на языке PASCAL фиксирует начало раздела программы содержащего <em>константы.</em>
Одно из правил это : 1. Основное освещение не должно превышать по яркости саму яркость монитора. 2. Яркость и контрастность монитора, это нужно самому настраивать индивидуально только под себя. 3. Уровевь размещения монитора чтобы глаза смотрели на монитор а не под монитор. 4. работа закомпьютором не должна превышать 7-9 часов и перерыв для отдыха продолжительностью 15 минут, через каждый час работы
AB!AB+B = B, { т.к. A&!A = 0 }
(A+B)(!A+!B)=A!A+A!B+B!A+B!B = 0 + A!B+B!A + 0 = A&!B + B&!A
A+AB+AC = A(1+B+C)=A&1 = A
A+!AB+!AC = A+!A(B+C)
A(A+B+C)=AA+AB+AC=A+AB+AC=A(1+B+C)=A&1 = A
AB+!B+!AB =B(A+!A)+!B=B+!B = 1
(!A+B)!C(C+A!B) = !A!CC+!A!CA!B+B!CC+B!CA!B=0+0+B!C+B!CA!B =
!C(B+BA!B)=!C(B+0)=!CB
A(!B!C+BC)+A(B!C+!BC) = A!B!C+ABC+AB!C+A!BC =
A(!B!C+BC+B!C+!BC) = A(!B(!C+C)+B(C+!C)) = A(!B+B)=A
{т.к. (x+!x)=1}
---
A!(!B+C)=A&(B&!C) = AB!C
{т.к. !(x+y)=!x&!y }
!(A+!B)+!(A+B)+AB = !AB+!A!B+AB = !A(B+!B)+AB = !A+AB
A+!(A+B)+!AB = A+!A!B+!AB = A+!A(!B+B)=A+!A = 1
!(A+!B+!C) = !ABC
!(A+B)A!B = !AA!B + BA!B = 0 + 0 = 0
A+!(B!C)+!(!A+B+!C) = A+!B+C+A!BC = A(1+!BC)+C = A+C
(A+B+C)!(!A!B)+C=(A+B+C)(A+B)+C = AA+AB+BA+BB+CA+CB+C =
= A+BA+B+CA+CB+C = A(1+B)+B+C(A+B+1)=A+B+C
A!(!C+!B)+!(!A+B)C+AC = ACB+A!BC+AC = AC(B+!B+1)=AC
(A+B)(!A+B)(!A+!B)=(A!A+AB+B!A+BB)(!A+!B) =
= (0+B(A+!A+1))(!A+!B) = B(!A+!B) = B!A+B!B = B!A