TRƯỜNG THPT NGUYỄN XUÂN ÔN Giáo viên thực hiện: Hoàng Xuân Thắng Rẽ nhánh Ví dụ 1: Nếu em trả lời tốt câu hỏi thầy cho em điểm 10 Ví dụ 2: Nếu trời mưa chúng em tập bóng chuyền phòng tập khơng chúng em tập ngồi trời Rẽ nhánh Ví dụ 2: Thuật tốn giải phương trình bậc hai ax +bx+ c = (a ≠ 0) dạng sơ đồ khối S Đ Cấu trúc if - then Câu 1: Câu lệnh If-then viết cú pháp (với a, b số ngun) a) If a>b then a:=b; b) If a then a>b, a:=b; c) If-then(a>b,a:=b); Câu 2: Lệnh viết cú pháp (với A số ngun) A If A then A:=10 else A:=0; B If A < 10; then A:=10; else A:=0; C If A < 10 then A:=10 else A:=0; D If A < 10 then A:=10; else A:=0; Cấu trúc if - then Dạng thiếu Điều kiện S Dạng đủ Đ Câu lệnh Đ Điều kiện S Câu lệnh Câu lệnh Điều kiện S Đ Câu lệnh Điều kiện S Câu lệnh Đ Câu lệnh Ví dụ 3: Sử dụng câu lệnh if – then dạng thiếu để viết lệnh cho câu sau: Nếu X chia hết cho đưa thơng báo X số chẵn Nếu X khơng chia hết cho đưa thơng báo X số lẽ If X mod = then writeln(‘X la so chan’); If X mod 2 then writeln(‘X la so le’); Ví dụ 4: Em sử dụng câu lệnh if – then dạng đủ để viết hai câu lệnh ví dụ thành câu lệnh If X mod = then writeln(‘X la so chan ’) Else writeln(‘X la so le’); Ví dụ 5: Chương trình sau kiểm tra số X chẵn hay lẽ, lẽ giá trị X Nhóm 1: Em sử dụng cấu trúc if – then dạng thiếu dạng đủ để viết câu lệnh cho câu sau: Nếu X lớn khơng X số dương Nếu X lớn khơng X số dương ngược lại X số âm Nhóm 2: Em sử dụng cấu trúc if – then dạng thiếu để viết câu lệnh cho câu sau: Nếu D nhỏ đưa thơng báo phương trình vơ nghiệm Nhóm 3: Em sử dụng cấu trúc if – then dạng thiếu để viết câu lệnh cho câu sau: Nếu D tính đưa thơng báo phương trình có nghiệm kép Nhóm 4: Em sử dụng cấu trúc if – then dạng thiếu để viết câu lệnh cho câu sau: Nếu D lớn tính đưa nghiệm phương trình bậc hai Program Giai_PTB2; Var a, b, c:real; D, x1, x2: real; Begin write(‘a,b,c:’); readln(a,b,c); D:=b*b – 4*a*c; if D0 then Begin x1:=(-b-sqrt(D))/(2*a); x2:=-b/a – x1; writeln(‘x1= ‘,x1:8:3,’ x2= ‘,x2:8:3); end; Readln; End Program Giai_PTB2; Var a, b, c:real; D, x1, x2: real; Begin write(‘a,b,c:’); readln(a,b,c); D:=b*b – 4*a*c; if Db then a:=b; b) If-then a>b, a:=b; c) If-then(a>b,a:=b); d) If (a>b) then a:=b; Câu Cho đoạn chương trình sau: Readln (a, b ); If a mod b then writeln (a,’ Khong chia het cho ‘, b) Else writeln (a,’ chia het cho ‘, b); Nhận xét đoạn chương trình cho kết ta cho a= 10, b=2 10 chi het cho Câu Xét lệnh: if a>b then writeln(a); Hỏi a=7; b=6; lệnh đưa hình gì? a) Khơng đưa gì; b) Đưa số 6; c) Đưa số 7; d) Đưa số 67; Câu Xét lệnh If a > b then a:=a-b else a:=b-a; Phát biểu đúng? A Sau thực lệnh If-then-else a ≥ 0; B Sau thực lệnh If-then-else a > 0; C Sau thực lệnh If-then-else a ≤ 0; D Sau thực lệnh If-then-else a < 1 Câu lệnh If - then a Dạng thiếu : If then ; b Dạng đủ : If then else ; Câu lệnh ghép Begin ; end; [...]... If-then-else trên thì a > 0; C Sau khi thực hiện lệnh If-then-else trên thì a ≤ 0; D Sau khi thực hiện lệnh If-then-else trên thì a < 0 1 Câu lệnh If - then a Dạng thiếu : If then ; b Dạng đủ : If then else ; 2 Câu lệnh ghép Begin ; end;