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

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

Nội dung

Hoạt động 1 Giới thiệu ví dụ 1(20 phút)

GV: Gọi học sinh lên bảng viết chương trình của bài toán trên.

Có thể viết ngay trên máy tính để thực hiện thử.

GV: Gọi một HS lên chạy chương trình và sữa lỗi.

Cho HS chép bài vào vở

Hoạt động 2: Giới thiệu ví dụ 2 (20 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ì .

5. Một số ví dụ

Ví dụ 1: Tìm nghiệm của phương trình bậc 2: ax² + bx + c = 0 với a<>0

PROGRAM vidu1;

VAR a,b,c,x,x1,x2,delta:real;

BEGIN

Write(‘nhap a,b,a’); readln(a,b,c);

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

IF delta <0 THEN writeln(‘phuong

trinh vo nghiem’)

ELSE IF delta=0 THEN

Begin

X:=-b/2*a;

Writeln(‘phuong trinh co 1

nghiem la:’,x:8:2);

End

ELSE

Begin

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

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

End;

Readln

END.

Ví dụ 2:

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

AX² + BX + C= 0

Ví dụ 3:

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.