Các Bài Toán Not Equalp Trong MSW Logo - Tài Liệu Text - 123doc

Có thể bạn quan tâm

Tải bản đầy đủ (.docx) (9 trang)

Trang chủ

Công Nghệ Thông Tin

Kỹ thuật lập trình

Các bài toán Not Equalp trong MSW logo

Bạn đang xem bản rút gọn của tài liệu. Xem và tải ngay bản đầy đủ của tài liệu tại đây (82.66 KB, 9 trang )

Các dạng toán trong MSW LogoNOT EQUALPBài 1: Một cửa hàng có số gạp nếp và tẻ là 1950 kg. Sau khi bán 2/6 số gạp nếpvà 3/7 số gạo tẻ thì còn lại số gạo nếp bằng gạo tẻ. Hỏi lúc đầu có bao nhiêu kggạo nếp, bao nhiêu kg gạo tẻ?to gaomake "nep 0make "te 1950make "connep :nep-2/6*:nepmake "conte :te-3/7*:tewhile [not equalp :connep :conte] [make "nep :nep+1make "te :te-1make "connep :nep-2/6*:nepmake "conte :te-3/7*:te]rt 90 label [ so kg gao nep la : ] pu fd 170 pd label :nep pu fd 50 pdlabel [so kg gao te la: ] pu fd 170 pd label :teendBài 2: Trong giỏ vừa gà vừa thỏ100 cái chân, 43 cái đầuBao nhiêu gà? Bao nhiêu thỏ?to gathomake "ga 1make "tho 42make "chan 2*:ga+4*:thowhile [not equalp :chan 100] [ make "ga :ga+1make "tho :tho-1make "chan 2*:ga+4*:tho]rt 90 label [ so ga la: ] pu fd 100 pd label :gapu fd 200 pd label [so tho la: ] pu fd 100 pd label :thoendBài 3: Một rạp chiếu phim bán 500 vé được chia làm 2 loại:Loại 1: 50 000/véLoại 2: 35 000/véBiết tổng số tiền thu được là: 22 000 000Hỏi có bao nhiêu vé mỗi loại được bán ra?to banvemake "l1 1make "l2 499make "tien :l2*35000+:l1*50000while [not equalp :tien 22000000] [make "l1 :l1+1make "l2 :l2-1make "tien :l2*35000+:l1*50000]rt 90 label [ so ve loai 1 la: ] pu fd 140 pd label :l1pu fd 100 pd label [so ve loai 2 la: ] pu fd 140 pd label :l2endBài 4: Cả hai thùng chứa 398 lít nước, nếu chuyển 50 lít nước ở thùng thứnhất sang thùng thứ hai thì nước trong thùng thứ hai nhiều hơn thùng thứnhất 16 lít. Tính nước ở mỗi thùng lúc đầu.to nuocmake "a 398make "b 0while [not equalp :a-50 :b+50-16] [make "a :a-1make "b :b+1]rt 90 label [ Nuoc trong thung thu nhat luc dau la: ] pu fd 350 pd label :apu home bk 20 rt 90 pdlabel [ Nuoc trong thung thu hai luc dau la: ] pu fd 350 pd label :bendBài 5: An có số viên bi xanh và đỏ tổng cộng là 95 viên. Sau khi cho Bình 2/5viên bi đỏ và cho sơn 1/3 viên bi xanh. Hỏi ban đầu An còn lại bao nhiêu viênbi đỏ và bao nhiêu viên bi xanh?to vienbimake "bx 0make "bd 95make "sobixanh :bx-1/3*:bxmake "sobido :bd-2/5*:bdwhile [not equalp :sobixanh :sobido ] [make "bx :bx+1make "bd :bd-1make "sobixanh :bx-1/3*:bxmake "sobido :bd-2/5*:bd]rt 90 label [So bi xanh la: ] pu fd 130 pd label :bxpu setxy 0 -20 pd label [So bi do la: ] pu fd 110 pd label :bdendBài 6: 12 con vừa gà vừa thỏ có tất cả 32 chân. Hỏi có bao nhiêu gà? Baonhiêu thỏ?to gathomake "ga 0make "tho 12make "chan :ga*2+:tho*4while [not equalp :chan 32] [make "ga :ga+1make "tho :tho-1make "chan :ga*2+:tho*4]rt 90 label [ so ga la: ] pu fd 100 pd label :gapu fd 200 pd label [so tho la: ] pu fd 100 pd label :thoendBài 7: Có 10 xe chở gạo gồm 2 loại. Loại I chở được 45 tạ và loại II chở được32 tạ. Tất cả đã chở được 39 tấn 8 tạ gạo. Hỏi có bao nhiêu xe mỗi loại?to xechogaomake "loai1 0make "loai2 10make "choduoc :loai1*45+:loai2*32while [not equalp :choduoc 398] [make "loai1 :loai1+1make "loai2 :loai2-1make "choduoc :loai1*45+:loai2*32]rt 90 label [ so xe loai I la: ] pu fd 140 pd label :loai1pu fd 200 pd label [so xe loai II la: ] pu fd 140 pd label :loai2endBài 8: Có 8 sọt đựng tất cả 1120 quả cam vừa quýt. Một sọt cam đựng được 75quả, mỗi sọt quýt đựng được 179 quả. Hỏi mỗi loại có bao nhiêu quả?to sotcamquytmake "sotcam 0make "sotquyt 8make "tongsoqua :sotcam*75+:sotquyt*179while [not equalp :tongsoqua 1120] [make "sotcam :sotcam+1make "sotquyt :sotquyt-1make "tongsoqua :sotcam*75+:sotquyt*179]make "cam :sotcam*75make "quyt :sotquyt*179rt 90 label [ so qua cam la: ] pu fd 140 pd label :campu fd 200 pd label [so qua quyt la: ] pu fd 140 pd label :quytendBài 9: Trong một kì thi có 30 câu hỏi. Mỗi câu đúng được cộng 5 điểm. Mỗicâu sai bị trừ 10 điểm. Tổng điểm của Hà là 105 điểm. Hỏi Hà làm được baonhiêu câu đúng?to diemhamake "dung 30make "sai 0make "tongdiem :dung*5-:sai*10while [not equalp :tongdiem 105] [make "dung :dung-1make "sai :sai+1make "tongdiem :dung*5-:sai*10]rt 90 label [ so cau dung la: ] pu fd 150 pd label :dungendBài 10: Việt có 20 viên bi, Nam có 8 viên bi. Cả Việt và Nam cho Bình 1 số binhư nhau. Sau đó Việt cho Nam số bi bằng số bi của Nam hiện có và nhậnthấy rằng số bi của Việt và Nam là bằng nhau. Hỏi Việt và Nam cùng choBình mấy viên bi?to bimake "bvls 20make "bnls 8make "nc :bvls-:bnlswhile [not equalp :nc :bnls*2] [make "bvls :bvls-1make "bnls :bnls-1make "nc :bvls-:bnls]make "2bc 20-:bvlsrt 90 label [Viet va Nam cung cho binh: ]pu fd 260 pd label :2bcpu fd 15 pd label [ vien ]endBài 11: Một người buôn 1.200đ/1 quả trứng. Đem về bị vỡ 20 quả. Số trứngcòn lại bán như sau: số trứng bán với giá 2.000đ/1 quả, số trứng bán với giá1.800đ/1 quả, còn lại bao nhiêu bán với giá 1.500đ/1 quả. Sau khi bán xonglãi 206.000. Tìm số trứng lúc đầu người đó mua?to trungmake "x 0make "tong (:x+20)*1200make "ban 2/4*:x*2000+1/4*:x*1800+(:x-3/4*:x)*1500make "lai :ban-:tongwhile [not equalp :lai 206000] [make "x :x+1make "tong (:x+20)*1200make "ban 2/4*:x*2000+1/4*:x*1800+(:x-3/4*:x)*1500make "lai :ban-:tong]make "sotbd :x+20rt 90 label [nguoi do mua la: ] pu fd 140 pd label :sotbdendBài 12: Hoa và Hương có một số tiền. Số tiền của Hoa = số tiền của Hương.Nếu Hoa tiêu hết 9 000đ và Hương tiêu hết 15 000đ thì Hương còn nhiều hơnHoa 39 000đ. Hỏi lúc đầu mỗi bạn có bao nhiêu tiền?to tienmake "huong 1000make "hoa :huong/8*3while [not equalp (:huong-15000)-(:hoa-9000) 39000] [make "huong:huong+1000make "hoa :huong/8*3]rt 90 label :hoapu fd 200 pdlabel :huongendBài 13: Cô giáo chia cho mỗi em 5 chiếc thì thừa 3 nếu chia mỗi em 6 chiếcthì thiếu 5. Hỏi cô có bao nhiêu kẹo?to chiakeomake "n 1make "c5 (:n-3)/5make "c6 (:n+5)/6while [not equalp :c5 :c6] [make "n :n+1make "c5 (:n-3)/5make "c6 (:n+5)/6]rt 90 label [So keo co giao co la:] pu fd 200 pd label :nendBài 14: 15 ô tô gồm 3 loại: loại 4 bánh chở 5 tấn, loại 6 bánh chở 10 tấn vàloại 6 bánh chở 8 tấn. 15 xe có 84 bánh và chở 121 tấn. Hỏi mỗi loại có mấyxe?to otomake "loai4 15make "loai6 0make "tongsobanh :loai4*4+:loai6*6while [not equalp :tongsobanh 84] [make "loai4 :loai4-1make "loai6 :loai6+1make "tongsobanh :loai4*4+:loai6*6]make "xeconlai 15-:loai4make "tanconlai 121-(:loai4*5)make "loai8t :xeconlaimake "loai10t 0make "tongsotan :loai8t*8+:loai10t*10while [not equalp :tongsotan :tanconlai] [make "loai8t :loai8t-1make "loai10t :loai10t+1make "tongsotan :loai8t*8+:loai10t*10]rt 90label [So xe 4 banh la:] pu fd 150 pd label :loai4pu setxy 0 -20 pdlabel [So xe 6 banh cho 8 tan la:] pu fd 250 pd label :loai8tpu setxy 0 -40 pdlabel [So xe 6 banh cho 10 tan la:] pu fd 270 pd label :loai10tendBài 15: Trong một cuộc thi có 60 câu hỏi. Mỗi câu trả lời đúng được 1/6điểm, mỗi câu trả lời sai bị trừ 1/2 điểm. Một bạn học sinh được tổng điểmlà 8. Hỏi bạn ấy trả lời đúng bao nhiêu câu ?to cauhoimake "dung 60make "sai 0make "tongsodiem :dung*1/6-*:sai*1/2while [not equalp :tongsodiem 8] [make "dung :dung-1make "sai :sai+1make "tongsodiem :dung*1/6-*:sai*1/2]rt 90 label [So cau tra loi dung la:] pu fd 210 pd label :dungendBài 16: Một vận động viên bắn súng trong một lần tập huấn phải bắn tấtcả 50 viên đạn. Mỗi viên trúng đích được cộng 10 điểm, mỗi viên trượt đíchbị trừ 5 điểm. Sau khi bắn hết 50 viên đạn vận động viên đó đạt được 440điểm. Hỏi vận động viên đó bắn trúng đích bao nhiêu viên?to bandanmake "trung 50make "truot 0make "tongdiem :trung*10-:truot*5while [not equalp :tongdiem 440] [make "trung :trung-1make "truot :truot+1make "tongdiem :trung*10-:truot*5]rt 90 label [So lan ban trung dich la:] pu fd 230 pd label :trungendBài 17: Có 36 con gà gồm hai loại: trọng lượng 2,7kg một con, loại gồm hailoại: trọng lượng 2,7kg một con, loại 3,3kg một con. Tổng trọng lượng hailoại là 109,8kg. Hỏi mỗi loại có bao nhiêu con gà?to congamake "tl2.7 36make "tl3.3 0make "tongtrongluong :tl2.7*2.7+:tl3.3*3.3while [not equalp :tongtrongluong 109.8] [make "tl2.7 :tl2.7-1make "tl3.3 :tl3.3+1make "tongtrongluong :tl2.7*2.7+:tl3.3*3.3]rt 90 label [ So con ga 2,7 kg la: ] pu fd 185 pd label :tl2.7pu fd 100 pd label [ So con ga 3,3 la: ] pu fd 165 pd label :tl3.3endBài 18: Một người mua 50 quả trứng vừa trứng gà vừa trứng vịt hết tất cả119.000đ. Biết giá mỗi quả trứng gà là 2.500đ, trứng vịt là 2.200đ. Hỏingười đó mua bao nhiêu quả trứng mỗi loại?to muatrungcs st pdmake "trungga 1make "trungvit 49make "tongtien :trungga*2500+:trungvit*2200while [not equalp :tongtien 119000] [make "trungga :trungga+1make "trungvit :trungvit-1make "tongtien :trungga*2500+:trungvit*2200]rt 90 label [so trung ga la:]pu fd 200 pd label :trunggapu setxy 0 -20 pd label [so trung vit la:]pu fd 200 pd label :trungvithtendBài 19: Trong một cuộc thi có 20 câu hỏi. Mỗi câu trả lời đúng được 10điểm còn câu trả lời sai thì không được điểm nào mà còn bị trừ 3 điểm. Mộthọc sinh đạt được 148 điểm. Hỏi bạn đó trả lời đúng mấy câu? Sai mấycâu?to dithics st pdmake "dung 20make "sai 0make "tongdiem :dung*10-:sai*3while [not equalp :tongdiem 148] [make "dung :dung-1make "sai :sai+1make "tongdiem :dung*10-:sai*3 ]rt 90 label [so cau dung la:]pu fd 200 pd label :dungpu setxy 0 -20 pd label [so cau sai la:]pu fd 200 pd label :saihtend

Tài liệu liên quan

Các bài toán quen thuộc trong lập trình Pascal
- 5
- 3
- 58
Tài liệu (Luyện thi cấp tốc Lý) Các bài toán cực trị trong điện xoay chiều_Trắc nghiệm và đáp án docx
- 9
- 876
- 12
Các bài toán đại số trong kỳ thi Olympic
- 82
- 654
- 1
Các bài toán đại số trong các kì thi Olympic
- 82
- 681
- 1
Tong hop Cac bai Toan Cuc Tri trong cac Ki thi HSG MonToan 9 THCS pptx
- 6
- 597
- 2
Tuyển tập các bài toán chọn lọc trong các đề thi thử đại học 2013 - 2014
- 22
- 783
- 1
Lý thuyết về các bài toán cực trị trong tam giác
- 2
- 800
- 1
Chuyên đề 3-Các bài toán về vectơ trong kg
- 18
- 702
- 2
Đẳng thức, bất đẳng thức và các bài toán cực trị trong tổ hợp
- 81
- 795
- 1
Hướng dẫn học sinh THCS giải các bài toán cực trị trong đại số
- 21
- 727
- 0