program prvocisla_v_intervale;
uses Crt;
var i,N,dh,hh : integer;
    delitel : boolean;

begin
  Clrscr;
  writeln('zadaj dolnu hranicu');
  readln(dh);
  writeln('zadaj hornu hranicu');
  readln(hh);
  for N:=dh to hh do begin
    if N>1 then begin
      i:=2;
      delitel:=FALSE;
      while (i<=(sqrt(n))) AND (delitel=FALSE) do begin
        if (N mod i)=0 then delitel:=TRUE;
        inc(i);
      end;
      if delitel=FALSE then writeln(N)
    end;
  end;
  readln;
end.
