SKKN : Phát huy tính tích cực của học sinh trong lập trình lập trình pascal

MỤC LỤC Giảng dạy theo hướng phát huy tính tích cực học sinh lập trình lập trình Pascal Phần I: MỞ ĐẦU Lý tính cấp thiết - Bước sang kỷ XXI - Thế kỷ phát triển mạnh mẽ khoa học, kỹ thuật công nghệ, trước yêu cầu của nghiệp cơng nghiệp hố đại hố đất nước địi hỏi nhà trường phải đào tạo nên người lao động thông minh, sáng tạo, độc lập, tự chủ, lợi ích cộng đồng, nhân loại Để đạt mục tiêu ngành giáo dục đưa môn Tin vào nhà trường giúp cho thầy trị tiếp cận với cơng nghệ - cơng nghệ đại văn minh thơng tin, thích ứng với phát triển xã hội - Khi tin học đưa vào nhà trường nghiên cứu môn khoa học khác, kiến thức tin học đúc kết từ thực tiễn phát triển dựa nhu cầu khai thác người dùng, có nhiều điều kiện thuận lợi để sử dụng phương tiện dạy học - phát huy tính tích cực học tập học sinh Tuy nhiên, kỹ vận dụng tri thức học vào việc giải toán thực tiễn học sinh nhiều hạn chế - Mặt khác, vào năm 60 thập kỷ này, mà việc lập trình cho máy tính mang nặng tính kinh nghiệm, tính “nghệ thuật”; Với chương trình nhìn chung khó đọc, khó kiểm sốt lỗi tác giả tạo nó, đặc biệt khơng có cách khẳng định tính đắn chương trình, ngồi việc kiểm tra chương trình thơng qua số lần chạy thử với liệu vào khác nhau, thấy kết lần chạy thử khẳng định chương trình Từ nảy sinh vấn đề làm giải tồn nêu Vấn đề lôi kéo nhiều nhà Tin học lý thuyết tiếng quan tâm tham gia Phương pháp lập trình có cấu trúc đề xuất bối cảnh - Lập trình có cấu trúc cho phép tạo chương trình sáng sủa, dễ đọc, dễ hiểu, dễ kiểm tra điều quan trọng chứng minh tính đắn chương trình - Tư tưởng lập trình có cấu trúc modul hố chương trình, nghĩa từ chương trình lớn, phân thành chương trình nhỏ, hay chương trình con, tương đối độc lập giải mộ cách độc lập chương trình Trên sở đó, kiểm chứng tính đắn chương trình con, ghép nối lại thành chương trình hồn chỉnh - Trong viết chương trình, ta thường gặp đoạn chương trình lặp đi, lặp lại nhiều lần chỗ khác làm cho chương trình trở nên dài dịng Trong Pascal cho phép viết đoạn chương trình thành chương trình con, cần, ta viết thủ tục gọi chương trình với tham số tương ứng Cách làm cho chương trình trở nên ngắn gọn, sáng sủa tiết kiệm cơng sức lập trình - Với toán lớn, phức tạp tương ứng với chương trình lớn, dài; việc nhìn khái quát tổng thể chương trình, việc gỡ rối, sửa lỗi khó khăn Việc xây dựng chương trình cho phép tách chương trình lớn thành chương trình nhỏ hơn, đơn giản làm cho việc kiểm tra, sửa chữa chương trình dễ dàng, thuận tiện Sau tạo xong chương trình ta việc ghép chúng lại thành chương trình hồn chỉnh Chính lý làm cho giá thành xây dựng toàn chương trình giảm xuống bớt cơng sức thủ cơng người lập trình Chính vậy, tơi muốn vận dụng cách viết sử dụng chương trình lập trình có cấu trúc để giúp cho học sinh có kỹ giải số tốn nhanh hơn, xác việc kiểm sốt tồn chương trình thuận tiện Mục đích việc nghiên cứu - Mục đích việc nghiên cứu sử dụng chương trình lập trình có cấu trúc lập trình Pascal nhằm giúp học sinh phát huy tính tích cực, tự giác, chủ động, sáng tạo, rèn luyện thói quen làm việc độc lập kỹ lập trình, giảm bớt thời gian, cơng sức lập trình; giúp cho việc kiểm tra, sửa chữa chương trình trở nên đơn giản hơn, dễ dàng thuận tiện Bên cạnh đó, học sinh biết vận dụng để giải toán thường gặp thực tế; gây hứng thú học tập, làm cho “Học” trình kiến tạo; niềm say mê để từ học sinh biết khai thác xử lý thơng tin, tự hình thành hiểu biết, lực phẩm chất Kết cần đạt - Phải phát huy tính tích cực, tự giác, chủ động, sáng tạo học sinh; tạo thói quen làm việc độc lập; bồi dưỡng cho học sinh phương pháp tự học, khả hợp tác; rèn luyện kĩ lập trình kỹ vận dụng kiến thức vào việc giải toán thường gặp 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 cho học sinh Đối tượng, phạm vi kế hoạch nghiên cứu - Đối tượng nghiên cứu học sinh trung học phổ thông - Phạm vi kế hoạch nghiên cứu: Khối 11 (Lớp 11B5, 11B6) - Trường THPT XXX Phần II: NỘI DUNG Cơ sở lý luận vấn đề nghiên cứu tổng kết kinh nghiệm 1.1 Một số khái niệm - Lập trình: Là sử dụng cấu trúc liệu câu lệnh ngơn ngữ lập trình cụ thể để mơ tả liệu diễn đạt thao tác thuật tốn - Ngơn ngữ lập trình: Là ngơn ngữ để viết chương trình - Chương trình: Là cách mơ tả thuật tốn ngơn ngữ mà máy tính hiểu thực - Thuật tốn: Là dãy hữu hạn thao tác xếp theo trình tự xác định cho sau thực dãy thao tác từ Input ta thu Output tốn - Chương trình con: Là dãy lệnh mô tả số thao tác định thực (đựơc gọi) từ nhiều vị trí khác chương trình 1.2 Lợi ích việc sử dụng chương trình - Tránh việc phải viết lặp đi, lặp lại dãy lệnh chương trình - Hỗ trợ việc thực viết chương trình lớn - Phục vụ cho q trình trìu tượng hố - Mở rộng khả ngôn ngữ - Thuận tiện cho việc phát triển khả nâng cấp chương trình 1.3 Phân loại chương trình - Chương trình có loại bản: Chương trình hàm Chương trình thủ tục + Hàm (Function): Là chương trình thực số thao tác trả giá trị qua tên hàm + Thủ tục (Procedure): Là chương trình thực thao tác định không trả giá trị qua tên 1.4 Cấu trúc chương trình - Cấu trúc chung: [] Begin []; {Phần thân chương trình con} End; - Cấu trúc Hàm: Function Tên_hàm ([khai báo tham số, cần]): kiểu DL; [] { Label, Const, Type, Var, } Begin ; {Phần thân hàm} End; - Cấu trúc thủ tục: Procedure Tên_thủ tục ([khai báo tham số, cần]); [m1 then t1:=t1-m1 else m1:=m1-t1; uc:=m1; tu:=tu div uc; mau:=mau div uc; writeln('S = ',tu,'/',mau); readln; End - Chương trình sử dụng chương trình Program congPS; var a,b,c,d,m,n,p,q:integer; tu,mau:integer; S:real; Procedure Nhap_PS(Var t,m:integer); begin repeat write('Nhap tu so: '); readln(t); write('Nhap mau so: '); readln(m); if m=0 then writeln('Nhap lai phan so'); until (m0); end; Function UCLN(x,y:integer):integer; begin while xy if x>y then x:=x-y else y:=y-x; UCLN:=y; end; Procedure Toi_gian_PS(Var t,m:integer); Var k: integer; Begin 10 k:=UCLN(t,m); t:=t div k; m:=m div k; writeln(t,'/',m); end; Begin writeln('Nhap phan so a/b'); Nhap_PS(a,b); writeln('Nhap phan so c/d'); Nhap_PS(c,d); writeln('Nhap phan so m/n'); Nhap_PS(m,n); writeln('Nhap phan so p/q'); Nhap_PS(p,q); tu:=(a*d*n*q+c*b*n*q+m*b*d*q+p*b*d*n); mau:=(b*d*n*q); write('S = '); Toi_gian_PS(tu,mau); readln; End 3.2 Chương trình VD4 (Làm việc theo nhóm) - Chia nhỏ tốn giao cho thành viên nhóm + Nhóm trưởng: Tổng hợp viết chương trình + Thành viên 1: Viết chương trình xếp dãy a tăng dần + Thành viên 2: Tách mảng a thành mảng chẵn mảng lẻ + Thành viên 3: Sắp xếp dãy a chẵn trước, lẻ sau + Thành viên 4: Sắp xếp dãy a tăng dần cho chẵn, lẻ xen kẽ - Các thành viên làm việc độc lập gửi chương trình cho nhóm trưởng tích hợp Program BT_Sapxep; 11 Type mang = array[1 100] of integer; Var a,b,c:mang; n,nb,nc:integer; Procedure Nhap_mang; Var i:integer; begin for i:=1 to n begin write('a[',i,']='); readln(a[i]); end; end; Procedure In_mang(Var m:mang); Var i:integer; begin for i:=1 to n write(m[i],' '); writeln; end; Procedure SX(Var m:mang); Var i,j,tg:integer; begin for i:=1 to n-1 for j:=n downto i+1 if a[j]