исследования обязательны)

не казнить без суда

Во время полнолуния направление на Луну практически противоположно направлению на Солнце. То есть, во времена полнолуний Луна находится примерно в той области небесной сферы, которая противоположна направлению на Солнце. С точностью до 50 это означает, что полной Луной белые медведи могут любоваться только тогда, когда Солнце под горизонтом - 6-7 раз в году, во время полярной ночи. Если считать точно, то полная Луна может быть на Северном полюсе над горизонтом от 5 до 8 раз в году

var
  n,i,k:longint;
  begin
  writeln('введите число n');
  readln(n);
  k:=0;
  for i:=2 to n do begin
  if n mod i =0 then k:=k+1;
  if k>0 then break;
  end;
  if i=n then writeln('число является простым')
  else writeln('число не является простым')
  end.