... music a.< /b> to watch b. to play c.to listen to 26< /b> swimming? –That’s Ok a.< /b> How about b. Let’s c.Shall 27< /b> .Teenagers like .the lastest pop music a.< /b> hearing b. hear c.to hear 28< /b> .She goes to the public ... world’s surface is……………………………… a.< /b> land b. mountains c.water 34 Lan ……………………… a < /b> new pair of shoes yesterday a.< /b> buys b. bought c.buying 35 Hoa learned how …………………… .a < /b> sewing machine a.< /b> using b. to use c.use ... a.< /b> in b. to c.of 23< /b> .They prefer reading .watching TV a.< /b> than b. more than c.to 24< /b> .What kinds of .do yo like? –I like cartoons a.< /b> books b. films c.pictures 25< /b> .What would you like...
... x< /b> t hoàn thiện câu < /b> trả lời, begin ý cho học sinh dấu chấm phẩy sau từ X1< /b> := ( -b – sqrt(D))/ (2*< /b> a)< /b> ; kh a < /b> end câu < /b> lệnh ghép X2< /b> := -b /a < /b> – X1< /b> ; Writeln(‘pt co nghiem: ‘ , X1< /b> :6 :2,< /b> X2< /b> :6 :2)< /b> ; end; 3.4 Hoạt ... GV: Dùng < /b> b ng phụ yêu cầu học sinh làm nhanh số tập rèn luyện B i 1: Trong < /b> câu < /b> lệnh sau, câu < /b> lệnh đúng? Giải thích cách chọn < /b> A < /b> if (x>< /b> 1) and (y>1) then v= x+< /b> y; B iff (x>< /b> 1) and (y>1) then v := x+< /b> y; ... câu < /b> lệnh ghép (câu < /b> lệnh hợp thành) - Trong < /b> Pascal, câu < /b> lệnh ghép có dạng: - GV: Lưu < /b> ý học sinh phân biệt phần Begin thân chương trình cấutrúccâu < /b> câu < /b> lệnh>; lệnh ghép End; - Trong < /b> cấu trúc...
... hình giá < /b> trị < /b> a,< /b> bsau x< /b> p Viết chương trình cho máy nhận vào giá < /b> trị < /b> hai biến < /b> a,< /b> b, c sau x< /b> p theo thứ tự tăng dần in hình giá < /b> trị < /b> a,< /b> b, c sau x< /b> p Nhập số thực a,< /b> b, c a < /b> X< /b> t xem a,< /b> b, c có lập ... Trong < /b> đó: p= (a+< /b> b+ c) /2 < /b> Ta có chương trình: Program tamgiac; var a,< /b> b, c,p,s:real; Begin Write('Nhap vao so thuc:'); Readln (a,< /b> b, c); if (a+< /b> b> c) and (b+ c >a)< /b> and (c +a>< /b> b) then Begin Writeln('Ba so lap ... sau nâng yêu cầu lên B i tốn có chương trình sau: Program tamgiac; Var a,< /b> b, c,tg:real; Begin Writeln('Nhap so a,< /b> b, c '); Readln (a,< /b> b, c); if (a+< /b> b> c) and (b+ c >a)< /b> and (c +a>< /b> b) then Begin Writeln('ba...
... X < /b> + b) if X < /b> > then X:< /b> = X < /b> + 1; Giá < /b> triX < /b> giá < /b> trị < /b> X < /b> trước Câu < /b> 2:< /b> Biểu thức dùng < /b> làm điều kiện câu < /b> lệnh rẽnhánh (IF THEN ) a < /b> 2*< /b> x+< /b> m b m>n c sqr(m) d x:< /b> =m Câu < /b> 3: Hãy đọc đoạn chương trình sau: ... (Nếu có) Write(‘nhap c=’); Readln(c); - GV hồn thiện chương trình If ( (a+< /b> b) >c) and ( (b+ c) >a)< /b> and ( (a+< /b> c) >b) then Writeln( a,< /b> b, c la canh cu tam giac); Else Writeln (a,< /b> b, c khong phai la canh cua tam ... sau: if (a+< /b> b) * (a+< /b> b) b) * (a+< /b> b) else s:= 2*< /b> a*< /b> b; Khi nhập a < /b> = 5, b = kết s b ng: a)< /b> 121< /b> b) 49 c) 20< /b> d)Kết khác - Xem trước Cấutrúc lặp V Rút kinh nghiệm GV: Nguyễn Thị Anh Thư Trường...
... ngh a < /b> if-then? Câu < /b> ND2.DT.TH1 Câu < /b> lệnh if-then sau viết đúng? a < /b> If a>< /b> b then a:< /b> =b; b If – then a>< /b> b ,a:< /b> =b; c If- then (a>< /b> b ,a:< /b> =b) ; d If (a>< /b> b) then a:< /b> -b; Câu < /b> ND2.DL.NB1 X< /b> t lệnh: If a>< /b> b then write (a)< /b> ; ... a>< /b> b; then d: =a < /b> else d: =b; c If a>< /b> b; then d: =a < /b> else d: =b d If a>< /b> b then d: =a < /b> else d: =b Câu < /b> ND3.DL.NB1 X< /b> t lệnh: If a>< /b> b then a:< /b> =a-< /b> b else a:< /b> =b -a;< /b> Nếu a=< /b> 5, b =2 < /b> kết trả là? a < /b> Khơng đ a < /b> b c d Câu < /b> ND3.DL.TH1 ... đ a < /b> giá < /b> trị < /b> nhỏ < /b> hai số a,< /b> b? Câu < /b> ND2.TH.TH1 Hãy lỗi chương trình sau: Var a,< /b> b: longint; Begin Readln (a,< /b> b) ; If a>< /b> b then write( a < /b> lon hon b ); If a>< /b> c then write( a < /b> lon hon c’); Readln End Câu < /b> ND2.TH.VDT1...
... lặp ch a < /b> biết trước? BA < /b> Điều kiện Điều kiện Sai < /b> SaiĐúngĐúngCâu < /b> lệnh Câu < /b> lệnh D C Điều kiện Điều kiện Sai < /b> SaiĐúngSai < /b> SaiSai < /b> ĐúngCâu < /b> lệnh Câu < /b> lệnh Câu < /b> 3: Câu < /b> lệnh rẽnhánh if-then Sau if ... sau đây: a:< /b> = 34; b: =10; for i:=5 to begin b: = a-< /b> b; a:< /b> =a+< /b> i div 2;< /b> end; Hãy cho biết sau thực xong đoạn chương trình thì? i=? A < /b> B C D.0 a=< /b> ? A < /b> 36 B 42 < /b> C 39 D 46 10 b= ? A.< /b> 15 B .24< /b> C. 12 < /b> D .27< /b> Đáp án < /b> ... đoạn chương trình sau cho biết giá < /b> trị < /b> max? a:< /b> = 34; b: =78; if ab then max: =b else max: =a;< /b> write(max); A < /b> 34 C Thông b o lỗi B 78 D Tất đểu sai < /b> Câu < /b> 7: Hãy cho đoạn chương trình lặp câu < /b> lệnh for-do...
... dụngphương < /b> pháp dạy học truy vấn vào cấutrúcrẽnhánh để học sinh hiểu cấutrúcrẽ nhánh, câu < /b> lệnh rẽnhánh dạng thiếu dạng đủ việc sử dụngcấutrúcrẽnhánh lập trình Vận dụngcấutrúcrẽnhánh ... rõ cấutrúcrẽnhánh cần đ a < /b> ví dụ cụ thể Để tìm max hai số a,< /b> b ta làm B i toán đơn giản nên học sinh dễ dàng thấy cốt lỗi toán câu < /b> lệnh if (a>< /b> b) then write(‘max= ‘ ,a)< /b> else write(‘max= ‘ ,b) ; ... cấutrúcrẽnhánh SVTH: Tran Thi Thu Thao Trang 23< /b> Hoạt động GV Hoạt động HS Nội dung Hoạt động 1: Rẽnhánh - GVA: sốngdạy học Cấutrúcrẽnhánh Tin -h Cấunhánhcó hai Phương < /b> Trong < /b> pháp...
... hình: a)< /b> -1 b) c) d) -101 Câu < /b> ND2.DL.TH.3 Câu < /b> lệnh sau cho kết nào? if b> a < /b> then c:= b else c:= a;< /b> a < /b> Hoán đổi giá < /b> trị < /b> biến < /b> a,< /b> b c Tìm giá < /b> trị < /b> c = max (a,< /b> b) b Tìm giá < /b> trị < /b> c = min( a,< /b> b) d Câu < /b> lệnh ... tg: =a;< /b> a:< /b> =b; b: =tg; end; Câu < /b> ND4.DL.NB.1 X< /b> t lệnh: if (a b) then begin a:< /b> = -a;< /b> b: = -b; end; Phát biểu đúng? a < /b> Sau thực lệnh a < /b> lớn b; bSau thực lệnh a < /b> ln lớn b; c Sau thực lệnh a < /b> ln nhỏ < /b> b; d Sau ... rẽnhánh thiếu? Câu < /b> ND2.DT.TH.1 Câu < /b> lệnh If-then viết cú pháp? a < /b> if a < /b> > b then a:< /b> = b; c if-then a < /b> > b, a:< /b> = b; b if-then (a < /b> > b ,a:< /b> = b) ; d if (a < /b> > b) then a:< /b> = b; Câu < /b> ND2.DT.TH .2 < /b> Muốn < /b> kiểm tra hai...
... tự nhiên Cách Cách Ví dụ 3: Tính chu vi, diện tích tam giác Phương < /b> pháp liệt kê B1 Nhập cạnh a,< /b> b, c B2 Kiểm tra xem a,< /b> b, c có phải ba cạnh tam giác không Nếu (a+< /b> b> c) (b+ c >a)< /b> (a+< /b> c >b) sang b ớc Nếu ... thuật có thoả mãn khơng, có đến mức độ 2.< /b> 2.1 Thiết kế từ xuống B I TOÁN A < /b> A1 B C C1 A2< /b> C2 10 A2< /b> .1 A2< /b> .2 < /b> A2< /b> .3 Các < /b> tốn lớn đòi hỏi < /b> giải thuật có quy mơ lớn - Mơ-đun hố B i tốn = nhiều mơ-đun ... a1< /b> ,…,an B ớc 1: Gán Min = a1< /b> ,i =2;< /b> B ớc 2:< /b> Nếu i > N đ a < /b> Min kết thúc; B ớc 3: : So sánh với a[< /b> i], >[i] gán = a[< /b> i] B ớc 4: Nếu i trị < /b> nhỏ < /b> nhất:< /b> Min 1.3 Các...
... • • • • • • • • • nghiệm” Program GPTB2; Uses crt; Var a,< /b> b, c, d, x1< /b> , x2< /b> : real; Begin Clrscr; Writeln (‘Nhap cac he so a,< /b> b, c’); Readln (a,< /b> b, c); d:= b* b – 4 *a*< /b> c; if D a)< /b> :0:8) else begin writeln (‘Phuong trinh co nghiem phan biet’); writeln ( x1< /b> =’,( -b + sqrt(d))/ (2*< /b> a)< /b> :0:8); writeln ( x2< /b> =’,( -b - sqrt(d))/ (2*< /b> a)< /b> :0:8); end; readln; End Ví dụ 2:< /b> Tìm ... 1 Rẽ nhánh: - Ví dụ: B n B rủ b n A < /b> đến nhà chơi • A < /b> nói: Nếu chiều trời khơng m a < /b> đến nhà câu < /b> • Một lần khác A < /b> rủ B nhà chơi • B nói: Nếu chiều trời khơng m a < /b> đến, m a < /b> khơng đến -m Cách...
... chương trình xong nhận x< /b> t vơ nghiệm” ch a < /b> b i) Program GPTB2; Uses crt; Var a,< /b> b, c, d, x1< /b> , x2< /b> : real; Begin Clrscr; Writeln (‘Nhap cac he so a,< /b> b, c’); Readln (a,< /b> b, c); d:= b* b – 4 *a*< /b> c; if D lệnh if – then câu < /b> lệnh ghép Các < /b> em học làm cho thầy tập sau: B i : Viết chương trình giải tốn cho máy nhận vào ba số b t kì, x< /b> t xem ba số có lập thành ba số đo ba cạnh tam ... kep:’, -b/ (2*< /b> a)< /b> :0:8) else begin writeln (‘Phuong trinh co nghiem phan biet’); writeln ( x1< /b> =’,( -b + sqrt(d))/ (2*< /b> a)< /b> :0:8); writeln ( x2< /b> =’,( -b - sqrt(d))/ (2*< /b> a)< /b> :0:8); end; readln; End Ví dụ 2:< /b> Tìm...
... Max: =a;< /b> If b >a < /b> then Max: =b; Caùch 2:< /b> If a>< /b> b Then Max: =a < /b> Else Max: =b; Cách nhanh hơn,tiện hơn? Vì sao? Cách 2:< /b> Tiện hơn, hay sử dụngcâu < /b> lệnh Câu < /b> lệnh ghép - Trong < /b> ngôn ngữ Pascal, câu < /b> ... lệnh rẽnhánh thiếu, rẽnhánh đầy đủ áp dụng để thể thuật toán số toán đơn giản Khái niệm rẽnhánh B i toán: Viết chương trình giải phương < /b> trình b c hai: ax2 + bx + c=0; Tính =b2 - 4ac ... đặt Begin End ; d) Nếu sau Then muốn < /b> thực nhiều câu < /b> lệnh cần liệt kê lệnh Hãy đánh dấu vào đáp số Câu < /b> 2:< /b> Cho đoạn chương trình sau Begin x:< /b> =a;< /b> if ab then x:< /b> =b; End a)< /b> Cho a < /b> =20< /b> ; b= 15 Kết x < /b> bao...
... trình b c hai BD B1 NhËp vµo a,< /b> b, c B2 ∆ =b - B3 4ac ® ∆ - b/ 2a < /b> ∆ =0 s PT cã nghiÖm x1< /b> ,x2< /b> = ( -b √∆ )/ 2a < /b> KT B5 B7 B6 Mô thuật toán giải phương < /b> trình b c hai B ... trình b c hai B TEST 2:< /b> BD a < /b> c ∆ a,< /b> b, c= a,< /b> b, c nhËp vµo b ∆ = 2< /b> 2 < /b> − 4∗1∗1 = ∆ = b* b − 4 *a*< /b> c ∆ < S PT v« nghiƯm § ∆ = S § PT cã nghiÖm kÐp x=< /b> -1 PT cã nghiÖm x=< /b> -b/ 2a < /b> PT cã nghiÖm x1< /b> , x2< /b> = ( -b )/ 2a < /b> ... phương < /b> trình có nghiệm: x1< /b> :=( -b +sqrt(Delta))/ (2*< /b> a)< /b> ; x2< /b> :=( -b - sqrt(Delta))/ (2*< /b> a)< /b> ; Vẽ sơ đồ thực b ớc B t đầu Nhập a,< /b> b, c Delta: =b* b+4 *a*< /b> c Sai < /b> Nếu delta>=0 Thông b o pt vô nghiệm Đúng Tính in...
... and (a+< /b> b> c) and (b+ c >a)< /b> and (a+< /b> c >b) then Nhập a,< /b> b, c S Write( a,< /b> b, c la ba canh tam giac’) Else Write(‘ khong la ba canh tam giac’); a,< /b> b, c kgông cạnh tam giác a>< /b> 0 ,b> 0, c>0 ,a+< /b> b> c, b+ c >a,< /b> a+< /b> c >b ... nguyen a,< /b> b, c); Read (a)< /b> ; Readln (a,< /b> b, c); If a < /b> mod 2=< /b> 0 then If (a>< /b> 0) and (b> 0) and (c>0) and (a+< /b> b> c) and (b+ c >a)< /b> and (a+< /b> c >b) then Write( ‘ a < /b> la so chan ’) Write( a,< /b> b, c la ba canh tam giac’) Readln ... b cho a}< /b> Nhập a,< /b> bb =2;< /b> S a>< /b> b BEGIN Đ tg: =a;< /b> a:< /b> =b; Câu < /b> lệnh ghép b: =tg; Write(‘doi cho b cho a,< /b> ket qua la’, a,< /b> b) ; END Else Write(‘khong doi cho’); Keát a,< /b> b tg a < /b> b tg a;< /b> a < /b> b; b tg Kết a,< /b> bRẼ NHÁNH...
... trình b c sau tính delta • • If (delta< 0) then writeln (‘phuong trinh vo nghiem’) Else Begin x1< /b> :=( -b- sqrt(delta))/ (2*< /b> a)< /b> ; x2< /b> :=( -b /a < /b> -x1< /b> ); writeln(‘nghiem la x1< /b> =’ ,x1< /b> , x2< /b> =’ ,x2< /b> ); End; CẤUTRÚCRẼNHÁNH ... âm đ a < /b> nghiệm, ngược lại ta thông b o phương < /b> trình vô nghiệm CẤUTRÚCRẼNHÁNH • I RẽNhánh – Mọi Ngôn Ngữ Lập Trình cócâu < /b> lệnh để miêu tả cấutrúcrẽnhánh Nhập a,< /b> b, c Delta< -b2 -4ac Sai < /b> TB vô ... thì…… CẤU TRÚCRẼNHÁNH • I RẽNhánh – Trong < /b> thuật toán, thao tác thường phụ thuộc vào kết b ớc trước – Ví dụ giải phương < /b> trình b c hai: ax2+bx+c=0 • Trước tiện ta tính Delta =b2 -4ac • Nếu Delta không...
... giải phương < /b> trình b c 2:< /b> ax2+bx+c=0 (a< /b> 0) Biệt số Delta D =b2 -4ac Nếu D không âm, ta đ a < /b> nghiệm, ngược lại ta Thông b o phương < /b> trình vô nghiệm Như vậy, sau tính D, tùy thuộc vào giá < /b> trò D, Trong < /b> hai ... nghiệm thực thông b o: Phương < /b> trình vô nghiệm” Program Giai_PTB2; uses crt; Var a,< /b> b, c:real; D ,x1< /b> , x2< /b> : real; Begin clrscr; write(‘ nhap cac he so a,< /b> b, c’); readln (a,< /b> b, c); D: =b* b-4 *a*< /b> c; If D < then ... else begin x1< /b> :=( -b- sqrt(D)) /2*< /b> a)< /b> ; x2< /b> := -b /a < /b> -x1< /b> ; writeln?( x1< /b> = ‘, x1< /b> :8:3, ‘ x2< /b> = ‘ ,x2< /b> :8:3); end; Readln End Ví dụ 2:< /b> Tìm số ngày năm N,biết năm nhuận năm chia hết cho 400 chia hết cho không Chia...
... Hs: ghi chép Vd: If delta > then begin x1< /b> := (- b + sqrt(delta))/ (2*< /b> a)< /b> ; x1< /b> := (- b - sqrt(delta))/ (2*< /b> a)< /b> ; end; Gv: Hướng dẫn cho hs tham khảo ví dụ sách IV Câu < /b> lệnh ghép begin câu < /b> lệnh; end; Một số ... ghép begin câu < /b> lệnh; end; Một số ví dụ - SGK Củng cố - Lấy ví dụ đơn giản máy cho học sinh quan sát - Ra tập nhà - Làm tập sách ...
... niệm BTĐK Là biểu thức mà giá < /b> trị < /b> có kiểu Boolean (True, False) dùng < /b> làm điều kiện thực lệnh máy >; =; dạng BTĐK and; or; not (and; or; not)+(>; =; ... Khối câu < /b> lệnh Thùc hiƯn c«ng viƯc Ghép nhiều câu < /b> lệnh: Begin End; If B then C else If D then E else G; C«ng viƯc C«ng viƯc = rỗng Kết thúc Cõu lnh r nhỏnh dng khuyết IF THEN CV1 ELSE CV2; ... C«ng viƯc C«ng viƯc = rỗng Kết thúc Cõu lnh r nhỏnh dng khuyết IF THEN CV1 ELSE CV2; BT§K CV2 ...