Giáo án môn Tin học lớp 11 bài 7
Giáo án môn Tin học 11
Giáo án môn Tin học lớp 11 bài 7: Bài thực hành số 1 được biên soạn theo chuẩn kiến thức kĩ năng của Bộ GD&ĐT. Đây sẽ là tài liệu giáo án điện tử lớp 11 hay giúp quý thầy cô soạn giáo án điện tử môn Tin học 11 nhanh chóng và hiệu quả. Mời quý thầy cô cùng tham khảo.
I. Mục tiêu
1. Kiến thức
- Biết được một chương trình Pascal hoàn chỉnh.
- Làm quen với các dịch vụ chủ yếu của Turbo Pascal trong việc soạn thảo, lưu chương trình, dịch chương trình và thực hiện chương trình.
2. Kĩ năng
- Soạn được chương trình, lưu lên đĩa, dịch lỗi cú pháp, thực hiện và tìm lỗi thuật toán và hiệu chỉnh
- Bước đầu biết phân tích và hoàn thành một chương trình đơn giản trên Turbo pascal.
3. Thái độ: Tự giác, tích cực và chủ động trong thực hành.
II. Chuẩn bị
- Giáo viên: Phòng máy tính đã cài đầy đủ Turbo Pascal, máy chiếu projector.
- Học sinh: Sách giáo khoa, sách bài tập và bài tập đã viết ở nhà.
III. HOẠT ĐỘNG DẠY – HỌC
1. Ổn định tổ chức lớp
2. Kiểm tra bài cũ: Tiến hành trong quá trình thực hành.
3. Tiến trình bài học
Hoạt động của thầy và trò - HS |
Nội dung |
Hoạt động 1: Hướng dẫn học sinh giải bài tập giải phương trình bậc hai (15 phút) GV: Giới thiệu nội dung bài tập HS: Giải bài tập. Hoạt động 2: Hướng dẫn học sinh thực hành (30 phút) GV: Chiếu chương trình lên bảng. Yêu cầu học sinh thực hiện các nhiệm vụ: - Soạn chương trình vào máy. - Lưu chương trình. - Dịch lỗi cú pháp. - Thực hiện chương trình. - Nhập dữ liệu 1 -3 2. => Thông báo kết quả. - Trở về màn hình soạn thảo. - Thực hiện chương trình. - Nhập dữ liệu 1 0 2 => Thông báo kết quả. - Hỏi: Vì sao có lỗi xuất hiện? -Sửa lại chương trình không dùng biến d. HS: - Thực hành gõ chương trình vào máy. - Thực hành theo các yêu cầu của giáo viên. + Trả lời: Thông báo lỗi Do căn bậc hai của một số âm Readln(a, b, c); x1:=(-b-sqrt(b*b-4*a*c))/(2*a); x2:=(-b+sqrt(b*b-4*a*c))/(2*a); writeln(‘x1=’,x1:6:2, ‘x2=’,x2:6:2,);
|
Bài 1: Chương trình giải phương trình bậc hai: Program Giai_pt; Uses CRT; Var a,b,c,d,x1,x2:read; Begin clrscr; write(‘nhap a b c’); Readln(a,b,c); d:=b*b – 4*a*c; x1:=(-b – sqrt(d))/(2*a); x2:=-b/a-x1; writeln(‘x1=’,x1:6:2,’x2=’,x2:6:2,); Readln; End.
|