Đề bài : Một miếng bìa hình vuông, có cạnh 200, người ta đục 4 lỗ hình tròn nằm sát giữa của các cạnh miếng bìa đó với bán kính đường tròn là 30. Em hãy sử dụng các câu lệnh trong MSW Logo vẽ lại miếng bìa khi đục lỗ và tính diện tích còn lại…
Em hãy lưu kết quả trong tệp văn bản có tên hinhvuong.doc gồm:
– Hình em đã vẽ
– Các câu lệnh của MSWLogo theo trình tự đã vẽ
Cách 1:
to hinhvuong
repeat 4[ fd 200 rt 90]
setxy 0 100 circle2 25
pu setxy 100 200 rt 90 pd circle2 25
pu setxy 200 100 rt 90 pd circle2 25
pu setxy 100 0 rt 90 pd circle2 25
pu home ht
End
Cách 2:
TO hinhvuong
CS
SETFLOODCOLOR [0 0 0]
Pd
Repeat 4 [
Fd 100 Rt 90 Pu Fd 30 Pd Circle 30
Pu Bk 30 Lt 90 Pd
Fd 100
Rt 90
] ;Đi một nửa cạnh của hình vuông sau đó vẽ hình tròn rồi lại đi tiếp 1 nửa cạnh còn lại
HT PU Rt 45 Fd 30 Fill ;Tô màu
Home PU Rt 90 SetY -30 ;Lấy tọa độ chuẩn bị viết kết quả ra
Label (list “Phan “dien “tich “mau “den: 200*200-4*(3.14*30*30))
END
chuẩn very good
Cách 2 ở mức độ tổng quát hơn nó có thể vẽ hình vuông 4 lỗ tròn ở bất cứ góc độ nào.
LOLOLOLOL
thanks ban
chuẩn very good
nice to meet you!
to dientich
make “a 200*200-(30*30*3.14*4)
cs ct
repeat 4[fd 200 rt 90]fd 100
repeat 4[circle2 30 fd 100 rt 90 fd 100]pu setxy 100 100 fill
setxy 0 -50 rt 90
label (list “Dien “tich “phan “to “den “la :a)
home pd
end