Запросить у пользователя ввести а. если переменная а больше 1, то прибавить к ней 3, если от 0 до 1, то прибавить 2, если ноль, то ничего не делать. вывести значение а. нужно сделать всё в виде блок схемы

A∧B∧C∧D

Объяснение:

По условию гирлянда работает только в тот момент, когда все лампочки исправны, то есть логическое высказывание принимает значение 1 (истину).

A∨B∨C∨D  - неверно, потому что используется дизъюнкция (ИЛИ), она может быть истинной, если хотя бы одно значение будет истинным ⇒ нам это не подходит

A¯¯¯B¯¯¯  - неверно. Если я правильно понял, то Вы имели в виду отрицание (не). Отрицает принимает противоположное значение переменной, т. е., если значение было = 0, то оно будет = 1 ⇒ нам это не подходит, т. к. значение одной переменной может быть = 1, а другой переменной = 0.

A∧B∧C∧D  - верно, т.к. при конъюнкции (И) для истинности высказывания необходимо, чтобы все значения были истинными, т.е. = 1

⊲A⊲B⊲C⊲D - неверно. Если я правильно понял, то Вы имели в виду импликацию (если, то). Она выдаёт истину в том случае, если одна гирлянда работает, а другая - нет ⇒ нам это не подходит

var

  k: integer;

begin

  readln(k);

  if k< 0 then

    writeln('не может такого быть')

  else

    begin

      write('мы нашли в лесу ',k,' гриб');

      if (k mod 100 in [5..19]) then

        writeln('ов')

      else if (k mod 10 in [2..4]) then

        writeln('а')

      else if (k mod 10=1) then

        writeln

      else

        writeln('ов');

    end;

end.