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

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

Nội dung

Hoạt động 1: Lập trình giải bài tập 5a (20 phút)

GV: Giới thiệu Nội dung thực hành: Bài 5 phần a.

GV: Viết công thức tính Y?

HS: Y = 1/2 + 2/3 + 3/4 + .....+ 50/51.

GV: Gọi học sinh xác định ý tưởng thuật toán bài 5.

HS: Sử dụng cấu trúc lặp với số lần biết trước.

GV: Yêu cầu học sinh xác định giá trị đầu, giá trị cuối và thao tác lặp trong câu lệnh

For - Do.

HS: For n:=1 to 50 Do

Y:=Y+n/(n+1);

GV: Giá trị khởi tạo của Y là bao nhiêu?

HS: khởi tạo giá trị của Y:=0.

GV: Yêu cầu học sinh thực hiện chương trình trên máy.

HS: Thực hành theo yêu cầu của giáo viên.

GV: Quan sát học sinh thực hành.

Hoạt động 2: Lập trình giải bài 8 trang 51 (20 phút)

GV: Trình bày ý tưởng bài toán?

HS:

- Tính tiền lãi một tháng.

- Tiền tháng sau:= Tiền tháng trước + lãi;

- Thực hiện lặp lại việc cộng lãi cho đến khi số tiền thu được là B đồng

GV: Sử dụng câu lệnh nào để tính?

HS: Lặp với số lần biết trước => Câu lệnh While - Do.

GV: Yêu cầu học sinh thực hiện chương trình trên máy.

HS: Thực hành chương trình:

GV: Quan sát học sinh thực hành và giải đáp thắc mắc trong quá trình thực hành.

Bài 5a. Lập trình tính:

Y =

Chương trình:

Program Bai5a;

Uses crt;

Var Y: real;

n: Byte;

Begin

Clrscr;

Y:=0;

For n:=1 to 50 do

Y:= Y+n/(n+1);

Readln;

End.

Bài 8: Một người gửi tiết kiệm không kỳ hạn với số tiền a đồng, lãi suất 1% mỗi tháng. Hỏi sau bao nhiêu tháng, người đó rút hết tiền thì sẽ nhận được số tiền ít nhất là B đồng? Biết rằng việc gửi tiết kiệm không kỳ hạn thì lãi không được cộng vào vốn.

Chương trình:

program Bai8;

Uses crt;

Var a,b,lai: real;

t: Word;

Begin

clrscr;

write('Nhap so tien ban dau:');

readln(a);

Write(' Nhap so tien rut ra:');

readln(b);

t:=0;

lai:= 0.01*a;

While a<b Do

begin

a:= a+ lai;

t:=t+1;

end;

Write('Sau ',t,' thang nguoi do thu duoc so tien la',b:8:3);

readln;

End.