1. Trang chủ
  2. » Tất cả

Giao an tin hoc 8 bai tap 6

2 0 0

Đang tải... (xem toàn văn)

THÔNG TIN TÀI LIỆU

Nội dung

Giáo án Tin học 8 VnDoc com Tải tài liệu, văn bản pháp luật, biểu mẫu miễn phí 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ề[.]

Giáo án Tin học Tuần: 14 Tiết: 27 Ngày soạn: Ngày dạy: BÀI TẬP I MỤC TIÊU: Kiến thức: - Biết sửa lỗi thực bước giải tốn máy tính - Biết cách viết câu lệnh điều khiển chương trình Kĩ năng: Rèn luyện kỹ vận dụng lý thuyết làm tập Thái độ: Học tập tích cực, nghiêm túc, có tinh thần tự giác, u thích mơn học II CHUẨN BỊ: Giáo viên: Sách giáo khoa, máy tính điện tử, giáo án, máy chiếu Học sinh: Vở ghi, sách giáo khoa III CÁC HOẠT ĐỘNG DẠY – HỌC: Ổn định lớp: (1’) 8A1:…………………………………………………………………………… 8A2:…………………………………………………………………………… Kiểm tra cũ: Lồng ghép nội dung học Bài mới: Hoạt động GV Hoạt động HS Hoạt động 1: (43’) Bài tập vận dụng + GV: Hướng dẫn HS làm số + HS: Vận dụng kiến thức tập vận dụng sau: học vào làm bài: Sửa lỗi đơn giản + HS: Chương trình sau chương trình sửa là: + GV: Đưa yêu cầu toán: Program Ba_canh_Tam_giac; Xác định lỗi sai sửa lỗi cho Uses Crt; chương trình sau Var a, b, c: Real; Program 3_canh Tam_giac BEGIN Uses Crt; Clrscr; Var a, b, c:= Integer; Write(„Nhap ba so a, b, c : ‟); BEGIN Readln(a, b, c); Clrscr; If (a+b>c) and (b+c>a) and Write(“Nhap ba so a, b, c : ”); (c+a>b) Then Writeln(„a, b, c la Readln(a; b; c); ba canh cua mot tam giac‟) Else If c> or a> or (c+a>b) Writeln(„a, b, c khong la ba canh Then Writeln(„a, b, c la ba canh cua cua mot tam giac‟); mot tam giac‟); Else Writeln(„a, b, c Readln khong la ba canh cua mot tam END giac‟); Readln END Xác định tốn, mơ tả thuật + HS: Xác định tốn sau tốn tính diện tích hình trịn sau: Viết chương trình nhập hai số Input: a, b nguyên a b khác từ bàn Output: Sắp sếp tăng dần Nội dung ghi bảng I Bài tập vận dụng Sửa lỗi đơn giản 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 Xác định tốn, mơ tả thuật tốn * Xác định toán: Input: a, b Output: Sắp sếp tăng dần * Mơ tả thuật tốn: VnDoc.com - Tải tài liệu, văn pháp luật, biểu mẫu miễn phí Giáo án Tin học phím in hình hai số Bước 1: Nhập hai số nguyên a, b Bước 1: Nhập hai số theo thứ tự không giảm dần từ bàn phím nguyên a, b từ bàn phím Bước 2: Nếu a  b hiển thị Bước 2: Nếu a  b hiển hình giá trị biến a trước thị hình giá trị biến đến giá trị biến b a trước đến giá trị biến Bước 3: Nếu b < a hiển thị b hình giá trị biến b trước Bước 3: Nếu b < a hiển đến giá trị biến a thị hình giá trị biến Bước 4: Kết thúc b trước đến giá trị biến + GV: Hướng dẫn HS thực viết + HS: Thực theo hướng a thuật toán dẫn gợi mở GV Bước 4: Kết thúc Viết chương trình với ngơn ngữ + HS: Dựa thuật toán Viết chương trình với lập trình Pascal mơ tả viết đoạn chương trình ngơn ngữ lập trình Pascal Program Sap_xep; sau: Program Sap_xep; Uses Crt; Program Sap_xep; Uses Crt; Var A, B, T : Integer; Uses Crt; Var A, B, T : Integer; BEGIN Var A, B, T : Integer; BEGIN Clrscr; BEGIN Clrscr; Write(„Nhap A: ‟); Readln(A); Clrscr; Write(„Nhap A: ‟); Write(„Nhap B: ‟); Readln(B); Write(„Nhap A: ‟); Readln(A); Readln(A); If A

Ngày đăng: 24/03/2023, 07:44

w