Sáng kiến kinh nghiệm môn tin học THPT một số ưu điểm của ngôn ngữ free pascal so với turbo pascal

SÁNG KIẾN KINH NGHIỆM ĐỀ TÀI: "MỘT SỐ ƯU ĐIỂM CỦA NGÔN NGỮ FREE PASCAL SO VỚI TURBO PASCAL" A PHẦN MỞ ĐẦU I LÝ DO CHỌN ĐỀ TÀI Ngày nay, với phát triển tin học Việt Nam nói chung giới diễn trình tin học hoá nói riêng đặc biệt nhiều lĩnh vực hoạt động xã hội loài người đem lại nhiều hiệu to lớn Sự phát triển mạnh mẽ “ vũ bão ” tin học làm cho xã hội có nhiều nhận thức cách tổ chức hoạt động Nhiều quốc gia giới ý thức rõ tầm quan trọng tin học có đầu tư lớn cho lĩnh vực này, đặc biệt giáo dục nâng cao dân trí tin học đào tạo nguồn nhân lực có chất lượng cao Người Việt Nam có nhiều tố chất thích hợp với ngành khoa học này, hi vọng sớm hoà nhập với khu vực giới Nước ta nhận thấy tầm quan trọng ngành Tin học đưa môn học vào nhà trường phổ thông môn khoa học khác năm học 2006-2007 Và tổ chức thi học sinh giỏi môn Tin học cấp tỉnh, cấp quốc gia Hiện tỉnh Thanh Hóa kỳ thi học sinh giỏi cấp tỉnh thường cho học sinh lập trình ngôn ngữ lập trình Turbo Pascal Free Pascal Trong trình ôn luyện đội tuyển học sinh giỏi môn Tin học trường nhận thấy số ưu điểm ngôn ngữ lập trình Free Pascal so với ngôn ngữ lập trình Turbo Pascal Từ lí trên, xin trình bày sáng kiến kinh nghiệm “MỘT SỐ ƯU ĐIỂM CỦA NGÔN NGỮ LẬP TRÌNH FREE PASCAL SO VỚI TURBO PASCAL” II MỤC ĐÍCH CỦA ĐỀ TÀI Trong chương trình tin học THPT số lượng tiết học han chế (52 tiết) kiến thức lập trình giải toán có kiểu lớn thường khó khăn Với ưu điểm ngôn ngữ lập trình môi trường 32 bít (64 bít) ngôn ngữ lập trình Free pascal cố thể giải số toán theo cách lập trình thông thường học sinh mà Turbo Pascal không giải III NHIỆM VỤ VÀ PHƯƠNG PHÁP NGHIÊN CỨU Viết sáng kiến kinh nghiệm thường xuyên liên tục nhiệm vụ trị giáo viên, cần phải lựa chọn phương pháp nghiên cứu thích hợp với nhà trường trung học phổ thông Sáng kiến kinh nghiệm trình bày dựa theo luận khoa học hướng đối tượng, cụ thể: thuyết trình, quan sát, điều tra bản, phân tích kết thực nghiệm sư phạm,v.v… phù hợp với học môn học B PHẦN NỘI DUNG I Cơ sở lí luận: Khi học sinh học chương trình Tin học lớp 11 Các em tiếp cận khái niệm lập trình ngôn ngữ lập trình Và sử dụng ngôn ngữ lập trình cụ thể để giải toán Nhưng mục đích, ưu cầu chương trình tin học 11 không yêu em giải toán phức tạp toán chương trình thi học sinh giỏi gặp toán cần phải xử lý số lớn em thường không xử lý hết Test mà đề yêu cầu ví dụ số toán sau: II Nội dung giải pháp thực hiện: Trong SKKN đưa số toán với kiểu liệu lớn mà học sinh THPT giải ngôn ngữ lập trình Turbo Pascal đường gặp khó khăn giải Free Pascal vấn đề giải đơn giản Bài toán 1: Trung bình cộng (đề thi học sinh giỏi năm 2008-2009) Cho dãy gồm N số nguyên a1, a2, , aN số nguyên K Yêu cầu: Cho biết dãy số cho có tồn hay không cặp số mà trung bình cộng chúng K Dữ liệu: Vào file văn BAI2.INP: - Dòng đầu ghi số N K - Dòng ghi N số a1, a2, , aN Kêtq quả: Ra file văn BAI2.OUT: - Số tồn cặp số thoả mãn yêu cầu toán - Số không tồn cặp số thoả mãn yêu cầu toán Giới hạn: 0[...]... đó cần phải có những lập trình viên tài giỏi để thực hiện, Việc dạy cho học sinh lập trình để có thể tự viết chương trình chạy trên máy tính làm cho học sinh yêu thích môn học và ham học hỏi, tìm tòi, sáng tạo Đề tài này mang tính thực tiển cụ thể là:Trong các kỳ thi học sinh giỏi việc học sinh hiểu rỏ các ưu điểm của các ngôn ngữ lập trình giúp các em giải quyết tốt hơn các bài toán 12 ... do if a[i]=x then exit(i); exit(0); end; 11 III PHẦN KẾT LUẬN Tin học nói chung đóng vai trò hết sức quan trọng trong xã hội hiện đại, tin học đã làm thay đổi nhận thức của con người và ứng dụng trong hầu hết các hoạt động của xã hội loài người Trong đó, đại diện là máy tính điện tử và khoa học xử lí dữ liệu của máy tính điện tử Để tin học ngày càng phát triển mạnh thì việc tạo ra các phần mềm máy...quả cho hàm (giống như C và Object Pascal sử dụng lệnh return) Bạn sẽ thấy sự tiện lợi của cách viết này khi viết các hàm dạng " phát hiện được phần tử đầu tiên rồi thoát" Chẳng hạn hàm tìm vị trí của phần tử x trong mảng a có n phần tử Viết trong TP ta phải viết như sau: function Find(x: integer): integer; Var i :