1)Знайдіть в Інтернеті відомості про створення експертних систем
2)Побудуйте схему моделювання мислення в експертних системах

три объекта на рисунке по своему значению не подходят к 5  остальным. Составь два списка: 1.Объектов. имеющих одинаковое назначение2. Свойств, которые есть у каждого из этих объектов. на рисунке тетради в крупную клетку, мелкую клетку, широкую линейку,узкую линейку , косую линейку,  и три карандаша-синий, белый, черный
1. Тетради имеют одинаковое предназначение - в них пишут.
Карандаши имеют одинаковое предназначение - ими рисуют.2. Свойства тетрадей в том, что они имеют поверхность предназначенную и удобную для письма, а также разлинованы под определенные записи.
Свойства карандашей в том, что они имеют цветную составляющую - гриф, который оставляет след соответствующего цвета.

Var
    s: string;
    a, b: integer;
begin
    readln(s);
    if s[1] = 'x' then begin
        a := StrToInt(s[3]);
        b := StrToInt(s[5]);
        if s[2] = '-' then a := -a;
        writeln(b - a);
    end
    else if s[3] = 'x' then begin
        a := StrToInt(s[1]);
        b := StrToInt(s[5]);
        if s[2] = '-' then begin
            a := -a;
            b := -b;
        end;
        writeln(b - a);
    end
    else if s[5] = 'x' then begin
        a := StrToInt(s[1]);
        b := StrToInt(s[3]);
        if s[2] = '-' then
            b := -b;
        writeln(a + b);
    end
end.

учтите что никакой защиты от дурака или неверного ввода