„miniLOGIA grafika w Logo” to konkurs informatyczny dla uczniów szkół podstawowych województwa mazowieckiego organizowany przez Ośrodek Edukacji Informatycznej i Zastosowań Komputerów (OEIiZK) na zlecenie Mazowieckiego Kuratora Oświaty. Konkurs składa się z trzech etapów, podczas których uczniowie samodzielnie rozwiązują zadania graficzne w językach Logo lub Python (z zainstalowanym modułem turtle).
W serii artykułów przedstawię rozwiązania zadań w języku Logo, opracowane przeze mnie podczas przygotowywania się do konkursu. Jako środowisko, w którym opracowywałem rozwiązania zadań wykorzystałem zalecane przez organizatora oprogramowanie Logomocja-Imagine.
Zadanie 3
Napisz procedurę WYCINANKA :ile, po wywołaniu której, na środku ekranu, będzie rysowany pas o szerokości 700, jak na rysunku poniżej. Parametr :ile określa liczbę powtarzających się elementów i przyjmuje wartości od 3 do 16.
Rozwiązanie:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 |
oto wycinanka :ile cs pod lw 90 np 350 pw 90 niech "x 700/:ile/4 np :x opu powtórz 2 [rzad :ile] wróć już =================================================== oto rzad :ile niech "x 700/:ile/2 niech "bok pkw(:x*:x/2) powtórz :ile [kaw :x] lw 135 np :bok lw 90 np :bok pw 45 już =================================================== oto kaw :x niech "bok pkw(:x*:x/2) pw 30 np :x pw 15 powtórz 4 [np :bok pw 90] pw 45 np :x pw 60 np :x pw 120 np :x*2 pw 120 pw 15 powtórz 2 [powtórz 4 [np :bok pw 90] pw 45 np :x lw 45] lw 45 już |
Wynik działania programu:
WYCINANKA 5