Дан фрагмент программы. после выполнения фрагмента программы определите значение х. a : = 16 b : = 4 b : = a - 2 * b если a > b то x : = a - b/4 иначе x : = b/14 - a

На языке Pascal код будет выглядеть так:
var  a: integer; b, x: real;
begin
a := 16;
b := 4;
b := a - 2 * b;
if a > b then x := a - b / 4 else x := b / 14 - a;
writeln(x);
end.
При выполнении этой программы, получаем ответ равный 14.
Т.к. b = 16 - 2 * 4 = 8, x = 16 - 8 / 4 = 16 - 2 = 14.

B = 16 - 2*4 = 8, далее выполняется условие А>B (16>8), то
x = 16 - 8/4 = 14