Использовать Чертежник
алг
нач
цел к
нц для к от 1 до 4
ромб(к)
кц
кон
алг ромб(цел радиус)
нач
сместиться на вектор(-радиус, 0)
опустить перо
сместиться на вектор(радиус, радиус)
сместиться на вектор(радиус, -радиус)
сместиться на вектор(-радиус, -радиус)
сместиться на вектор(-радиус, радиус)
поднять перо
сместиться на вектор(радиус, 0)
кон
Прошу:)