2 câu trả lời
Bông tuyết 6 cánh :
to bongtuyet
cs
setpensize [ 3 3 ]
setpencolor 3
REPEAT 6 [ FD 50 REPEAT 6 [ FD 10 BK 10 RT 60 ] BK 50 RT 60 ]
ht
end
Bông tuyết 8 cánh :
to bongtuyet
cs
setpensize [ 3 3 ]
setpencolor 3
REPEAT 8 [ FD 100 REPEAT 6 [ FD 15 BK 15 RT 60 ] BK 100 RT 45 ]
ht
end
Bông tuyết 12 cánh :
to bongtuyet
cs
setpensize [ 3 3 ]
setpencolor 3
REPEAT 12 [ FD 100 REPEAT 6 [ FD 15 BK 15 RT 60 ] BK 100 RT 30 ]
ht
end
GỬI BN !
CHÚC BN HỌC TỐT !
XIN CTLHN NHA ^^
Thủ tục :
Vẽ 6 cánh :
REPEAT 6[FD 50 REPEAT 6[FD 10 BK 10 RT 60]BK 50 RT 60]
Vẽ 8 cánh :
CS REPEAT 8[FD 100 REPEAT 6[FD 15 BK 15 RT 60] BK 100 RT 360/8]
Vẽ 12 cánh :
CS REPEAT 12[FD 100 REPEAT 6[FD 15 BK 15 RT 60] BK 100 RT 360/8]
Xin hay nhất