Tin hoc THPT le thi hong THCSTHPT thong nhat yen dinh

SỞ GIÁO DỤC VÀ ĐÀO TẠO THANH HOÁ TRƯỜNG THCS VÀ THPT THỐNG NHẤT SÁNG KIẾN KINH NGHIỆM MỘT SỐ GIẢI PHÁP GỢI ĐỘNG CƠ MỞ ĐẦU NHẰM NÂNG CAO HIỆU QUẢ TRONG GIẢNG DẠY KIỂU DỮ LIỆU CÓ CẤU TRÚC – TIN HỌC 11 Người thực hiện: Lê Thị Hồng Chức vụ: Giáo viên SKKN thuộc môn: Tin học THANH HÓA, NĂM 2015 MỤC LỤC I ĐẶT VẤN ĐỀ II GIẢI QUYẾT VẤN ĐỀ 1.Cơ sở lí luận vấn đề Thực trạng vấn đề 2.1 Thuận lợi 2.2 Khó khăn Các biện pháp tiến hành để giải vấn đề 3.1 Đáp ứng nhu cầu xóa bỏ hạn chế 3.2 Hướng tới tiên lợi hợp lí hố công việc 3.3 Hướng tới hoàn chỉnh hệ thống 3.4 Chính xác hố khái niệm 3.5.Lật ngược vấn đề 3.6 Xét tương tự 10 3.7 Khái quát hoá 12 3.8 Tìm liên kết phụ thuộc 13 Hiệu 14 III KẾT LUẬN, KIẾN NGHỊ 16 Kết luận 16 Kiến nghị 16 2.1 Về phía Bộ GD&ĐT Sở GD&ĐT 16 2.2 Về phía nhà trường 16 2.3 Đối với giáo viên 16 TÀI LIỆU THAM KHẢO 17 PHỤ LỤC 18 DANH MỤC CHỮ CÁI VIẾT TẮT STT Tên viết tắt SKKN GV HS THPT Cụm từ viết tắt Sáng kiến kinh nghiệm Giáo viên Học sinh Trung học phổ thông I ĐẶT VẤN ĐỀ Như biết: Những năm gần đây, giới chứng kiến cách mạng thông tin ảnh hưởng sâu sắc đến lĩnh vực đời sống, kinh tế, văn hóa, xã hội; xã hội loài người bước sang kỷ nguyên - kỷ nguyên khoa học công nghệ Hòa nhịp phát triển giới, đất nước ta bước đưa Tin học vào ngành, cấp hầu hết lĩnh vực đời sống xã hội Và việc làm cụ thể, là: Nhà nước chủ trương đưa Tin học vào giảng dạy nhà trường phổ thông mơn học thức, khơng mơn nghề năm trước Tin học mơn khoa học, mơn học cơng cụ, có tính trừu tượng tính thực tiễn phổ dụng Những tri thức kỹ Tin học với phương pháp làm việc Tin học trở thành công cụ để học tập môn học khác nhà trường, công cụ nhiều ngành khoa học khác hoạt động đời sống thực tế Bởi vậy, dạy Tin học không đơn tạo điều kiện cho học sinh chiếm lĩnh tri thức kỹ Tin học mà cịn phải góp phần phát triển lực trí tuệ chung cho học sinh, có vấn đề dạy học tư lập trình mà ngơn ngữ lập trình Pascal ví dụ Tuy nhiên, hầu hết học sinh lớp 11 học lập trình gặp nhiều khó khăn để tiếp thu kiến thức nhiều lý như: Sự mẻ mơn học, học sinh phải có tư thuật tốn tốt, câu lệnh chủ yếu thuật ngữ tiếng Anh… làm cho học Tin học trở nên không hứng thú em Vấn đề thật thể rõ nét học sinh trường THCS & THPT Thống Nhất Luật giáo dục, điều 28.2 ghi: “Phương pháp giáo dục phổ thông phải phát huy tính tích cực, tự giác, chủ động sáng tạo học sinh; phù hợp với đặc điểm lớp học; môn học; bồi dưỡng phương pháp tự học, khả làm việc theo nhóm, rèn luyện kỹ vận dụng kiến thức vào thực tiễn, tác động đến tình cảm đem lại niềm vui, hứng thú trách nhiệm học tập học sinh.” Vì vậy, việc giảng dạy cho học sinh, việc học sinh lĩnh hội kiến thức bản, người thầy cịn phải biết kích thích tính tích cực, sáng tạo, say mê học hỏi học sinh “lấy học sinh trung tâm việc dạy học” Việc học tập tự giác, tích cực, chủ động sáng tạo địi hỏi học sinh phải có ý thức mục tiêu đề tạo động lực bên thúc đẩy thân em hoạt động để đạt mục tiêu Điều thực dạy học không đơn giản việc nêu rõ mục tiêu mà quan trọng gợi động Là GV giảng dạy Tin học trường THCS & THPT Thống Nhất, ln trăn trở tiết dạy để truyền đạt cho HS tình u mơn học học nào, tiết học đem lại hiệu theo ý muốn, đặc biệt phần dạy, dạy nhiều dung lượng kiến thức cần có kết hợp đa phương pháp giảng dạy Trong Tin học 11, học sinh tiếp cận với chương: kiểu liệu có cấu trúc Đây phần kiến thức mang tính chất mới, phức tạp song kiểu liệu có cấu trúc lại sử dụng hầu hết toán phổ thơng, tốn thi học sinh giỏi cấp Nắm bắt tầm quan trọng kiểu liệu có cấu trúc lập trình chương trình học, dạy, tơi thường tìm tịi áp dụng phương pháp giảng dạy mới, tạo chủ động, tích cực học sinh để mơn học trở nên lí thú Trong phương pháp gợi động mở đầu, gợi động trung gian gợi động kết thúc phương pháp đem lại hiệu cao học đồng thời giúp em nâng cao kỹ tự rèn luyện thực hành tập thực hành cuối chương Từ thực tế giảng dạy, từ yêu cầu đổi giáo dục nội dung phương pháp, mạnh dạn chọn đề tài: “Một số giải pháp gợi động mở đầu nhằm nâng cao hiệu giảng dạy kiểu liệu có cấu trúc - Tin học 11” làm SKKN Với kinh nghiệm giảng dạy chưa nhiều, tơi hy vọng tìm hiểu bước đầu đóng góp phần nhỏ việc nâng cao chất lượng giảng dạy Tin học trường THPT II GIẢI QUYẾT VẤN ĐỀ Cơ sở lí luận vấn đề Cũng môn học khác, việc dạy học Tin học cần thực hoạt động hoạt động tự giác, tích cực, chủ động sáng tạo người học Khi cần dạy nội dung tin học cho HS, người GV phải biết phân tích nội dung liên quan đến hoạt động số hoạt động lại phân tích thành hoạt động thành phần vào mục tiêu tiết học, trình độ học sinh, trang thiết bị có mà lựa chọn cho học sinh tập luyện thực số hoạt động tiềm tàng nội dung cần dạy Việc học tập tự giác, tích cực, chủ động sáng tạo địi hỏi HS phải có ý thức mục tiêu đề tạo động lực bên thúc đẩy thân học sinh hoạt động để đạt mục tiêu Điều thực dạy học không đơn giản việc nêu rõ mục tiêu mà quan trọng cịn gợi động Để HS có ý thức ý nghĩa hoạt động, cần tạo động học tập cho HS, để em hứng thú thực nảy sinh từ việc ý thức sâu sắc ý nghĩa nội dung học, học tất tính tích cực, độc lập trách nhiệm cao Cần phải đặt HS vào tình có vấn đề để hướng đích cho HS Phải tập luyện cho HS hoạt động ăn khớp với tri thức phương pháp Phải phân bậc hoạt động để nâng cao yêu cầu tình dạy học cho phép hạ thấp yêu cầu HS gặp khó khăn Hệ Gợi động làm cho HS có ý thức ý nghĩa hoạt động đối tượng hoạt động Gợi động nhằm làm cho mục tiêu sư phạm biến thành mục tiêu cá nhân học sinh, vào bài, đặt vấn đề cách hình thức Ở lớp dưới, giáo viên thường dùng cách cho điểm, khen chê, thơng báo kết học tập cho gia đình, để gợi động Càng lên lớp cao, với trưởng thành HS, với trình độ nhận thức giác ngộ trị ngày nâng cao, cách gợi động xuất phát từ nội dung hướng vào nhu cầu nhận thức, nhu cầu đời sống, trách nhiệm xã hội ngày trở nên quan trọng Gợi động kinh nghiệm mà kiểm nghiệm thời gian thực tập sư phạm giảng dạy lớp năm qua trất hiệu Với học em có hứng thú mà khơng quan trọng điểm đánh giá thân, em hứng thú hiểu áp dụng cho tiết học, tập Gợi động việc làm ngắn ngủi lúc bắt đầu dạy tri thức (thường học), mà phải xuyên suốt trình dạy học Vì vậy, phân biệt gợi động mở đầu, gợi động trung gian gợi động kết thúc Trong đề tài này, xin tập trung đưa ra: số giải pháp gợi động mở đầu nhằm nâng cao hiệu việc giảng dạy kiểu liệu có cấu trúc ngơn ngữ lập trình Pascal theo giai đoạn Để Gợi động mở đầu gợi động xuất phát từ thực tế xuất phát từ nội Tin học Việc xuất phát từ thực tế khơng có tác dụng gợi động mà cịn góp phần hình thành giới quan vật biện chứng Nhờ đó, HS nhận rõ việc nhận thức cải tạo giới đòi hỏi phải suy nghĩ giải vấn đề Tin học nào, tức nhận rõ Tin học bắt nguồn từ nhu cầu đời sống thực tế Vì vậy, cần khai thác triệt để khả để gợi động xuất phát từ thực tế Tuy nhiên, để gợi động xuất phát từ thực tế cần ý điều kiện sau: - Vấn đề đặt phải đảm bảo tính chân thực, đương nhiên đơn giản hóa lý sư phạm trường hợp cần thiết - Việc nêu vấn đề khơng địi hỏi q nhiều tri thức bổ sung - Con đường từ lúc nêu vấn đề giải vấn đề ngắn tốt Mặc dù Tin học phản ánh thực tế cách tồn nhiều tầng Tuy nhiên khơng phải nội dung nào, hoạt động gợi động xuất phát từ thực tế Vì vậy, ta tận dụng khả gợi động xuất phát từ nội Tin học Gợi động từ nội Tin học nêu vấn đề Tin học xuất phát từ nhu cầu Tin học, từ việc xây dựng khoa học Tin hoc, từ phương thức tư hoạt động Tin học Gợi động theo cách cần thiết vì: - Việc gợi động xuất phát từ thực tế thực - Việc gợi động từ nội Tin học giúp HS hình dung hình thành phát triển Tin học với đặc điểm tiến tới hoạt động Tin học cách độc lập Thông thường bắt đầu nội dung lớn, chẳng hạn phân môn hay chương, ta nên cố gắng gợi động xuất phát từ thực tế Còn hay phần cần tính tới khả gợi động từ nội Tin học với nhứng giải pháp sau: Đáp ứng nhu cầu xoá bỏ hạn chế Hướng tới tiện lợi hợp lí hố cơng việc Chính xác hố khái niệm Hướng tới hoàn chỉnh Lật ngược vấn đề Xét tương tự Khái quát hoá Tìm liên kết ràng buộc Thực trạng vấn đề 2.1 Thuận lợi: - Đối với nhà trường: Được quan tâm Ban giám hiệu, tổ chuyên môn nhà trường, năm học gần tạo điều kiện tốt khả kinh tế nhà trường để giúp GV HS tham gia dạy - học có hiệu Phát triển công nghệ thông tin, đặc biệt kết nối Internet để cán GV HS tham khảo tài liệu mạng - Đối với giáo viên: Giáo viên mơn Tin học nhà trường nói chung thân nói riêng đào tạo chuẩn chuyên ngành Tin học để đáp ứng yêu cầu cho dạy học môn Tin học bậc THPT Đa số giáo viên toàn trường quan tâm đến Tin học, ứng dụng công nghệ thông tin vào cơng tác học tập giảng dạy Đó sở để tạo động lực phát huy tính ham học, tích cực HSCđối với mơn Tin học 2.2 Khó khăn: - Đối với nhà trường: Mặc dù nhà trường quan tâm tạo điều kiện tốt nhất, nhiên sở vật chất thiếu Trong mơn, thực hành thiết bị máy tính chiếm đa số thời lượng học tập em - Đối với giáo viên: Giáo viên trở nên khó khăn em tham gia học tập điều kiện khơng đầy đủ máy tính thực hành Mặc dù kiến thức lớp 11 thiên tư lập trình có thiết bị thực hành thao tác kiểm tra đánh giá tư trình bày ý tưởng trở nên hiệu quả, phong phú - Đối với học sinh: Hơn nữa, học lập trình học sinh lớp 11 gặp nhiều khó khăn để tiếp thu kiến thức nhiều lý như: Sự mẻ môn học, học sinh phải có tư thuật tốn tốt, câu lệnh chủ yếu thuật ngữ tiếng Anh, kiến thức ngoại ngữ em hạn chế, cộng với tư lập trình chưa tốt nên thật vấn đề mà thân băn khoăn thực nghiên cứu đề tài Các biện pháp tiến hành để giải vấn đề Phần kiểu liệu có cấu trúc chứa đựng dung lượng kiến thức mới, cắt giảm phần học tương đối “khó” HS Vì địi hỏi GV phải có kiến thức phương pháp sư phạm vững vàng 3.1 Đáp ứng nhu cầu xoá bỏ hạn chế Trong giảng dạy giới thiệu nội dung kiểu liệu có cấu trúc hay nội dung đó, nhu cầu cần thiết mà học mang lại đáp ứng xố bỏ hạn chế lập trình giải tốn Ví dụ GV dạy 11 Kiểu mảng (Tiết 19), để dẫn dắt vấn đề vào GV cho HS tìm hiểu tốn sau: *Xét tốn: Nhập vào nhiệt độ trung bình ngày tuần, tính đưa nhiệt độ trung bình tuần số lượng ngày tuần có nhiệt độ cao nhiệt độ trung bình tuần *Với yêu cầu toán đưa ra, học sinh dùng bảy biến thực để lưu trữ nhiệt độ trung bình ngày tuần Và chương trình viết ngơn ngữ Pascal sau: Pogram Nhietdo_Tuan; Var t1,t2,t4,t5,t6,t7,tb:real; dem:integer; Begin Write(‘Nhap vao nhiet cua ngay:’) readln(t1,t2,t3,t4,t5,t6,t7); tb := (t1+t2+t3+t4+t5+t6+t7)/ 7; dem:= if t1>tb then dem:=dem +1; f t2>tb then dem:=dem+ 1; if t3>tb then dem:=dem +1; if t4>tb then dem:=dem +1; if t5>tb then dem:=dem +1; if t6>tb then dem:=dem + 1; if t7>tb then dem:=dem + 1; Writeln(‘ Nhiet trung binh tuan: ’tb); Writeln(‘ So nhiet cao hon nhiet trung binh tuan:’ ,dem): Readln; End *Vấn đề đặt (mở rộng): Nếu toán yêu cầu nhập vào nhiệt độ trung bình ngày tháng, hai tháng hay năm làm sao? Giải pháp: Sử dụng kiểu liệu mảng Và chương trình cụ thể: Program Nhietdo_Nngay; Const max = 366; Type mang1 = array [1 max] of real; Var nhietdo: mang1; Dem, i, n : integer; Tong, tb: real; Begin Write(‘Nhap so ngay: ‘); readln(n); Tong:=0; For i:=1 to n Begin Write(‘Nhap nhiet ‘, i,’: ‘); Readln(nhietdo[i]); Tong:= tong+nhietdo[i]; End; Dem:=0; Tb:= tong/n; For i:=1 to n If nhietdo[i]>tb then dem:=dem+1; End; If n=0 then write(‘P khong phai la xau cua Q.’) Else write(‘Co ‘, n, ‘vi tri cua xau P xau Q.’); Readln; End 3.4 Chính xác hố khái niệm Có khái niệm mà học sinh biết riêng lẻ chưa thể đưa nhận xét, kết luận xác liên quan đến khái niệm đó, tới thời điểm có đủ điều kiện thầy giáo gợi lại vấn đề giúp học sinh xác hố khái niệm Trong 11 Kiểu mảng (Tiết 19) HS học khái niệm: - Mảng chiều kiểu liệu có cấu trúc, dãy hữu hạn phần tử có tên, chung kiểu liệu khác số - Mảng đăt tên phần tử có số định - Để mô tả mảng chiều cần xác định kiểu phần tử cách đánh số phần tử Sau dạy xong phần khái niệm mảng chiều, GV lấy ví dụ toán đơn giản sau: *Xét toán:Viết chương trình nhập vào dãy số nguyên gồm n phần tử (n≤100): a1, a2, a3, , an in dãy số *Thuật giải: - Mảng đặt tên là: a - Các phần tử đánh số từ đến n (với n≤100) - Các phần tử có kiểu liệu kiểu nguyên *Chương trình pascal là: Program Mang_nguyen; Var a: array[1 100] of integer; N, i: iteger; Begin Write(‘Nhap so luong phan tu:’); Readln(n); Writeln(‘Nhap gia tri cac phan tu cua day so:’); For i:=1 to n begin Write(‘a[‘, i, ‘]: ‘); Readln(a[i]); end; Writeln(‘Day so nguyen duoc tao la: ‘, a[i]:2); Readln; End 3.5 Lật ngược vấn đề Sau giải vấn đề, câu hỏi tự nhiên thường đặt vấn đề ngược lại giải nào? Chẳng hạn, chèn thêm trường vào cấu trúc liệu xố trường cấu trúc liệu thực Ngược lại với tạo thư mục xoá thư mục, ngược lại với đổi xâu thành số đổi số thành xâu, ngược lại với đổi kí tự viết thường sang kí tự viết hoa đổi kí tự viết hoa sang kí tự viết thường Vận dụng giải pháp dạy 12 Kiểu xâu (Tiết 27), GV lấy ví dụ tốn sau: Xét toán thuân: Chuyển đổi xâu ký tự thành xâu ký tự in hoa *Chương trình Pascal là: Program xau_thuong_hoa; Var st: String; i: Integer; Begin Write('Nhap xau: '); Readln(st); Write('Xau ky tu in hoa la: '); For i := to Length(st) Do Write(Upcase(st[i])); Readln End *Xét toán nghịch: Chuyển đổi xâu ký tự in hoa thành xâu ký tự thường Học sinh biết bảng mã ASCII ký tự viết hoa A, B, C, , Z mã hóa số từ 65 đến 90 Còn ký tự thường a, b, c, z mã hóa số từ 97 đến 122 Ta thấy rõ ký tự viết hoa viết thường chữ cách 32 đơn vị Chính vậy, ta sử dụng quy luật để đổi xâu ký tự viết HOA thành xâu ký tự viết thường cách dùng vòng For chạy từ đầu xâu đến cuối xâu đổi ký tự thành mã ASCII, gặp ký tự viết hoa, ta cộng mã ASCII thêm 32 đơn vị * Chương trình Pascal là: Program xau_hoa_thuong; Var st: String; d, i: Integer; Begin Write('Nhap xau: '); Readln(st); d := 0; Write('Doi sang chu thuong: '); For i := to Length(st) Do Begin d := ord(st[i]); If (d >= 65) And (d b) then if (a>c) then max:=a else max:=c else if b>c then max:=b else max:=c; writeln(‘Gia tri lon nhat cua so tren la: ‘, max); readln; end *Bài tốn mở rộng : Tìm phần tử lớn dãy số nguyên(với n 300 A[i] 500), dãy có nhiều phần tử giá trị đưa số phần tử lớn dầu tiên? Program Max_dayso; Var a:array [1 300] of integer; N, i: integer; Max: real; Begin Write(‘Nhap so luong phan tu cua day so: ‘); readln(n); Writeln(‘Nhap gia tri cua day so:’); For i:=1 to n begin Write(‘a[‘,i, ‘]: ‘); Readln(a[i]); end; Max:=a[1]; csmax:=1; For i:=2 to n If a[i]>max then begin Max:=a[i]; Csmax:=I; end; Writeln(‘Gia tri lon nhat cua day so la: ‘, max); Writeln(‘Chi so cua gia tri lon nhat la: ‘,csmax); Readln; End 3.8 Tìm liên kết phụ thuộc tốn Sau giải toán theo giải pháp gợi mở vấn đề nêu trên, bước liên hệ tới nhiều toán, nhằm hướng tới cách giải toán theo phương pháp trải nghiệm nhiều lần, điều thật có hiệu việc lập trình GV yêu cầu học sinh giải toán sau: *Xét tốn: Có túi chứa tối đa D (kg) với n đồ vật, Cần chọn đồ vật cho giá trị túi lớn Biết đồ vật i có khối lượng W[i] giá trị C[i] đồng (i = 1, 2, , n *Chương trình Pascal là: Var C, W:Array[1 100] Of Integer; CW: Array[1 100] Of Real; n, i, j, d, d1, gt, t: Integer; t1, t2: Integer; t3: Real; 13 temp: Integer; Begin Write('Nhap so luong cac vat: '); Readln(n); Write('Nhap khoi luong cua tui: '); Readln(D); D1:=D; Writeln('Nhap cac gia tri cua C va W: '); For i:=1 to n Begin Write('C[',i,'] = '); Readln(C[i]); Write('W[',i,'] = '); Readln(W[i]); CW[i] := C[i] / W[i]; End; For i := to n - For j := n downto i + Begin If CW[j] > CW[j-1] Then Begin t1 := C[j]; C[j] := C[j-1]; C[j-1] := t1; t2 := W[j]; W[j] := W[j-1]; W[j-1] := t2; t3 := CW[j]; CW[j] := CW[j-1]; CW[j-1] := t3; End; End; i := 1; gt := 0; t := 0; While (i 0) And (W[i] > 0) Do Begin Temp := d Div W[i]; {So vat duoc chon cua W[i]} If temp > Then Begin Writeln('Do vat C[',i,'] = ',C[i],' va W[',i,'] = ',W[i],' duoc chon co so luong ',temp); d := d - temp * W[i]; t := t + W[i] * temp; gt := gt + temp * C[i]; End; i := i + 1; End; Writeln('Gia tri toi uu co the dat duoc la:'); Writeln('Khoi luong vat dung ',t,'.tui dung duoc ',d1,' Con thua ',d1 - t); Readln End Hiệu Thực nghiệm giảng dạy tổ chức lớp: 11A2 11A3 Trường THCS & THPT Thống Nhất hai lớp có HS học tương đối khá, tiếp thu nhanh Lớp 11A3 dạy thực nghiệm, lớp 11A2 dạy đối chứng, không áp dụng phương pháp đề tài *Phương pháp đánh giá: 14 - Việc đánh giá kết thực nghiệm sư phạm trọng đến kết tổng hợp, thể qua tính tích cực học sinh, trình học tập lĩnh hội kiến thức - Đánh giá so sánh kết học tập học sinh lớp thực nghiệm lớp đối chứng - Hình thức thu thập thông tin để rút nhận xét đánh giá + Tiến hành kiểm tra viết + Qua theo dõi thao tác học sinh thực hành + Quan sát, trò chuyện, thăm dò ý kiến, thái độ học sinh + Lắng nghe ý kiến đóng góp nhận xét giáo viên dự - Phân tích kết thực nghiệm + Phân tích định lượng + Phân tích định tính *Phân tích kết quả: Qua giảng dạy lớp 11A3 11A2 tơi có số đánh sau: - Học sinh tập trung, hào hứng với phương pháp dạy học tích cực này, thể việc tích cực suy nghĩ giải tình giáo viên đưa ra, hăng hái tham gia phát biểu ý kiến xây dựng Hầu hết câu trả lời trọng tâm câu hỏi, ngồi em cịn đặt số câu hỏi số tình thú vị, lật ngược vấn đề - Việc vận dụng lý thuyết vào lập trình nhanh linh hoạt Đa số chịu khó làm tập giáo viên giao, số lượng giải đạt yêu cầu tăng lên đáng kể so với trước, kỹ thực hành em có tiến Tơi tiến hành chấm lớp, kết thu sau: Lớp 11A3 11A2 Tổng số 44 44 Loại giỏi Số lượng 11 Tỉ lệ 25% 7% Loại Số lượng 25 21 Tỉ lệ 57% 48% Loại trung bình Số Tỉ lệ lượng 18% 15 34% Loại yếu Số lượng Tỉ lệ 0% 11% 15 III KẾT LUẬN, KIẾN NGHỊ Kết luận: Sau thời gian giảng dạy thực nghiệm phương pháp dạy học mới, nhận thấy phương pháp gợi động cần thiết học Các giải pháp như: đáp ứng nhu cầu xoá bỏ hạn chế, hợp lí hố cơng việc, xét tương tự, khái qt hoá… giúp HS phát triển khả tư logic, tích cực chủ động tìm hiểu kiến thức liên quan Trong đề tài GV đưa toán theo hướng phát triển lực học sinh, theo đối tượng từ thấp đến cao, từ đơn giản đến phức tạp, từ vi mô đến vĩ mô… với liên kết chặt chẽ kiến thức học với kiến thức thông qua giải pháp gợi động mở đầu Từ đó, HS khơng cịn thấy ngại học lập trình, khơng q khó khăn tiếp thu kiến thức mới; em say mê, u thích mơn học Trên thực tế giảng dạy, nhận thấy phương pháp gợi động mở đầu có hiệu cao việc giúp HS từ biết đến hiểu lập trình, quan trọng rèn luyện kỹ thực hành lập trình cho HS Vì vậy, SKKN nhiều hạn chế thông qua kinh nghiệm thực tiễn này, tơi hy vọng có nhiều GV có tâm huyết với nghề, yêu nghề có nhiều phương pháp giảng dạy ưu việt để HS thật coi Tin học môn học lí thú hữu ích với em Kiến nghị 2.1 Về phía Bộ GD&ĐT Sở GD&ĐT - Cho biên soạn in ấn tài liệu phương pháp giảng dạy môn Tin học trường THPT - Tăng cường tập huấn phương pháp giảng dạy cho giáo viên cốt cán tỉnh, trường để từ nhân rộng đội ngũ nhà giáo giảng dạy Tin học trường phổ thơng 2.2.Về phía nhà trường - Nhà trường quan, ban ngành cần tăng cường sở vật chất trường học, đặc biệt máy tính thực hành học sinh Khơng thể nói học sinh hứng thú học tập sở vật chất không đủ để đáp ứng 2.3 Đối với giáo viên - Ứng dụng công nghệ thông tin dạy học, sử dụng giáo án điện tử kết hợp tốt với bình luận để nâng cao hiệu phương pháp việc dạy –học lịch sử - Thường xuyên trau dồi kiến thức, tự bỗi dưỡng chun mơn khơng ngừng tìm tòi phương pháp dạy học mới, sáng tạo hiệu Trên SKKN đúc rút từ thực tiễn dạy học mà thực thấy hữu ích để giúp HS yêu thích học Tin học Tơi hi vọng biện pháp mà đưa sáng kiến phần giúp cho thầy có định hướng định để thiết kế giảng chủ đề gợi động có hiệu Dù cố gắng song đề tài cịn nhiều thiếu sót 16 mong nhận đóng góp ý kiến đồng nghiệp để sáng kiến hoàn thiện Tôi xin chân thành cảm ơn! XÁC NHẬN CỦA THỦ TRƯỞNG ĐƠN VỊ Thanh Hóa, ngày 25 tháng năm 2015 CAM KẾT KHÔNG COPY Người viết Vũ Văn Thành Lê Thị Hồng 17 TÀI LIỆU THAM KHẢO Sách giáo khoa tin học 11 Hồ Sĩ Đàm chủ biên Sách giáo viên tin học 11 Hồ Sĩ Đàm chủ biên Lý thuyết Bài tập lập trình Pascal 5.5-6.0 Nguyễn Thị Kiều Duyên Lý thuyết Bài tập lập trình Pascal – Quách Tuấn Ngọc Phương pháp dạy Tin học – PGS.TS Lê Khắc Thành Giáo trình lý thuyết tập Pascal tập - Nguyễn Đình Tê, Hồng Đức Hải Bài tập thực hành Pascal – Nguyễn Quang Vịnh 18 PHỤ LỤC (Một số tập áp dụng thực nghiệm sư phạm theo chuyên đề) Phần KIỂU DỮ LIỆU MẢNG MỘT CHIỀU Viết chương trình nhập n phần tử số nguyên dương số k thực công việc sau: a) Đếm xem dãy có số k? b) Đếm xem dãy có số lớn k? c) Đếm xem dãy có số nhỏ k? const max=100; type mang=array[1 max] of integer; var a:mang; dem i,n,k : integer; BEGIN write('N = '); readln(n); writeln('nhap gia tri cho mang'); for i:=1 to N begin write('a[',i,']= '); readln(a[i]); end; write('nhap k= '); readln(k); i:=0; dem:=0; while (ik then inc(dem); writeln('co ',dem,' so ',k); c) if a[i] a = 1, 4, 5, const max=100; type mang=array[1 max] of real; var i,n,k: integer; a:mang; x:real; begin write('nhap so phan tu n= ');readln(n); writeln('nhap gia tri cho mang:'); k:=0; for i:=1 to n begin 19 write('a[',i,']= '); readln(x); for i:=1 to k if a[i]=x then exit; inc(k); a[k]:=x; end; readln; for i:=1 to k writeln(a[i]:8:1); readln end Nhập dãy số thực a Nhập số x a) Sắp xếp lại dãy a thành dãy giảm b) Kiểm tra có phần tử x cho trước khơng? Nếu khơng có bổ sung x vào dãy cho khơng phá vỡ tính chất giảm dãy const max=100; type mang=array[0 max] of real; Var i,n,k: integer; a:mang; x:real; BEGIN write('nhap so phan tu n= '); readln(n); writeln('nhap gia tri cho mang:'); for i:=1 to n begin write('a[',i,']= '); readln(a[i]); end; for i:=1 to n-1 for k:=i+1 to n if a[i] < a[k] then begin x:=a[i]; a[i]:=a[k]; a[k]:=x; end; for i:=1 to n write(a[i]:8:1); writeln; write('nhap x= ');readln(x); i:=n; a[0]:=x+1; while a[i]=k then writeln('co ',k,' bo ky tu va co ',d1,' kt ke giong nhau') else writeln('khong co ',d,' ky tu ke giong nhau'); writeln(' -'); xoa:=false; for i:=1 to length(s)-1 if s[i]=s[i+1] then begin delete(s,i,1); xoa:=true; exit; end; while xoa do; write('in lai xau moi '); writeln(s); readln END Nhập xâu ký tự Đếm số lần xuất xâu xâu kia? const trang=' '; var s,s1,s2:string; k,d:integer; begin write('nhap xau s1: ');readln(s1); write('nhap xau s2: ');readln(s2); s:=s2; d:=0; k:=pos(s1,s2); while k>0 begin inc(d); 22 delete(s2,1,k); k:=pos(s1,s2); end; writeln('so lan ',s1,' co mat ',s,' la: ',d); readln end Nhập xâu ký tự tách xâu thành xâu với vị trí số lượng ký tự cần tách nhập từ bàn phím: VD: Nhập xâu s1 = ‘HOANG NGOC SON’ , cần tách kí tự lưu xâu s2 vị trí thứ => kq: s1= ‘HOANG SON’ s2 = ‘NGOC’ var s1,s2:string; pos, num:integer; begin write('nhap xau s1: '); readln(s1); write('nhap vi tri can tach: '); readln(pos); write('nhap so ky tu can tach: '); readln(num); s2:=copy(s1,pos,num); delete(s1,pos,num); writeln('xau s1= ',s1); writeln('xau s2= ',s2); readln end Nhập xâu ký tự thực hiện: a) Xóa tất kí tự trắng dư thừa xâu ký tự: (kí tự trắng dư thừa kí tự trắng xuất đầu xâu, cuối xâu có từ KT trắng trở lên từ) b) Từ xâu chuẩn hóa câu a, đếm xem xâu có từ VAR s:string; i,tu:integer; BEGIN write('nhap xau s= '); readln(s); while s[1]=#32 delete(s,1,1); while s[length(s)]=#32 delete(s,length(s),1); while pos(#32#32,s)>0 delete(s,pos(#32#32,s),1); writeln('chuoi sau dinh dang la: ',s); tu:=0; if s[1]#32 then inc(tu); for i:=1 to length(s) if (s[i]=#32) and (s[i+1]#32) then inc(tu); write('trong xau co ',tu:3,' tu'); readln END 23 ... xau s= ''); readln(s); while s[1]=#32 delete(s,1,1); while s[length(s)]=#32 delete(s,length(s),1); while pos(#32#32,s)>0 delete(s,pos(#32#32,s),1); writeln(''chuoi sau dinh dang la: '',s); tu:=0;... phát từ nội Tin học Gợi động từ nội Tin học nêu vấn đề Tin học xuất phát từ nhu cầu Tin học, từ việc xây dựng khoa học Tin hoc, từ phương thức tư hoạt động Tin học Gợi động theo cách cần thi? ??t vì:... Write(‘Nhap xau thu nhat P: ‘); readln(p); Write(‘Nhap xau thu nhat Q: ‘); readln(q); K:= length(p); N:=0; While pos(p, q)>0 Begin Writeln(‘Xau P o vi tri: ‘, n*k + pos(p, q); N:= n+1; Delete(q, pos(p,q),