Рассмотрим каждый оператор:
if b=0 then writeln ('Деление не возможно'); - Синтаксически верный оператор.if a - Синтаксически верный оператор.if a>b then max:=a else max:=b; - Синтаксически верный оператор.if (a>b) and (b>0) then c:=a+b. - Синтаксическая ошибка: после точки с запятой (.) не может идти точка с запятой (;) в данном контексте. Правильно было бы c:=a+b; или, если это конец блока, то точка (.).Ответ: 4) if (a>b) and (b>0) then c:=a+b.