Определите значение логических высказываний и вычислить результат логических выражений:

A - Неверно. Сканер - устройство ввода.

B - Верно. Клавиатура - устройство ввода.

C - Верно. Монитор - устройство вывода.

D - Неверно. Микрофон - устройство ввода.

Получаем логические переменные: A = 0, B = 1, C = 1, D = 0.

Подставим их в предложенные уравнения и посмотрим на результат (он должен быть равен истине):

d⇔c⇒¬a∨b∧d = 0⇔1⇒¬0∨1∧0 = 0⇔1⇒1 = 0⇔1 = 0 - нам не подходит

b⇒(a∧¬d)∨(c⇔¬a) = 1⇒(0∧¬0)∨(1⇔¬0) = 1⇒(0∧1)∨(1⇔1) = 1⇒0∨1 = 1⇒1 = 1 - подходит

¬(a∧d)∨(¬b⇔c⇒d) = ¬(0∧0)∨(¬1⇔1⇒0) = ¬0∨(¬1⇔0) = 1∨(0⇔0) = 1∨1 = 1 -  подходит

¬a∨b⇒c⇔¬d∧¬b = ¬0∨1⇒1⇔¬0∧¬1 = 1∨1⇒1⇔1∧0 = 1⇒1⇔0 = 1⇒1⇔0 = 1⇔0 = 0 - не подходит

На скриншоте вами выбраны верные пункты

var kol,a,b,c: longint;

begin

  read(a,b,c);

  if a< 0 then kol: =kol+1;

  if b< 0 then kol: =kol+1;

  if c< 0 then kol: =kol+1;

  write(kol);

end.

read (n);

i : = 1;

repeat

  writeln(i*i);

  i : = i + 1;

untill i*i > n