В алгебре логики применяются только три операции: конъюнкция (или логическое умножение, обозначается обычно ∧), дизъюнкция (или логическое сложение, обозначается обычно ∨) и инверсия (отрицание, обозначается чаще
¬). Так же, в алгебре логики, в отличие от математики, может быть получено только
два результата выражения, каким бы оно не было - это 1 (истина, true) или 0 (ложь, false). Так же, именно с этими символами проводят операции. Алгебраических операций куда больше: умножение, деление, сложение, вычитание, возведение в степень, корень N-ой степени, синусы, косинусы... Я, конечно, не всё перечислил, но разница ощутима. И числа, над которыми проводятся операции, тоже разнообразны, т.к. операции в математике проводятся над числами из десятичной системы счисления. Следовательно, результат операций в математике может получиться любой (в пределах десятичной системы счисления).
Var a:array[1..15] of integer; i, cnt:integer; begin For i:= 1 to 15 do begin Read(a[i]); if (a[i] mod 2 = 0) then cnt:= cnt+1; end; Writeln(cnt); end.
var i,a,N:integer; sr:real; begin write('Vvedite N = '); readln(N); // Вводите количество чисел в массиве и одновременно вводите диапозон массива от 1 до N randomize; for i:=1 to N do begin a:=random(N); write(a,' '); sr:=sr+a; //Значения массива складываются end; sr := (sr / N); //Сумма значений массива делится на количество значений writeln('srednee arifmeti4eskoe = ',sr:1:2); //Выводится среднее арифметическое readln; end.