No1 Закрасить выходы №2 Закрасить под стенами

No3 Обойти прямоугольник

No4 Закрасить выходы (конечное
положение не важно)

No5 Закрасить коридор и вернуться
в исходную клетку

Выручайте, вообще не понимаю​

Авторское право — в объективном смысле институт гражданского права, регулирующий правоотношения, связанные с созданием и использованием (изданием, исполнением, показом и т. д.) произведений науки, литературы или искусства, то есть объективных результатов творческой деятельности людей в этих областях.
Скачивание информации из Интернета - иногда может быть опасным т.к. на некоторые файлы/информацию распространяется авторское право. Тем самым можно навредить себе если информация будет использоваться в публичных целях.

4.
var
a:real;
begin
write('Введите количество мегабайт=');read(a);
writeln('Количество килобайт=',a*1024);
writeln('Количество байт=',a*1024*1024);
writeln('Количество бит=',a*1024*1024*8);
end.

5.
var
a,b,c,p,S:real;
begin
write('Введите сторону a=');read(a);
write('Введите сторону b=');read(b);
write('Введите сторону c=');read(c);
P:=(a+b+c)/2;
S:=sqrt(p*(p-a)*(p-b)*(p-c));
write('S=',s:5:2);
end.

6.
var
a:integer;
begin
write('Введите количество суток=');read(a);
writeln(24*a,' ','часов');
writeln(60*24*a,' ','минут');
writeln(60*60*24*a,' ','секунд');
end.