Можно число N представить в виде произведения двух простых чисел?

[Тетрадь]

Составить программу для проверки, можно ли заданное натуральное число N представить в виде произведения двух простых чисел. Паскаль. Дальше нахождения простых чисел дело не пошло

program Prostye_chisla;
uses Crt;
var
i,k,n,s:integer;
begin
ClrScr;
Write('Введите число:');
Readln(n);
for i:=2 to n do begin
s:=0;
for k:=1 to i div 2 do begin
if i mod j=0 then inc(s);
end;
if s=1 then Writeln(i);
end;
begin
 then writeln('Можно')
else writeln('Нельзя');
end;
ReadKey;
end.