Dywan
Witam,
Chciałbym przedstawić tutaj rozwiązanie bardzo trudnego zadania z minilogii ,a mianowicie dywanu.
Link podam na dole strony
Przejdźmy teraz do jego rozwiązania. Ja zrobiłem go w sumie w trzech procedurach.
1. oto kw :a
pod ws :a/2 lw 90 np :a/2 pw 90 opu
wielokąt[
ukm "czerwony
powtórz 4[
np :a pw 90
]
]
pod np :a/2 pw 90 np :a/2 lw 90 opu
już
2. oto cz :n :a
jeśli :n=0 [stop]
kw :a
pod ws :a*0.75 lw 90 ws :a*0.75 opu
cz :n-1 :a/2
pod np 1.5*:a pw 90 opu
cz :n-1 :a/2
pod np 1.5*:a pw 90 opu
cz :n-1 :a/2
pod np 0.75*:a lw 90 ws 0.75*:a opu
już
3.oto dywan :n
niech “a 160
kw :a
pod ws :a*0.75 lw 90 np :a*0.75 pw 90 opu
powtórz 4[
cz :n-1 :a/2 pod np :a*1.5 pw 90 opu
]
pod np :a*0.75 pw 90 np :a*0.75 lw 90 opu
już
Mam nadzieję, że pomogłem, ponieważ sam robiłem go aż 4 godziny .
Zachęcam też do zasubskrybowania mnie na youtubie.
Link do mojego kanału znajdziecie tu:
ZwykłyHardcorePL
link do dywanu