oto RAKIETA :h :p :k cs sż test i mniejsze? :p 11 większe? :p -1 jeślinie [ps [Ilość prostokątów musi mieścić się w określonym przedziale: ( od 0 od 10 )]] jeślitak [test i mniejsze? :k 11 większe? :k -1 jeślinie [ps [Ilość kwadratów musi mieścić się w określonym przedziale: ( od 0 od 10 )]] jeślitak [test i mniejsze? :h 401 większe? :h 99 jeślinie [ps [Wysokość rakiety musi mieścić się w określonym przedziale: ( od 100 do 400 )]] jeślitak [nazwij pwk 3 "c nazwij :h / ( :c + :p + :k ) "a pod ws :h / 2 lw 90 np :a pw 90 opu powtórz :p [prostakat :a] trapez :a powtórz :k [kwadrat :a] triangle :a]]] już oto prostakat :a ukm los [0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15] np :a pw 90 np :a * 2 pw 90 np :a pw 90 np :a * 2 pw 90 np :a pod pw 120 np 10 zamaluj ws 10 lw 120 opu już oto trapez :a pw 30 np :a pw 60 np :a pw 60 np :a pw 120 np :a * 2 pw 120 pod pw 30 np 10 ukm los [0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15] zamaluj ws 10 lw 30 np :a opu lw 30 już oto kwadrat :a ukm los [0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15] np :a pw 90 np :a pw 90 np :a pw 90 np :a pw 90 pod pw 45 np 10 zamaluj ws 10 lw 45 np :a opu już oto triangle :a pw 30 np :a pw 120 np :a pw 120 np :a pw 130 pod np 10 ukm los [0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15] zamaluj ws 10 opu już //nie ma to jak stary dobry LogoKomeniusz. Pozdrawiam, Piotr Prusaczyk :)
