Задание по паскалю - простые числа. Помогите плиз.

Задание:

Введите число N (обязательно не простое число). Вывести ближающее числу N меньшее простое число (на пример: если N=10 то программа выводит 7; если N=16, то программа выводит 13).

Мой код:

program DarbsDivas;
var i:real;
begin
writeln('Введите число');
readln(i);
repeat
if (i mod 2) or (i mod 3) then

begin
writelv('Число -',i,);
end;
i:=i-1
until i:=0;
end.

Проблемы:
22222.pas(7,8) Error: Incompatible types: got "Real" expected "LongInt"
22222.pas(7,21) Error: Incompatible types: got "Real" expected "LongInt"
22222.pas(13,9) Error: Boolean expression expected, but got "Real"
22222.pas(13,10) Fatal: Syntax error, ";" expected but ":=" found
22222.pas(0) Fatal: Compilation aborted

Не могу понять как связать это с Boolean? Хелп плиз.

program DarbsDivas;
var i:LongInt;
    b:Boolean;
begin
  writeln('gimme number');
  readln(i);
  repeat
   if (i mod 2) or (i mod 3) then
   b:=true else b:=false;

   If b:=true then
    begin
     writeln('Skaitlis ir',i);
    end;
   i:=i-1;
  until i:=0;
  If b:=false then
  wrileln('Skaitlis ir pirmskaitlis');
end.