MSWLogo giải toán 9 cây 10 hàng

Đề bài : Trong vườn cây người ta đếm thấy có tổng cộng 9 cây, được trồng thành 10 hàng, và mỗi hàng có 3 cây.

+ Em hãy viết các câu lệnh trong chương trình MSWLogo để vẽ lại sơ đồ vườn cây trên.
+ Hãy lưu kết quả trong tập tin văn bản có tên trongcay.doc gồm:
– Hình sơ đồ vườn cây trên
– Tất cả câu lệnh MSWLogo theo trình tự đã vẽ.

Phân tích: Đây là một dạng bài khó, nếu không biết xắp xếp cây cho đúng thì xem như khỏi làm.

9 cây 10 hàng ba — (9 cây, được trồng thành 10 hàng, và mỗi hàng có 3 cây)

Đây là cách trồng 9 cây mười hàng, mỗi hàng 3 cây, hiện tại chúng tôi chưa tìm được cách giải tối ưu nên sử dụng cách thông thường xác định tọa độ,khoanh tròn tạo cây và Setxy để tạo đường thẳng giữa 2 điểm, các thầy cô và các bạn nào có cách giải hay hơn thì hồi âm lại cho chúng tôi.

Ở đây chúng ta sẽ dử dụng thêm 2 chương trình phụ Cay để tạo các chấm tròn và Cheo với 4 biến truyền vào để tạo đường thẳng nối 2 điểm, Ví dụ Cheo 0 0 200 200 thì nó sẽ tạo một đường thẳng từ vị trí 0 0 tới 200 200.

Code

To Cay

SETPENSIZE 8
CIRCLE 5
SETPENSIZE 2

End

TO Cheo :x1 :y1 :x2 :y2

PU
SetXY :x1 :y1
PD
Cay
SetXY :x2 :y2
Cay

END

To TrongCay

cheo 0 0 0 0
cheo 0 0 200 200
cheo 0 0 100 200
cheo 0 0 100 100
cheo 0 0 100 0
cheo 0 0 200 0
cheo 200 0 0 200
cheo 0 200 200 200
cheo 100 0 100 200
cheo 100 200 200 0
cheo 100 0 0 200
cheo 100 0 200 200

pu
setxy 50 100
PD
Cay
setxy 150 100
Cay

End