D09. Простое число

Проверьте, является ли заданное целое положительное число n простым. Простые числа — это такие целые числа, большие единицы, которые делятся только на 1 и на себя. Выведите "prime" (без кавычек), если число n простое и "not prime", если оно простым не является.
----------------------------------------------------
var
n,i,k,r:longint;
begin
 readln(n);
 if n<=1 then k:=3 else
  for i:= 1 to n do
  if n mod i=0 then k:=k+1;

 if k>2 then writeln('not prime') else writeln('prime');
 end.