Giáo án Tin học 8 Bài thực hành 5: Sử dụng câu lệnh lặp For.....Do (tiết 4 tiếp theo) mới nhất

I. MỤC TIÊU:

1. Kiến thức:

- Sử dụng các kiến thức đã học để làm một số bài tập

2. Kĩ năng:

- Rèn luyện kĩ năng sử dụng các câu lệnh trong Pascal

3. Thái độ:

- Thái độ học tập nghiêm túc, yêu thích môn học.

4. Năng lực hướng tới:

- Hình thành năng lực sử dụng công nghệ thông tinvà truyền thông, năng lực giải quyết vấn đề dựa trên tin học, năng lực tự học.

II. CHUẨN BỊ:

+ Giáo viên: Giáo án,SGK, tài liệu tham khảo, phòng máy.

+ Học sinh: Vở ghi và sách giáo khoa, chuẩn bị bài ở nhà.

III.HOẠT ĐỘNG DẠY - HỌC:

1. Ổn định lớp

     2. Kiểm tra bài cũ: trong khi thực hành.

3. Bài mới:

Hoạt động của GV

Hoạt động của HS

Nội dung

+ Hoạt động 1: Bài tập 1.

- Đối với từng đoạn chương trình Pascal sau đây, hãy cho biết lệnh Writeln in ra màn hình giá trị của i, j, k là bao nhiêu?

- Đoạn 1:

j:=2;

k:=3;

for i:=1 to 5 do

j:=j+1;

k:=k+1;

cach:=’ ‘;

writeln(j,cach,k);

- Đoạn 2:

j:=2;

k:=3;

for i:=1 to 5 do

begin

j:=j+1;

k:=k+1;

end;

cach:=’ ‘;

writeln(j,cach,k);

- Đoạn 3:

j:=2;

k:=3;

for i:=1 to 5 do

if i mod 2 = 0 then

j:=j+1;

k:=k+1;

cach:=’ ‘;

writeln(j,cach,k);

+ Hoạt động 2: Bài tập 2.

- Viết chương trình tính tổng: S=1/1+1/2+...+1/n với giá trị n nhập vào từ bàn phím

- Yêu cầu học sinh viết chương trình.

- Nhận xét chương trình của học sinh.

- Yêu cầu học sinh dịch, sửa lỗi và chạy chương trình

+ Học sinh đọc đề bài => suy nghĩ và trả lời.

- In ra màn hình:

74

- In ra màn hình:

78

- In ra màn hình:

44

+ Học sinh tìm hiều đề bài.

+ Học sinh viết chương trình theo yêu cầu của giáo viên.

Program Tinh_tong;

Var i,n: integer;

S: real;

Begin

Clrscr;

Write(‘Nhap n: ‘);

Readln(n);

S:=0;

For i:= 1 to n do

S:=S+1/i;

Writeln(‘S=’,S);

Readln;

End.

+ Thực hiện theo yêu cầu của giáo viên.

1.) Bài tập 1:

- Đối với từng đoạn chương trình Pascal sau đây, hãy cho biết lệnh Writeln in ra màn hình giá trị của i, j, k là bao nhiêu?

- Đoạn 1:

j:=2;

k:=3;

for i:=1 to 5 do

j:=j+1;

k:=k+1;

cach:=’ ‘;

writeln(j,cach,k);

- Đoạn 2:

j:=2;

k:=3;

for i:=1 to 5 do

begin

j:=j+1;

k:=k+1;

end;

cach:=’ ‘;

writeln(j,cach,k);

- Đoạn 3:

j:=2;

k:=3;

for i:=1 to 5 do

if i mod 2 = 0 then

j:=j+1;

k:=k+1;

cach:=’ ‘;

writeln(j,cach,k);

2.) Bài tập 2:

- Viết chương trình tính tổng: S=1/1+1/2+...+1/n với giá trị n nhập vào từ bàn phím

IV. CỦNG CỐ (3 phút)

Giáo viên nhận xét và đánh giá tiết bài tập.

V. HƯỚNG DẪN VỀ NHÀ: (2 phút)

- Về nhà xem lại bài và viết lại chương trình ra vở.

- Đọc trước bài 12: VẼ HÌNH KHÔNG GIAN VỚI GEOGEBRA.

VI. RÚT KINH NGHIỆM:

...........................................................................................................................................

...........................................................................................................................................