Решить логическое уравнение а and band ((c and not b)or c and not(b or c))

Выражение
A & B & ( (C & !B) v C & !(B v C) )

Упрощаем то что в скобках
(C & !B) v C & !(B v C) =
C & !B v C & !B v C & C = C & !B v 1 = C & !B

Раскрываем скобки
A & B & ( (C & !B) v C & !(B v C) ) =
A & B & C & !B = 0

Потому что B & !B = 0

на предыдущих уроках мы установили среду кумир, настроили ее для дальнейшей работы и научились задавать стартовую обстановку робота. теперь перейдем непосредственно к составлению алгоритмов для робота с использованием простых команд.

если вам больше нравится информация в формате видеоуроков, то на сайте есть видеоурок робот. простые команды.

у любого исполнителя должна быть система команд (ски — система команд исполнителя). система команд исполнителя — совокупность всех команд, которые может выполнить исполнитель. в качестве примера рассмотрим дрессированную собаку. она умеет выполнять некоторые команды — «сидеть», «лежать», «рядом» и т. п. это и есть ее система команд.

простые команды робота

у нашего робота тоже есть система команд. сегодня мы рассмотрим простые команды робота. всего их 5:

вверх

вниз

влево

вправо

закрасить

результат выполнения этих команд понятен из их названия:

вверх — переместить робота на одну клетку вверх

вниз — переместить робота на одну клетку вниз

влево — переместить робота на одну клетку влево

вправо — переместить робота на одну клетку вправо

закрасить — закрасить текущую клетку (клетку в которой находится робот).

эти команды можно писать с клавиатуры, а можно использовать горячие клавиши (нажав их команды будут вставляться автоматически):

вверх — escape, up (стрелка вверх)

вниз — escape, down (стрелка вниз)

влево — escape, left (стрелка влево)

вправо — escape, right (стрелка вправо)

закрасить — escape, space (пробел)

незнаю правильно или нет,если нет то сорян.

const

  n = 9;   //константа может быть любой

type

  mas = array[0..n] of integer;   //тип задал только для процедуры, без подпрограмм отдельный тип не нужен

procedure copy_mas(var a, b: mas);

var

  i, i1: integer;

begin

  i1 : = 0;

  for i : = 0 to n do  

    if (a[i] > = 0) and (a[i] < = 10) then  

    begin

      b[i1] : = a[i];

      i1 += 1;

    end;

end;