Потрібно скачати SWEET.TV зареєструватися вибрати платний фільм і ввести промокод і все O3WB6FI6Q9 Ви иможете обрати любий фільм на ваш смак .

1. 1v1=1 ,  1∧0=0 ,  ¬0=1

2. ¬А=1, ВvС=0, Д∧С=1

Объяснение:

1

AvВ, если А = 1, В = 1           1v1=1

A ∧ B, если A = 1, B = 0        1∧0=0

¬ А, если А= 0                      ¬0=1

2.     1. инверсия – это логическое отрицание, в данном случае высказывание А не истинно, значит не(не истина)=истинна

2. Дизъюнкция – логическое сложение будет истинным тогда, когда хотя бы одно исходное высказывание истинно, так как В-ложь и С ложь, то ВvС=0

3. Конъюнкция – логическое умножение будет истинным тогда, когда оба исходных выражения истинны. Т.к. Д и С истинны, то и результат истина, т.е. =1

Const
  n=20;
var
  p:array[1..n] of integer;
  i,k,s:integer;
begin
  Randomize;
  Writeln('Последовательность чисел');
  for i:=1 to n do
  begin
    p[i]:=Random(51)-25;
    Write(p[i],' ')
  end;
  Writeln;
  k:=0; s:=0; i:=1;
  repeat
    if p[i]>0 then begin s:=s+p[i]; Inc(k) end;
    Inc(i);
  until (k=4) or (i>n);
  Writeln('Сумма первых четырех положительных чисел равна ',s)
end.
   
Тестовое решение:
Последовательность чисел
-12 6 -21 5 -10 11 19 19 19 17 21 -4 -14 12 2 0 -20 10 17 -14
Сумма первых четырех положительных чисел равна 41