В каком из условных операторов допущена ошибка?;if (a>b) and (b>0) then begin c:=a+b else n:=3; end; if a>b then max:=a else begin max:=b end.

Ошибка в составлении первого условного оператора. В данном случае, ключевые слова and (и) и then (тогда) использованы неверно, несоответственно синтаксису языка программирования. Правильное написание данного условия должно быть следующим: if (a > b) and (b > 0) then begin c := a + b; end else begin n := 3; end;.

Оператор if a > b then max := a else begin max := b end второго условного оператора составлен корректно и не содержит ошибок в своей структуре.