Chương VI. Bài 6. Thực hành tổng hợp

Bài 1: Tìm số thóc hai kho biết hai kho chứa tất cả 12 tấn 360 kg. Nếu thêm vào kho A 500 kg và bớt ở kho B đi 140 kg thì số thóc còn lại của hai kho lúc này bằng nhau. Tìm số thóc hai kho ban đầu.
Kết quả được lưu và tệp tinhtoan.doc gồm:
- Lời giải bài toán.
- Các câu lệnh của MSWLogo để tính toán.
to tinhtoan
cs rt 90
for [a 5000 7000 1][
for [b 5000 7000 1][
if and ( :a +:b =12360)(:a+500=:b-140)[
label :a pu fd 100 pd Label :b]]]
end
Bài 2: Hai kho gạo có 155 tấn. Nếu thêm vào kho thứ nhất 8 tấn và kho thứ hai 17 tấn thì số gạo ở mỗi kho bằng nhau. Hỏi lúc đầu mỗi kho có bao nhiêu tấn gạo ?
Kết quả được lưu và tệp tinhtoan.doc gồm:
- Lời giải bài toán.
- Các câu lệnh của MSWLogo để tính toán.
to tinhtoan2
cs rt 90
for [a 1 155 1][
for [b 1 155 1][
if and ( :a +:b =155)(:a+8=:b+17)[
label :a pu fd 100 pd Label :b]]]
End
Bài 3: Một con vịt trời đang bay bỗng gặp một dàn vịt trời bay theo chiều ngược lại, bè cất tiếng chào: “Chào 100 bạn ạ!”
Con vịt trời đầu dàn đáp lại: “Chào bạn! Nhưng bạn nhầm rồi, chúng tôi không phải có 100 đâu, mà tất cả chúng tôi, cộng thêm tất cả chúng tôi lần nữa, cộng thêm một nữa chúng tôi, rồi cộng thêm một phần tư chúng tôi và cả bạn nữa mới đủ 100!” Tính xem đàn vịt trời có bao nhiêu con?
Kết quả được lưu vào tệp danvit.doc gồm:
- Lời giải bài toán.
- Các câu lệnh của MSWLogo để tính toán.
to danvit
cs rt 90
for [a 1 100 1][
if( :a+:a+(1/2*:a)+ (1/4*:a)+1=100)[
label :a]]
End
Bài 4: Một khu đất hình chữ nhật có chu vi 576m. Nếu giảm chiều dài 32m và chiều rộng 16m thi khu đất trở thành hình vuông. Em hãy viết thủ tục để vẽ hình trên và tính diện tích của khu đất. Lưu lại với tên tệp là dientich.doc
to hcn
repeat 4 [fd 120 rt 90 fd 168 rt 90]
ht
end
to hinh
cs rt 90
make "ncv 576/2
for [d 1 :ncv 1][
for [r 1 :ncv 1][
if and(:d +16 =:r-32)(:d+:r=:ncv)[
make "dientich :d*:r
label [dien tich hinh chu nhat] pu fd 220 pd label :dientich pu fd 100 pd
repeat 2[fd :r rt 90 fd :d rt 90]
]]]
end