В игре море фантазии корабль движется только вдоль цветных линий на карте бим отправился в плавание из порта номер 7, объясните как пройти?

Программа в системе PascalABC.Net (время выполнения около 2с)
var
  n1,n2,n3:int64;

function IsPrime(n:Int64):Boolean;
var
  p:Int64;
  found:Boolean;
begin
  case n of
  1:Isprime:=False;
  2:IsPrime:=True;
  else begin
    found:= (n Mod 2 = 0);
    p:=3;
    while (not found) and (sqr(p)<=n) do
      begin found:=(n Mod p = 0); p:=p+2 end;
    IsPrime:=(not found) or (p = 2)
    end
  end
end;

procedure Fib();
begin
  n3:=n1+n2; n1:=n2; n2:=n3
end;
 
var
  i,k:integer;
begin
  n1:=0; n2:=1; k:=0;
  Writeln('Простые среди первых 45 чисел Фибоначчи');
  for i:=3 to 45 do
  begin
    Fib; if IsPrime(n3) then begin Write(n3,' '); Inc(k) end
  end;
  Writeln(#13#10,'Найдено простых чисел: ',k)
end.
   
Результат выполнения программы:
Простые среди первых 45 чисел Фибоначчи
2 3 5 13 89 233 1597 28657 514229 433494437
Найдено простых чисел: 10

1) Действия с информацией - это действия , связанные с хранением, обработкой и передачей информации
2)  ЗРИТЕЛЬНАЯ - глаза                                               
ЗВУКОВАЯ - уши
ВКУСОВАЯ - рот, язык
ОБОНЯТЕЛЬНАЯ - нос
ОСЯЗАТЕЛЬНАЯ - кожа
3)  а) Линейка нужна для измерения расстояний.
    б) Транспортир нужен для измерения углов.
    в) Термометр нужен для измерения температуры.
    г) Барометр нужен для измерения давления.
    д) Компас нужен для определения направления сторон света (севера, юга, запада и востока)
    е) Телескоп нужен для изучения звездного нета
    ж) Микроскоп нужен для изучения клеток, микроорганизмов
    з) Шумомер нужен для измерения силы звуков (громкости)
    и) Гигрометр нужен для измерения влажности воздуха