Giáo án môn Tin học lớp 11 bài 13

Hoạt động của thầy và trò

Nội dung

Hoạt động 1: Giới thiệu câu lệnh ghép (10 phút)

GV: Nhận xét số câu lệnh phải thực hiện với 2 trường hợp d<0 và d>0?

HS: Với d<0 thực hiện một lệnh

Với d>0 thực hiện 3 câu lệnh.

GV: Trong câu lệnh If – Then muốn thực hiện nhiều lệnh sau Then hay nhiều lệnh sau Else làm thế nào?

HS: Phát biểu ý kiến của mình.

GV: Khi đó ta cần gộp nhiều lệnh đó lại và coi đó là một câu lệnh trong chương trình. Các ngôn ngữ lập trình thường có cấu trúc để giúp ta thực hiện điều này.

GV trình chiếu đoạn chương trình có sử dụng câu lệnh ghép.

Hoạt động 2: Giới thiệu một số ví dụ (25 phút)

GV trình chiếu hai chương trình này và cho các em quan sát cách viết chương trình để các em hình thành dần cách viết một chương trình.

- Chạy thử chương trình và chỉ rõ các lệnh trong chương trình dùng để làm gì .

4. Câu lệnh ghép

- Trong ngôn ngữ Pascal, Câu lệnh ghép có dạng:

Begin

<các câu lệnh>

End;

Chú ý:

- Sau End phải là dấu; và trước Else không chứa dấu;

- Từ nay nói đến câu lệnh thì đó có thể là câu lệnh đơn hoặc là câu lệnh ghép.

Ví dụ: Đoạn chương trình sau trong ngôn ngữ Pascal có sử dụng chương trình ghép.

If d <0 then

Writeln (‘Phuong trinh vo nghiem’)

else

If d=0 then write ('PT co nghiem x1=x2=', -b/(2*a):6:2)

Else

Begin

X1:=(-B-SQRT(DELTA))/(2*A);

X2:= - B/A – X1;

writeln(‘X1=’,X1:6:3,’X2=’,X2:6:3);

End;

5. Một số ví dụ

Ví dụ 1 :

Tìm nghiệm thực của phương trình bậc hai

AX² + BX + C= 0

Ví dụ 2 :

Tìm số ngày của một năm: Năm nhuận là năm chia hết cho 400 hoặc chia hết cho 4 nhưng không chia hết cho 100.

program so_ngay;

uses crt;

var n,sn: integer;

begin

clrscr;

write('nhap nam:; readln(n);

if (n mod 400=0) or ((n mod 4 =0) and (n mod 100<>0)) then sn:=366

else

sn:=365;

write('So ngay nam',n,'la:',sn);

readln;

end.