Question

Hãy chuyển câu lệnh dưới đây thành hai thủ tục. Thủ tục 1 vẽ hình cánh hoa tuyết. Thủ tục 2, chứa thủ tục 1, vẽ bông hoa tuyết.

REPEAT 6 [FD 50 REPEAT 6 [FD 10 BK 10 RT 60] BK 50 RT 60]

Trong câu lệnh trên, bông hoa tuyết gồm 6 cánh, mỗi cánh có 6 chi tiết. Hãy thay đổi các con số để bông tuyết có nhiều (ít) cánh hoa hơn, mỗi cánh có nhiều (ít) chi tiết hơn. Thêm câu lệnh để đổi màu bút, nét bút.

Answer 1

• Thủ tục cánh hoa tuyết

to canhhoatuyet

SETPENCOLOR 4

REPEAT 8 [FD 10 BK 10 RT 45]

End;

• Thủ tục bông hoa tuyết

to bonghoatuyet

SETPENCOLOR 4

REPEAT 8[FD 50 REPEAT 8[canhhoatuyet] BK 50 RT 60]

End;