Обговорення:Килим Серпінського
Найсвіжіший коментар: Albedo 17 років тому
От, власне схожі випадки я мав на увазі в Вікіпедія:Кнайпа (політики)#Мова для написання алгоритмів. Людина не повинна знати тонкощі 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)