Thực hành: 35p Hoạt động của Gv Hoạt động của Hs Nội dung Hoạt động 1: 15p Viết chương trình nhập các số Học sinh độc lập thực hiện Viết chương trình nhập các số nguyên x nguyên x và y, [r]
(1)Trường THCS Lý Tự Trọng Giáo án tin học Tuần:7 PHẦN 1: Tiết: 13 LẬP TRÌNH ĐƠN GIẢN Ngày soạn: 25 /07/2010 Bài thực hành số Ngày dạy: / /2010 KHAI BÁO VÀ SỬ DỤNG BIẾN I Mục tiêu: Kiến thức: - Thực khai báo đúng cú pháp, lựa chọn kiểu liệu phù hợp cho biến - Kết hợp lệnh Write, Writeln với Read, Readln để thực việc nhập liệu cho biến từ bàn phím - Hiểu các kiểu liệu chuẩn: số nguyên, số thực - Hiểu cách khai báo và sử dụng Kĩ năng: - Rèn luyện kĩ kết hợp câu lệnh Write, Writeln với Read, Readln Thái độ: - Thái độ học tập nghiêm túc, yêu thích môn học II Chuẩn bị: Gv: Nội dung bài thực hành, máy tính điện tử Hs: xem bài trước nhà III Tiến trình thực hành: Ổn định lớp: (1p) Kiểm tra bài cũ: (4p) ? Nêu các thao tác có thể thực với biến ? Hãy nêu điểm khác biến và hằng? Thực hành: (35p) Hoạt động Gv Hoạt động Hs Hoạt động 1: 15p Viết chương trình có khai báo và sử dụng biến Học sinh độc lập thực - Bài toán: Một cửa hàng cung viết chương trình cấp dịch vụ bán hàng toán nhà Khách hàng cần đăng kí số lượng mặt hàng Var cần mua, nhân viên cửa hàng Soluong,: integer; Dongia, thanhtien: real; sẻ trả hàng và nhận tiền toán nhà khách hàng Thongbao: String; Ngoài giá trị hàng hoá, khách Const phi=10000; hàng còn phải toán khách hàng còn phải trả thêm phí dịch vụ hãy viết chương trình Pascal để tính tiền toán trường hợp khách hàng mua mặt hàng Nội dung Bài toán: Một cửa hàng cung cấp dịch vụ bán hàng toán nhà Khách hàng cần đăng kí số lượng mặt hàng cần mua, nhân viên cửa hàng sẻ trả hàng và nhận tiền toán nhà khách hàng Ngoài giá trị hàng hoá, khách hàng còn phải toán khách hàng còn phải trả thêm phí dịch vụ hãy viết chương trình Pascal để tính tiền toán trường hợp khách hàng mua mặt hàng Program Tinh_tien; Uses CRT; Var Soluong,: integer; Dongia, thanhtien: real; Thongbao: String; Hoạt động 2: 20p Const phi=10000; -Khởi động Pascal Gõ - Khởi động Pascal và gõ Begin Thongbao:= ‘Tong so tien phai chương trình sau và tìm hiểu ý chương trình toan’; nghĩa câu lệnh chương trình {Nhap don gia va so luong hang} Writeln(‘don gia’); Readln(dongia); Writeln(‘So luong’); Readln(soluong); Thanhtien:= soluong*dongia + phi; (*In so tien phai tra*) Writeln(thongbao,thanhtien:10:2); Readln; End Gv: Trần Văn Bé Hai Lop8.net (2) Trường THCS Lý Tự Trọng Củng cố: 4p -Gọi hs nhắc lại các thao tác đã làm -Nhận xét và đánh giá tiết thực hành Dặn dò: 1p -Xem lại các nội dung đã thực hành - Tiết sau thực hành: “ Bài thực hành số 3” (tt) Giáo án tin học Rút Kinh nghiệm Gv: Trần Văn Bé Hai Lop8.net (3) Trường THCS Lý Tự Trọng Giáo án tin học Tuần:7 PHẦN 1: Tiết: 14 LẬP TRÌNH ĐƠN GIẢN Ngày soạn: 25 /07/2010 Bài thực hành số Ngày dạy: / /2010 KHAI BÁO VÀ SỬ DỤNG BIẾN I Mục tiêu: Kiến thức: - Thực khai báo đúng cú pháp, lựa chọn kiểu liệu phù hợp cho biến - Kết hợp lệnh Write, Writeln với Read, Readln để thực việc nhập liệu cho biến từ bàn phím - Hiểu các kiểu liệu chuẩn: số nguyên, số thực - Hiểu cách khai báo và sử dụng Kĩ năng: - Rèn luyện kĩ kết hợp câu lệnh Write, Writeln với Read, Readln Thái độ: - Thái độ học tập nghiêm túc, yêu thích môn học II Chuẩn bị: Gv:Nội dung bài thực hành, máy tính điện tử Hs:xem bài trước nhà III Tiến trình thực hành: Ổn định lớp: (1p) Kiểm tra bài cũ: (4p) -Viết khai báo cho chương trình sau: Viết chương trình nhập các số nguyên x và y, in giá trị x và y màn hình Sau đó hoán đổi các giá trị x và y in màn hình giá trị x và y Thực hành: (35p) Hoạt động Gv Hoạt động Hs Nội dung Hoạt động 1: 15p Viết chương trình nhập các số Học sinh độc lập thực Viết chương trình nhập các số nguyên x nguyên x và y, in giá trị x và viết chương trình và y, in giá trị x và y màn hình y màn hình Sau đó hoán đổi Sau đó hoán đổi các giá trị x và y Program hoan_doi; các giá trị x và y in màn in màn hình giá trị x và y Var x,y,z: Integer; hình giá trị x và y Begin Read(x,y); Program hoan_doi; Writeln(x,’ ‘,y); Var x,y,z: Integer; Z:=x; Begin X:=y; Read(x,y); Y:=z; Writeln(x,’ ‘,y); Writeln(x,’ ‘,y); Z:=x; Readln; X:=y; End Y:=z; Hoạt động 2: 15p Writeln(x,’ ‘,y); -Khởi động Pascal Gõ chương Readln; End trình sau Chạy chương trinh và kiểm tra kết Củng cố: 4p -Gọi hs nhắc lại các thao tác đã làm -Nhận xét và đánh giá tiết thực hành Dặn dò: 1p - Xem lại các nội dung đã thực hành - Tiết sau làm bài tập Rút Kinh nghiệm Gv: Trần Văn Bé Hai Lop8.net (4)