II. Đồ dựng dạy học 1 Chuẩn bị của GV:
3. Cỏc bước tiến hành:
Hoạt động của GV Hoạt động của HS
1. Nờu nội dung, mục đớch, yờu cầu của bài toỏn.
- Hỏi: Bước đầu tiờn để giải bài toỏn.
- Hỏi: Gọi học sinh đặt cõu hỏi và trả lời.
- Yờu cầu học sinh mụ ta thuật toỏn.
2. Yờu cầu học sinh gừ chương trỡnh vào mỏy.
- Giỏo viờn tiếp cận từng học sinh để hướng dẫn và sửa sai.
1. Chỳ ý theo dừi:
- Xỏc định input, output và thuật giải. - Mục đớch của giải phương trỡnh?
+ Xỏc định số nghiệm và giỏi trị nghiệm x - Để tớnh được nghiệm x cấn cỏc đại lượng nào? + Cần cỏc đại lượng a, b
- Cú cỏc bước xử lý nào để tớnh được x? 2. Độc lập soạn chương trỡnh vào mỏy. - Thụng bỏo kết quả viết được
3. Nhập dữ liệu theo số liệu của giỏo viờn và thụng bỏo kết quả chương trỡnh
4. Tỡm một và số khỏc
3. Yờu cầu học sinh nhập dữ liệu. - Nhập dữ liệu với test 1 2 -2
4. Yờu cầu học sinh nhập thờm để đối sỏh kết quả
IV. Củng cố
Cỏc bước để hoàn thành một chương trỡnh:
- Phõn tớch bài toỏn để xỏc định dữ liệu vào, dữ liệu ra, thuật toỏn. - Soạn chương trỡnh vào mỏy
- Lưu trữ chương trỡnh
Tuần dạy: 35 Ngày soạn : 20/04/2014
Tiết PPCT : 49-50 Ngày dạy : 26/04/2014
BÀI TẬP
I. MỤC TIấU BÀI DẠY
Giỳp HS nắm được
+ Mỗi NNLT đều cú cỏc thư viện chương trỡnh con chuẩn để mở rộng khả năng ứng dụng + Cỏc loại thư viện chương trỡnh con chuẩn
II. PHƯƠNG PHÁP, PHƯƠNG TIỆN DẠY HỌC
+ Vấn đỏp + thuyết trỡnh + Sử dụng cõu hỏi mở + Sỏch giỏo khoa + Giỏo ỏn + Bảng trắng + Phũng mỏy chiếu.
III. NỘI DUNG
NỘI DUNG HĐ CỦA GV AND HS
Bài 1: Viết chương trỡnh nhập từ bàn phớm dóy số nguyờn a1,a2,...,an. Tỡm giỏ trị lớn nhất của dóy số.
Chương trỡnh Program max;
Var A: Array[1..100] of integer; max, i, n:Integer;
Begin
Wrtie(‘nhap so luong phan tu mang n:=’); Readln(n); For i:=1 to n do Begin Write(‘phan tu thu’,i,’:=’); Readln(A[i]); End;
GV: Khỏi quỏt lại chương mảng bằng cỏc bài tập tổng quỏt
HS: Lờn bảng làm bài
Max:=A[1]; For i:=2 to n do
Giỏo ỏn Tin học 11 Trường THPT Lờ Trực If A[i]>Max then Max:=A[i]; Write(‘Max la :=’,Max); Readln End. 2. Kiểu xõu Bài tập:
Nhập vào từ bàn phớm một xõu. Thay thế tất cả cỏc cụm từ ‘anh’ bằng cụm ký tự ‘em’ Chương trỡnh Program xau; Var a, s: String; I,k: byte; Begin
Write(‘Nhap xau a:=’); Readln(a); While pos(‘anh’,a)<>0 do Begin I:=pos(‘anh’,a); Delete(a,i,3); Insert(‘em’,a,i); End; For k:=1 to length(a) do Write(a); Readln End.
ii. tệp và thao tỏc với tệp 1. Khai bỏo
Var<Tờn biến tệp>: Text; 2. thao tỏc - Gỏn tờn tệp Assign(<Biến tệp>,<Tờn tệp>); - Mở tệp + Mở tệp để ghi dữ liệu Rewrite(<Biến tệp>); + Mở tệp để lấy dữ liệu Reset(<Biến tệp>);
GV: Đưa ra một số bài tập khỏc về mảng cho HS về nhà làm
GV: Em hóy nờu quy tắc khai bỏo và cỏc thao tỏc xử lý xõu
HS: Lờn bảng làm bài
GV: Giới thiệu một số bài tập về xõu cho HS về nhà làm
GV: Em hóy nờu quy tắc khai bỏo và cỏc thao tỏc với tệp?
HS: Trả lời cõu hỏi
- Đọc ghi tệp văn bản + Đọc tệp văn bản
- Read(<Biến tệp>,<Danh sỏchbiến>); - Readln(<Biến tệp>,<Danh sỏchbiến>); + Ghi tệp văn bản
- Write(<Biến tệp>,<Danh sỏchbiến>); - Write(<Biến tệp>,<Danh sỏchbiến>); - Đúng tệp
Close(<Biến tệp>); Bài 1
Viết chương trỡnh đọc vào tệp F1 gồm dóy số nguyờn a1,a2,...,an từ bàn phớm. Tớnh
GV: Giới thiệu một số bài tập để HS về tệp cho HS thực hiện
tổng và đưa tổng vào tệp F2; Chương trỡnh
Program Tep;
Var A: Array[1..100] of Integer; f1,f2:Text;
I, n: Integer; Begin
Write(‘Nhap so luong phan tu mang n:=’); Readln(n); For i:=1 to n do Begin Write(‘A’,i,’:=’); Readln(A[i]); End; Assign(f1,’Tep1.txt’); Rewrite(f1); For i:=1 to n do Write(f1,A[i]); Reset(f1); For i:=1 to n do While not eof(f) do Begin Read(f1,A[i]); S:=0; For i:=1 to n do S:=S+A[i]; Rewrite(f2); Write(f2,S); Close(f1); Close(f2); Readln End.
GV: Giới thiệu một số bài tập để HS về nhà làm bài.
GV: Hương dẫn HS về nhà ụn tập để tiết sau kiểm tra
Tuần dạy: 36 Ngày soạn : 20/04/2014
Tiết PPCT : 51 Ngày dạy : 27/04/2014