если сможете решить оба верно, то будет лучший.
На бесконечном поле есть горизонтальная и вертикальная стены. Левый конец горизонтальной стены соединён с нижним концом вертикальной стены. Длины стен неизвестны. В каждой стене есть ровно один проход, точное место прохода и его ширина неизвестны. Робот находится в клетке, расположенной непосредственно в углу над горизонтальной стеной и справа от вертикальной стены.
Напишите для Робота алгоритм, закрашивающий все клетки, расположенные непосредственно выше горизонтальной стены и правее вертикальной стены, кроме клетки, в которой находится Робот перед выполнением программы.

возможность быстрого поиска информации  широкие возможности навигаций

Объяснение:

Технология мультимедиа положена в основу создания всевозможных мультимедийных продуктов, характерными особенностями которых являются:

- объединение в одном продукте текстовой, графической, аудио-, видеоинформации, анимаций;

- наличие интерактивного (диалогового) режима работы;

- возможность быстрого поиска информации;

- широкие возможности навигаций;

- возможность работы в реальном времени, в замедленном или в ускоренном темпе;

- дружественный пользовательский интерфейс.

Например, в компьютерной игре задействованы графика и аудиоинформация.

ответ:Program z1;

var k : integer;

begin

writeln('Введіть номер місяця');

readln(k);

case k of 1: writeln('січень');

2: writeln('лютий');

3: writeln('березень');

4: writeln('квітень');

5: writeln('травень');

6: writeln('червень');

7: writeln('липень');

8: writeln('серпень');

9: writeln('вересень');

10: writeln('жовтень');

11: writeln('листопад');

12: writeln('грудень');

end; { case }

case k of 1,2,12: writeln('зима');

3,4,5: writeln('весна');

6,7,8: writeln('літо');

9,10,11: writeln('осінь');

else writeln('такого місяця немає');

end; { case }

readln end.

Объяснение: