;Autor: Krzysztof Paczuski 3a Gimnazjum Salezjańskie im. Św. Jana Bosko w Legionowie ;1.414 -przybliżenie pierwiastka kwadratowego z 2 ;1.732 przybliżenie pierwiastka kwadratowego z 3 oto dopelnijProstop :wysokosc dol 90 np :wysokosc pw 180 np :wysokosc pw 180 gr 90 ;dopelnia braktujace krawedzie prostopadłoscianu juz oto skosy :wysokosc lw 45 dl 30 np :wysokosc*1.7 pw 180 np :wysokosc *1.732 dl 30 lw 135 juz oto podnies :wysokosc gora 90 np :wysokosc dol 90 juz oto opadnij :wysokosc dol 90 pod np :wysokosc gr 90 opu juz oto pieterko :bok :wysokosc ;rekurencyjne rysowanie pieterek jezeli :bok>:wysokosc[ powtorz 4[np :bok pw 90] podnies :wysokosc powtorz 4[np :bok dopelnijProstop :wysokosc pw 90] pw 45 gr 30 np (:wysokosc * 1.732) dl 30 lw 45 powtorz 4 [np :bok-2*:wysokosc skosy :wysokosc pw 90] pod pw 45 np :wysokosc*1.414 lw 45 opu pieterko :bok-4*:wysokosc :wysokosc] juz cs oto CheopsiePowstan :n ekran.prawo :n*100 jezeli :n>0[ pieterko (:n)*100 10 opadnij :n*50 pod lw 90 np :n*50 np :n*100 pw 90 opu CheopsiePowstan :n-1 ] juz kamera.dol 90 ekran.lewo 800 CheopsiePowstan 10 ;jako argument należy wpisać ile piramid chce się otrzymać 10-optymalna liczba dla możliwości opcji "powiększ" oferowanej przez program SIMBA 3d