Дана логическая функция f abc(a+bc) + ab(a+bc) построить таблицу истинности построить логическую схему​

var

   a, chet, nechet : integer;

begin

   write('введите число: ');

   readln(a);

   while a > 0 do begin

       if (a mod 10) mod 2 = 0then chet += 1 else nechet += 1;

       a := a div 10;

   end;

   writeln('четных: ', chet);

   writeln('не четных: ', nechet);

end.

программа считает 0 как четное число. Если нужно что бы 0 не учитывался при подсчете то необходимо строку:

if (a mod 10) mod 2 = 0then chet += 1 else nechet += 1;

заменить на:

if a mod 10 <> 0 then if (a mod 10) mod 2 = 0then chet += 1 else nechet += 1;

1. Данная модель - схема (или же чертёж, план) моей комнаты (на рисунке).

2. Иерархическая система - это многоклассовая (многоуровневая) система с открытой архитектурой и гибкоизменяемой конфигурацией. Пример иерархической системы - иерархия государства, иерархия должностей организации, корпорация.

Обширнее:

Иерархия государства - во главе, например, президент (руководитель). Далее - правительство, федеральное собрание -> федеральные министерства -> гос. комитеты и т.п.

Иерархия должностей организации - например, Маршал России -> Генерал армии -> Генерал-полковник -> Генерал Лейтенант и т.п.

Корпорация - руководитель -> команда управления -> высшее управленческое звено -> среднее управленческое звено и т.п..