Составить кроссворд со словами из глоссария (не использовать слова на англ. языке) из пяти слов.В стороне каждому слову дать пояснение (коротко! и своими словами)
Const n = 5; var i: integer; a: array[1..n * 2 + 1] of integer; begin writeln('исходный массив: '); for i : = 1 to 2 * n do begin a[i] : = random(99) + 1; write(a[i] : 5); end; for i : = 2 * n + 1 downto n + 1 do a[i] : = a[i - 1]; a[n + 1] : = 0; writeln(); writeln('полученный массив: '); for i : = 1 to 2 * n + 1 do write(a[i] : 5); end.
1.
использовать Робот
алг
нач
закрасить
нц 4 раз
вниз
закрасить
кц
нц 6 раз
вправо
закрасить
кц
нц 4 раз
вверх
закрасить
кц
нц 2 раз
влево
кц
нц 2 раз
вниз
закрасить
кц
нц 2 раз
влево
закрасить
кц
вверх
закрасить
нц 4 раз
вправо
вниз
кц
нц 2 раз
вправо
кц
закрасить
нц 4 раз
вниз
закрасить
кц
нц 6 раз
вправо
закрасить
кц
нц 4 раз
вверх
закрасить
кц
нц 2 раз
влево
кц
нц 2 раз
вниз
закрасить
кц
нц 2 раз
влево
закрасить
кц
вверх
закрасить
кон
2.
использовать Робот
алг
нач
нц 2 раз
нц 4 раз
вниз
вниз
закрасить
вправо
закрасить
вверх
закрасить
вверх
вправо
закрасить
если справа свободно то
вправо
вправо
все
кц
нц 4 раз
если снизу свободно то вниз все
кц
нц 14 раз
влево
кц
кц
кон
Объяснение:
картинки