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 F == 0
        flag = 1
      endif
    endfor
  endfor
endfor

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

endfunction