Какую технологию должны поддерживать программы чтобы они могли использовать окна друг друга ​

ответ 51.
И так, вам ввели начальные значения переменных. Вас требуют проверить два условия. Если результатом его проверки будет true(т.е. истина, а истина в данном случае будет, только если оба условия будут истинными) то вы должны выполнить следущие действия: x=3*a+2*b+c, если результатом проверки логических выражений будет false(т.е. ложь, а ложь в данном случае будет при условии, что хотя бы 1 из данных логических выражений ложное, ну или оба выражения ложные), то тогда вы выполняете это: x=5*a-b+c.
И так, выполняем алгоритм
10>5 и 5>6? Нет, т.к. второе условие не выполняется. Значение логического выражения false, значит выполняем действия по ветке else(иначе), x=5*10-5+6=51
Всё. На экран выведится число 51.
маловато для такого развёрнутого объяснения, так что отметьте хотя бы как лучший ответ \_(•_•)_/

Пишу на Delphi (ObjectPascal):

function Summa(a,b:integer):string;
var a1,b1:integer;
begin   //находим сумму первого числа
a1:=(a div 1000)+((a div 100)mod 10)+((a mod 100)div 10)+(a mod 10);

//находим сумму второго числа
b1:=(b div 1000)+((b div 100)mod 10)+((b mod 100)div 10)+(b mod 10);

//выясняем что больше
if a1>b1 then         
   Result:='Сумма цифр левого числа больше. Оно равно: '+IntToStr(a1)         
else         
Result:='Сумма цифр правого числа больше. Оно равно: '+IntToStr(b1);
end;

procedure TForm1.Button1Click(Sender: TObject);
begin //Выполнение и вывод результата функции через нажатие кнопки
Label1.Caption:=Summa(StrToInt(Edit1.Text),StrToInt(Edit2.Text));
end;