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 tố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 tố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 tố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 vng. 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
to hinh
repeat 4 [fd 120 rt 90 fd 168 rt 90]
cs rt 90
ht
make "ncv 576/2
end

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