polynom

function polynom
flag = 0;

for x = 0:6
  for b = 0:6
    for a = 0:6
      F = (b*x + a)^3 + 3*b*x + 3*a + 2;
      if mod(F, 7) == 0 % проверяемб делится ли число F(b*x + a) на 7
        flag = 1;
      endif
    endfor
  endfor
endfor

if flag == 0
disp("Многочлен неприводим");
else
disp("Многочлен приводим");
endif

endfunction