Объясните, как будут выполняться фрагменты программ: 1) if ab then a:=a else a:=b; 7) if a mod 2<>3 then a:=a+1; 8) if (a mod 2=1) or (a mod 2 =0) then if a<0 then a:=-a; 9) if a<0 then b:=a else b:=-a. Замените приведенные фрагменты, где возможно, более короткими операторами Паскаля.

1) похоже здесь ошибка if a ? b7)Если остаток от деления а на 2 НЕ равен 3, то а увеличить на 1. Остаток от деления а на 2 никогда не будет равен 3, так что a:=a+1 более короткая запись8)если остаток от деления a на 2 равен или 1 или 0, и а больше нуля, то а сделать отрицательным. Так как остаток от деления на 2 всегда равен или 0 или 1, то более короткая запись if a<0 a:=-a9) если а - отрицательно, то b присвоить значение a, если больше, то сделать а отрицательным и b присвоить значение отрицаетльного