oto kwadraty :b
jeśli :b < 10 [stop]
powtórz 4 [np :b pw 90]
kwadraty :b - 20
już