Giao diện mới của VnDoc Pro: Dễ sử dụng hơn - chỉ tập trung vào lớp bạn quan tâm. Vui lòng chọn lớp mà bạn quan tâm: Lưu và trải nghiệm

Giáo án Tin học 8: Bài tập (bài 6)

Giáo án Tin học 8: Bài tập

Giáo án Tin học 8: Bài tập (bài 6) có nội dung bám sát vào chương trình trong sách giáo khoa của Bộ Giáo Dục và Đào Tạo. Đây sẽ là giáo án điện tử lớp 8 hay giúp quý thầy cô thuận tiện cho việc biên soạn giáo án Tin học lớp 8.

Tuần: 14

Tiết: 27

BÀI TẬP

I. MỤC TIÊU:

1. Kiến thức:

  • Biết sửa lỗi và thực hiện các bước giải bài toán trên máy tính.
  • Biết cách viết câu lệnh điều khiển trong chương trình.

2. Kĩ năng: Rèn luyện kỹ năng vận dụng lý thuyết và làm các bài tập.

3. Thái độ: Học tập tích cực, nghiêm túc, có tinh thần tự giác, yêu thích môn học.

II. CHUẨN BỊ:

1. Giáo viên: Sách giáo khoa, máy tính điện tử, giáo án, máy chiếu.

2. Học sinh: Vở ghi, sách giáo khoa.

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

1. Ổn định lớp: (1’)

8A1:……………………………………………………………………………

8A2:……………………………………………………………………………

2. Kiểm tra bài cũ:

Lồng ghép trong nội dung bài học.

3. Bài mới:

Hoạt động của GV

Hoạt động của HS

Nội dung ghi bảng

Hoạt động 1: (43’) Bài tập vận dụng.

+ GV: Hướng dẫn HS làm một số bài tập vận dụng như sau:

1. Sửa các lỗi đơn giản trong chương trình.

+ GV: Đưa ra yêu cầu bài toán:

Xác định lỗi sai và sửa lỗi cho chương trình sau.

Program 3_canh Tam_giac

Uses Crt;

Var a, b, c:= Integer;

BEGIN

Clrscr;

Write(“Nhap ba so a, b, c : ”); Readln(a; b; c);

If <a+b>c> or <b+c>a> or (c+a>b) Then Writeln(‘a, b, c la ba canh cua mot tam giac’); Else Writeln(‘a, b, c khong la ba canh cua mot tam giac’);

Readln

END.

2. Xác định bài toán, mô tả thuật toán.

Viết chương trình nhập hai số nguyên a và b khác nhau từ bàn phím và in ra màn hình hai số đó theo thứ tự không giảm dần.

+ GV: Hướng dẫn HS thực hiện viết thuật toán

3. Viết chương trình với ngôn ngữ lập trình Pascal.

Program Sap_xep;

Uses Crt;

Var A, B, T : Integer;

BEGIN

Clrscr;

Write(‘Nhap A: ’); Readln(A);

Write(‘Nhap B: ’); Readln(B);

If A <= B Then Write(A,‘ ’,B);

If B < A Then Write(B,‘ ’,A);

Readln

END.

+ GV: Chỉnh sửa các sai sót cho HS trong quá trình các em thực hiện.

+ GV: Hướng dẫn HS thực hiện các thao tác viết chương trình trên.

+ GV: Quan sát và yêu cầu HS tự thực hiện theo cá nhân.

+ GV: Lấy một bài thực hiện còn thiếu sót trình chiếu và yêu cầu các bạn khác nhận xét bổ sung.

+ GV: Nhận xét và sửa các lỗi sai mà HS thường gặp.

+ GV: Yêu cầu một số HS lên thao tác lại các nội dung đã chỉnh sửa.

+ GV: Trình chiếu một bài hoàn chỉnh của HS và nhận xét.

+ HS: Vận dụng các kiến thức đã được học vào làm bài:

