Đang tải... (xem toàn văn)
- 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ình2. Kĩ năng.[r]
(1)Tiết 7: BÀI THỰC HÀNH SỐ (t1) I Mục tiêu
Kiến thức
- Biết chương trình Pascal hồn chỉnh
- Làm quen với dịch vụ chủ yếu Turbo Pascal việc soạn thảo, lưu chương trình, dịch chương trình thực chương trình
2 Kĩ năng
- Soạn chương trình, lưu lên đĩa, dịch lỗi cú pháp, thực tìm lỗi thuật tốn hiệu chỉnh
- Bước đầu biết phân tích hồn thành chương trình đơn giản Turbo pascal
Thái độ: Tự giác, tích cực chủ động 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 tập 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 cũ: Tiến hành trình thực hành.
3 Tiến trình học
Hoạt động thầy 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 tập HS: Giả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 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 chương trình - Nhập liệu -3 => Thông báo kết - Trở hình soạn thảo - Thực chương trình - Nhập liệu => Thơng báo kết - Hỏi: Vì có lỗi xuất hiện?
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;
(2)Hoạt động thầy trò - HS Nội dung -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 yêu cầu giáo viên
+ Trả lời: Thông báo lỗi Do bậc hai 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,); 4 Tổng kết hướng dẫn học tập nhà
- Tổng kết lỗi học sinh hay gặp trong trình thực hành cách giải
- Nhắc lại lệnh dịch, thực chương trình
- Bài tập nhà: Viết chương trình tính diện tích hình trịn với bán kính a nhập vào từ bàn phím
máy tính