4. Семья рыбаков (отец и сын) хотят
переправить боевую группу из 6 бойцов на Тайный
остров архипелага в тылу врага. Есть двухместная лодка. Не запомнив дороги, без
проводника её не проплыть. Вначале дорогу до Тайного острова знает только рыбак-отец.
Но всех проводить он не сможет: путь лежит мимо Сторожевой башни, и каждый из них
может проплыть мимо неё не более 5 раз в любом направлении (иначе поднимется тревога).
Остальные могут стать проводниками, запомнив дорогу. Рыбак-сын запоминает дорогу, если
проплыл по ней один раз, а бойцу для этого надо проплыть туда и обратно. В конце все
рыбаки должны быть дома, все бойцы — на острове, лодка - где угодно. Запишите алгоритм
переправы.​

shift+ ctrl, эти клавиши шифт и контрл расположены в 2 сторонах клавиатуры, слево и справа, имеют специфические названия левый и правый шифт и контрл, особенности заключаются в том что возможна а компьютетре или ноутбуке есть возможность переключения языков шифт и альт, 

название клавиши ереключения регистров capslock , так же есть возможность зажатой левой шифт и любая буква

смотри схему                                                  

program yravnenie;

var  a,b,c,d,x1,x2,p,q: real; begin  repeat  write('a= ');   readln(a);   if a=0 then writeln('error: a=0. enter another value');   until a< > 0;   write('b= ');   readln(b);   write('c= ');   readln(c);   p: =b/a;   q: =c/a;   d: =sqr(p/2)-q;   if d> 0 then  begin    writeln('x1 = ',-p/2-sqrt(d): 0: 5);     writeln('x2 = ',-p/2+sqrt(d): 0: 5);   end  else  if d=0 then  writeln('x1 = x2 = ',-p/2: 0: 5)  else  begin    writeln('x1 = ',-p/2: 0: 5,'-i*',sqrt(-d): 0: 5);     writeln('x2 = ',-p/2: 0: 5,'+i*',sqrt(-d): 0: 5);   end;   readln; end.

картинка должна быть в папке с программой и быть в формате bmp

usesgraphabc;

varn: string; b: picture; s: integer;

beginwriteln('введите расстояние до зеркала'); readln(s); write('введите имя файла рисунка: '); readln(n); window.clear; b : = picture.create(n); b.load(n); b.draw(50, 50); b.fliphorizontal; b.draw(50+2*s,50); end.