true 4 decimal true

Треугольник Серпинского

V1 0112 / i 3 sqrt 2 / * + 041 mat ←

x T1 a x V1 2 el + x V1 3 el + augment ← 12 / x a augment * 21 line ←

n Sp x.0 V1 ← ii 1 ← ii n ≤ ii ii 1 + ← x ii el x.0 ← вых x.0 ← y ii el x ii el T1 ← x.0 y ii el ← вых вых y ii el augment ← 51 line for вых 31 line ←

n 4 ←

S n Sp eval ←

rows S rows eval ←

cols S cols eval ←

rows 4

cols 108

x G k 0 ← jj 1 ← jj cols ≤ jj jj 1 + ← ii 1 ← ii rows ≤ ii ii 1 + ← temp S ii jj el ← вых rows jj 1 - (* ii + k + 1 el temp Re ← вых rows jj 1 - (* ii + k + 2 el temp Im ← 31 line for jj 3 mod 0 ≡ temp S rows 1 - jj el ← вых rows jj 1 - (* rows + k + 1 + 1 el temp Re ← вых rows jj 1 - (* rows + k + 1 + 2 el temp Im ← k k 1 + ← 41 line k k ← if 21 line for вых 31 line ←

x G