Что значит тут строка for J:= 2 to N-1 do ?

[sandy255]

Я знаю, что это цикл, но не пойму зачем в нем
J:= 2 to N-1 do Что собственно эта строка делает? Кто-то мне пожалуйста объяснит?

вот программа:

var 
    N,J:integer;
    Flag:integer;
begin
 writeln('Введите число');
 readln(N);
 Flag:=0;
 for J:= 2 to N-1 do
    begin
       if (N mod J) = 0 then
         begin
           Flag:= 1;
           break;
         end;  
  end;
  if Flag = 1 then
    writeln('Число не простое')
  else
    writeln('Число простое')
end.

[gleensande]

Если я не ошибаюсь, то это начало цикла на проверку числа N на простоту. А именно: если число не делится ни на одно в промежутке от 2 до предыдущего числа перед N, то это является основанием говорить о том, что оно простое.
Этот алгоритм уместен только при проверке на простоту небольших чисел, для больших он уже не применяется, очевидно почему.