===== PascalABC.NET =====
begin
var (a, b, x) := ReadInteger3;
if x = 1 then
Print('Сумма', a + b)
else if x = 2 then
Print('Разность', a - b)
end.
Програм 1 + програм 2 = d 1 + d2 деленная на 2
1 задание 1000кб 1500/75=20*50=1000
но я не математик :)
Первый раз заходим в условие
2-2 < 0 - нет
идем вниз
с = 4
d = 6
Второй раз идем в условие
4 - 6 < 0 - да
выходим
Ответ: с = 4