CẤU TRÚC RẼ NHÁNHNGÀY DẠY

3. Ví dụ:

GV: Viết lên bảng ví dụ 1.

VD1: viết chương trình tính diện tích tam giác theo

GV: Yêu cầu học sinh xác định bài toán.

công thức herong có a,b,c nhập vào từ bàn phím.

HS: Xác định bài toán:

Program tamgiac;

Input: 3 số a,b,c nhập từ bàn phím.

Uses crt; Var a,b,c,p,s:real;

Output: diện tích tam giác hoặc thông báo

Begin

không là 3 cạnh tam giác.

Write(' nhap so do 3 canh tam giac:');

GV: Phân nhóm, yêu cầu học sinh thảo luận

Readln(a,b,c);

nhóm viết chương trình. Ghi lời giải vào bảng

phụ.

If (a+b>c) and (b+c>a) and (a+c>b) then

Begin

HS: Thảo luận nhóm và trình bày lời giải vào

P:=(a+b+c)/2; S:=sqrt(p*(p-a)*(p-b)*(p-c));

bảng phụ, đại diện nhóm lên treo bảng và trình

Write('dien tich',s:6:3);

bày, các nhóm khác nhận xét.

End;

GV: Trình bày hướng giải bài toán: vì độ dài 3

Else write(' 3 so khong la 3 canh tam giac');

cạnh tam giác là dương nên phải sử dụng lệnh

Readln

rẽ nhánh để kiểm tra giá trị độ dài nhập vào,

End.

đồng thời tổng hai cạnh tam giác phải lớn hơn

cạnh thứ ba. Tổng quát lời giải của học sinh và

cho điểm.

VD2: viết chương trình giải phương trình bậc hai:

GV: Yêu cầu học sinh làm ví dụ 2: viết

ax

²

+bx+c=0 (a<>0).

chương trình giải phương trình bậc hai:

Program pt;

Uses crt;

Var a,b,c,d,x1,x2:real;

Input:hệ số a,b,c nhập từ bàn phím.

Output:đưa ra màn hình nghiệm hoặc thông

Clrscr;

bào phương trình vô nghiệm.

Write('nhap he so phuong trinh:');

GV: Trình bày:các bước chính để tìm nghiệm

Readln(a,b,c);

D:=b*b-4*a*c;

phương trình bậc hai.

Tính delta

If d<0 then writeln('phuong trinh vo nghiem');

Nếu delta <0 thì kết luận phương trình vô

Else begin

nghiệm.

X1:=(-b-sqrt(d))/(2*a);

Nếu delta>=0 thì kết luận phương trình có

X2:=(-b+sqrt(d))/(2*a);

nghiệm: x:=(-b+sqrt(delta))/2a);

End;

x:=(-b-sqrt(delta))/2a);

Readln;

End.

Trong bài toán này cần hai lệnh rẽ nhánh

dạng thiếu, cũng có thể sử dụng một lệnh dạng

đủ.

HS: Viết chương trình.

.Củng cố:

-Câu lệnh rẽ nhánh dạng đủ và thiếu trong Pascal.

-Sơ đồ thực hiện và chức năng của câu lệnh if.

.Dặn dò bài tập về nhà:

-Viết chương trình nhập vào ba số và đưa ra giá trị lớn nhất.

.Rút kinh nghiệm bổ sung:

...

------

CHƯƠNG III: CẤU TRÚC RẼ NHÁNH VÀ LẶP