Если только для этого размера области (ну, можно использовать и для размера, кратного рисунку - меняя в циклах число повторов), то вот такая например программа:
использовать Робот
алг
нач
нц 5 раз
нц 5 раз
рис
кц
нц пока слева свободно; влево кц
вниз
если снизу свободно то вниз всё
кц
кон
алг рис
нач
закрасить
вправо
закрасить
вправо
если справа свободно то вправо всё
кон
Или, так:
использовать Робот
алг
нач
нц 5 раз
рис
вправо
рис
вправо
если справа свободно то вправо иначе выход всё
кц
кон
алг рис
нач
нц 5 раз
закрасить
вниз
если снизу свободно то вниз всё
кц
нц пока сверху свободно
вверх
кц
кон
А если для любого размера области (даже не кратного рисунку), то например так можно (хотя, отдельный алгоритм во всех этих программах по сути не нужен):
Answers & Comments
Если только для этого размера области (ну, можно использовать и для размера, кратного рисунку - меняя в циклах число повторов), то вот такая например программа:
использовать Робот
алг
нач
нц 5 раз
нц 5 раз
рис
кц
нц пока слева свободно; влево кц
вниз
если снизу свободно то вниз всё
кц
кон
алг рис
нач
закрасить
вправо
закрасить
вправо
если справа свободно то вправо всё
кон
Или, так:
использовать Робот
алг
нач
нц 5 раз
рис
вправо
рис
вправо
если справа свободно то вправо иначе выход всё
кц
кон
алг рис
нач
нц 5 раз
закрасить
вниз
если снизу свободно то вниз всё
кц
нц пока сверху свободно
вверх
кц
кон
А если для любого размера области (даже не кратного рисунку), то например так можно (хотя, отдельный алгоритм во всех этих программах по сути не нужен):
использовать Робот
цел г,в
алг
нач
в:=0
нц
г:=0
нц
рис
если справа свободно то вправо иначе выход всё
г:=г+1
кц
если снизу свободно то вниз иначе выход всё
нц пока слева свободно; влево кц
в:=в+1
кц
кон
алг рис
нач
если mod(г,3)<2 и mod(в,2)=0 то закрасить всё
кон