Объяснение:
F=¬A∧B∧(¬C∨A)
Таблица истинности
A B С ¬A ¬A∧B ¬С ¬С∨A ¬A∧B∧(¬C∨A)
0 0 0 1 0 1 1 0
0 0 1 1 0 0 0 0
0 1 0 1 1 1 1 1
0 1 1 1 1 0 0 0
1 0 0 0 0 1 1 0
1 0 1 0 0 0 1 0
1 1 0 0 0 1 1 0
1 1 1 0 0 0 1 0
uses drawman;
{Рисует одну вишенку по часовой стрелке, начиная с верхней линии}
procedure Berry();
begin
onvector(1, 0);
onvector(1, -1);
onvector(0, -1);
onvector(-1, -1);
onvector(-1, 0);
onvector(-1, 1);
onvector(0, 1);
onvector(1, 1);
end;
{Рисует сразу оба листка}
procedure Leaf();
begin
onvector(2, 0);
onvector(2, -2);
onvector(-2, 0);
onvector(-4, 4);
onvector(-2, 0);
onvector(2, -2);
onvector(2, 0);
end;
begin
field(15, 12);
topoint(6, 10);
pendown;
Leaf;
onvector(-3, -6);
onvector(-1, 0);
Berry;
onvector(1, 0);
onvector(3, 6);
onvector(0, -6);
Berry;
end.
1-3
2-2
3-1
4-3
5-3
6-2
По моему мнение так.