Обговорення:Килим Серпінського
Матеріал з Вікіпедії — вільної енциклопедії.
От, власне схожі випадки я мав на увазі в Вікіпедія:Кнайпа (політики)#Мова для написання алгоритмів. Людина не повинна знати тонкощі Java аби розуміти описаний алгоритм. --vityok 14:09, 2 серпня 2006 (UTC)
константи ГЛИБИНА = 6 (* максимальна глибина рекурсії *)
процедура КилимСерпінського(ітерація, ширина, висота, зсув_х, зсув_у: ціле)
змінні
сектор, напрям_х, напрям_y, нова_ширина, нова_висота: ціле
почати
якщо ітерація < ГЛИБИНА:
нова_ширина := ширина / 3
нова_висота := висота / 3
ЗаповнитиПрямокутник(зсув_х + нова_ширина, зсув_у + нова_висота,
нова_ширина, нова_висота)
для сектор := 0 до сектор ≤ 8:
якщо сектор ≠ 4:
напрям_х := сектор / 3
напрям_y := сектор % 3
КилимСерпінського(ітерація + 1, нова_ширина, нова_висота,
зсув_х + напрям_х×нова_ширина,
зсув_у + напрям_y×нова_висота)
завершити
КилимСерпінського(0, 0, 0, 300, 300) (* приклад виклику процедури *)
По суті, це переписаний алгоритм із статті. До його переваг можна віднести: кращє оформлення (відступи, виділення ключових слів), кращі назви для змінних, незалежність від конкретної мови програмування. Пропоную дати назву цій мові: Вікіпедія:Малго (Мова для АЛГОритмів).
--vityok 10:53, 3 серпня 2006 (UTC)
- oui, support. That the way is--A l b e d o @ 20:26, 31 серпня 2006 (UTC)