+ HS: Chương trình sau khi được sửa là:

Program Ba_canh_Tam_giac;

Uses Crt;

Var a, b, c: Real;

BEGIN

Clrscr;

Write(‘Nhap ba so a, b, c : ’); Readln(a, b, c);

If (a+b>c) and (b+c>a) and (c+a>b) Then Writeln(‘a, b, c la ba canh cua mot tam giac’) Else Writeln(‘a, b, c khong la ba canh cua mot tam giac’);

Readln

END.

+ HS: Xác định bài toán như sau tính diện tích hình tròn như sau:

Input: a, b

Output: Sắp sếp tăng dần.

Bước 1: Nhập hai số nguyên a, b từ bàn phím.

Bước 2: Nếu thì hiển thị ra màn hình giá trị biến a trước rồi đến giá trị biến b.

Bước 3: Nếu <thì hiển thị ra màn hình giá trị biến b trước rồi đến giá trị biến a.

Bước 4: Kết thúc.

+ HS: Thực hiện theo sự hướng dẫn gợi mở của GV.

+ HS: Dựa trên thuật toán được mô tả viết đoạn chương trình trên như sau:

Program Sap_xep;

Uses Crt;

Var A, B, T : Integer;

BEGIN

Clrscr;

Write(‘Nhap A: ’); Readln(A);

Write(‘Nhap B: ’); Readln(B);

If A <= B Then Write(A,‘ ’,B);

If B < A Then Write(B,‘ ’,A);

Readln

END.

+ HS: Thực hiện dưới sự hướng dẫn gợi mở của GV đưa ra.

+ HS: Quan sát GV thực hiện các thao tác trên.

+ HS: Thực hiện các thao tác theo từng cá nhân.

+ HS: Quan sát nhận xét và góp ý bổ sung sai sót của các bạn.

+ HS: Chú ý lắng nghe và sửa chữa những sai sót thường gặp.

+ HS: Một số HS lên bảng thao tác lại các nội dung đã chỉnh sửa.

+ HS: Quan sát và học tập bài làm tốt.

I. Bài tập vận dụng.

1. Sửa các lỗi đơn giản trong chương trình.

Program Ba_canh_Tam_giac;

Uses Crt;

Var a, b, c: Real;

BEGIN

Clrscr;

Write(‘Nhap ba so a, b, c : ’); Readln(a, b, c);

If (a+b>c) and (b+c>a) and (c+a>b) Then Writeln(‘a, b, c la ba canh cua mot tam giac’) Else Writeln(‘a, b, c khong la ba canh cua mot tam giac’);

Readln

END.

2. Xác định bài toán, mô tả thuật toán.

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

Input: a, b

Output: Sắp sếp tăng dần.

* Mô tả thuật toán:

Bước 1: Nhập hai số nguyên a, b từ bàn phím.

Bước 2: Nếu thì hiển thị ra màn hình giá trị biến a trước rồi đến giá trị biến b.

Bước 3: Nếu <thì hiển thị ra màn hình giá trị biến b trước rồi đến giá trị biến a.

Bước 4: Kết thúc

3. Viết chương trình với ngôn ngữ lập trình Pascal.

Program Sap_xep;

Uses Crt;

Var A, B, T : Integer;

BEGIN

Clrscr;

Write(‘Nhap A: ’); Readln(A);

Write(‘Nhap B: ’); Readln(B);

If A <= B Then Write(A,‘ ’,B);

If B < A Then Write(B,‘ ’,A);

Readln

END.

4. Củng cố:

  • Củng cố trong nội dung tiết bài tập.

5. Dặn dò: (1’)

  • Xem lại nội dung bài. Chuẩn bị cho bài thực hành.

IV. RÚT KINH NGHIỆM:

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

Chia sẻ, đánh giá bài viết
1
Sắp xếp theo
    🖼️

    Gợi ý cho bạn

    Xem thêm
    🖼️

    Giáo án tin học 8

    Xem thêm