" Life is not a problem to be solved but a reality to be experienced! "
© Copyright 2013 - 2024 KUDO.TIPS - All rights reserved.
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 :)