7dc7d1df-1540-4cc2-a2b9-42e6a855d5e9 4 3 5 decimal

&[DATE] &[TIME] - &[FILENAME]

Ковёр Серпинского

V1 011 i + i 051 mat :

x T1 a x 2 V1 4 el * + x V1 4 el + augment : a x 2 V1 4 el * + V1 2 el + a augment : a x 2 V1 3 el * + a augment : a x V1 4 el + 2 V1 2 el * + a augment : a x 2 V1 2 el * + a augment : a x V1 2 el + a augment : 13 / x a augment * 71 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 3 :

S n Sp eval :

rows S rows eval :

cols S cols eval :

rows 5

cols 576

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 8 mod 0 ≡ temp S 1 jj 7 - 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