GIÁO TRÌNH PASSCAL 7.0

Giáo trình Chủ biên: Võ Thanh Ân Hiệu đính bổ sung: Vương Đức Bình Bến Tre, 5-2008 Trang Lời ngỏ cho lần hiệu đính Tài liệu đƣợc viết lần đầu giảng viên Võ Thanh Ân, theo yêu cầu Tổ môn CNTT, vào tháng năm 2004 Tài liệu đƣợc viết trình bày mạch lạc, gọn nhẹ, dễ hiểu đƣợc dùng để dạy cho lớp K2 CNTT Cho đến nhận thấy cần có số điều chỉnh bổ sung nhằm thích hợp với cơng tác giảng dạy nhƣ: Turbo Pascal, nhƣ trình bày giảng viên Võ Thanh Ân, khơng chạy tốt Windows XP Thay vào Borland Pascal chạy ổn định Dù Pascal gần ngôn ngữ bị phê phán nhiều giới lập trình viên yếu Chủ yếu khơng cho phép tải cấu trúc liệu hàm Dù có so với Borland C++ vấn đề lập trình hƣớng đối tƣợng, song tính khúc chiết - mạch lạc sáng cú pháp ngơn ngữ, ngơn ngữ tốt để dạy cho ngƣời bắt đầu học lập trình Về mặt sƣ phạm có lẽ khó có ngơn ngữ tốt Cần nói tới Free Pascal, phiên miễn phí hồn tồn, giữ lại đƣợc hầu hết cú pháp, từ khóa, thao tác Borland Pascal lại chạy ổn định Windows XP Kinh nghiệm cho thấy sinh viên Khoa năm qua, cơng tác tuyển sinh, có hạ thấp yêu cầu đầu vào Do buộc phải xem xét lại giáo trình viết để giúp cho ngƣời học - xuất phát điểm thấp – đạt chất lƣợng đầu theo yêu cầu Với lí đó, xem xét lại giáo trình giảng viên Võ Thanh Ân khơng làm việc Tổ mơn CNTT, tơi định hiệu đính lại tài liệu Trên tinh thần tôn trọng tác giả ban đầu tài liệu này, chỗ có thêm vào hiệu đính tơi dùng màu chữ xanh dƣơng đậm với font size nhỏ để phân biệt Tổ môn CNTT cảm ơn giảng viên Võ Thanh Ân cho phép tiếp tục dùng giáo trình mong giáo trình hiệu đính, phụ lục giúp cho sinh viên học tập hiệu Vương Đức Bình (Tháng 01/2008) Trang Mục lục ( Phần 1) Chƣơng I: GIỚI THIỆU NGÔN NGỮ PASCAL VÀ BORLAND PASCAL 7.0 I GIỚI THIỆU NGÔN NGỮ PASCAL Ngôn Ngữ PASCAL TURBO PASCAL II SỬ DỤNG PASCAL 7.0 Khởi Động Turbo Pascal Các Thao Tác Thƣờng Sử Dụng Trên Turbo Pascal III CÁC THÀNH PHẦN CƠ BẢN CỦA NGÔN NGỮ PASCAL Bộ Chữ Viết – Từ Khoá – Tên Hằng – Kiểu – Biến Biểu Thức – Dấu Chấm Phẩy – Lời Giải Thích 10 Cấu Trúc Của Một Chƣơng Trình Pascal 11 Chƣơng II: CÁC KIỂU VÔ HƢỚNG CHUẨN VÀ CÁC CÂU LỆNH ĐƠN .12 I CÁC KIỂU VÔ HƢỚNG CHUẨN 12 Các Kiểu Vô Hƣớng Chuẩn (Standard scalar types) .12 Một Số Phép Toán Trên Các Kiểu 12 II CÂU LỆNH .14 Khái Niệm Về Một Câu Lệnh .14 Một Số Lệnh Đơn 15 Chƣơng III: CÁC LỆNH CÓ CẤU TRÖC 18 I LỆNH CẤU TRÖC RẼ NHÁNH .18 Dạng Không Đầy Đủ 18 Dạng Đầy Đủ 18 II LỆNH CẤU TRÖC LỰA CHỌN .19 Dạng Không Đầy Đủ 19 Dạng Đầy Đủ 19 III CÁC LỆNH VÕNG LẶP 20 Lệnh Lặp Với Số Lần Xác Định 20 Lệnh Lặp Với Số Lần Lặp Không Xác Định 23 Chƣơng IV: CHƢƠNG TRÌNH CON 25 I KHÁI NIỆM VỀ CHƢƠNG TRÌNH CON 25 II HÀM (FUNCTION) 26 III THỦ TỤC (PROCEDURE) 27 IV LỜI GỌI CHƢƠNG TRÌNH CON VÀ VẤN ĐỀ TRUYỀN THAM SỐ 28 V HOẠT ĐỘNG CỦA CHƢƠNG TRÌNH CON KHI ĐƢỢC GỌI VÀ SỰ BỐ TRÍ BIẾN .30 VI VẤN ĐỀ TRUYỀN THAM SỐ KHI GỌI CHƢƠNG TRÌNH CON 30 VII TÍNH ĐỆ QUI CỦA CHƢƠNG TRÌNH CON 33 Chƣơng 5: UNIT 37 I KHÁI NIỆM VỀ UNIT 37 Khái Niệm Về Unit 37 Các Unit Chuẩn 37 II THIẾT LẬP UNIT 38 Các Bƣớc Tạo Một Unit 38 Trang Ví dụ ứng dụng 39 III TẬP TIN TURBO.TPL 40 Trang Chƣơng I: GIỚI THIỆU NGÔN NGỮ PASCAL VÀ BORLAND PASCAL 7.0 I GIỚI THIỆU NGƠN NGỮ PASCAL Ngơn Ngữ PASCAL Vào đầu năm 1970 nhu cầu học tập sinh viên, giáo sƣ Niklaus Writh - Trƣờng Đại Học Kỹ Thuật Zurich - Thụy Sĩ sáng tác ngơn ngữ lập trình cấp cao cho cơng tác giảng dạy sinh viên Ngôn ngữ đƣợc đặt tên PASCAL để tƣởng nhớ đến nhà toán học ngƣời Pháp Blaise Pascal Pascal ngơn ngữ lập trình có cấu trúc thể phƣơng diện - Về mặt liệu: Ngoài kiểu liệu đơn giản có kiểu liệu có cấu trúc Ta xây dựng kiểu liệu phức tạp từ kiểu liệu có - Về mặt câu lệnh: Từ câu lệnh đơn giản lệnh có cấu trúc ta xây dựng câu lệnh hợp thành - Về mặt chƣơng trình: Một chƣơng trình chia làm nhiều chƣơng trình TURBO PASCAL Khi đời, Standart Pascal ngôn ngữ đơn giản, dùng để giảng dạy học tập, ƣu điểm đƣợc phát huy trở thành ngôn ngữ mạnh Từ Pascal chuẩn ban đầu, đƣợc nhiều công ty phần mềm cải tiến với nhiều thêm bớt khác TURBO PASCAL sản phẩm hãng Borland đƣợc dùng phổ biến giới ƣu điểm nhƣ: tốc độ nhanh, cải tiến so với Pascal chuẩn phù hợp với yêu cầu ngƣời dùng TURBO PASCAL 4.0 trở có cải tiến quan trọng đƣa khái niệm Unit để dịch sẵn Module đĩa, làm cho việc lập trình trở nên ngắn gọn, dễ dàng, chƣơng trình viết dễ hiểu Từ phiên 5.5 (ra đời năm 1989) trở đi, Turbo Pascal có kiểu liệu hồn tồn kiểu Object cho phép đƣa mã lệnh xen kẽ với liệu Ngồi thƣ viện đồ hoạ phong phú với nhiều tính mạnh, ngơn ngữ lập trình cấp cao Delphi sử dụng cú pháp tƣơng tự nhƣ Turbo Pascal Turbo Pascal 7.0 phiên cuối Borland Sau phiên hãng Borland chuyển sang Pascal For Windows thời gian ngắn sản xuất DELPHI Turbo Pascal 7.0 hỗ trợ mạnh mẽ lập trình hƣớng đối tƣợng nhƣng có nhƣợc điểm bị lỗi “Devide by zero” tất máy có xung nhịp lớn 300 MHz Giải vấn đề có hai phƣơng án: a Cập nhật file TURBO.TPL thƣ mục \BP\BIN b Sử dụng Free Pascal.1 Ngoài nên lƣu ý Turbo Pascal chạy chế độ thực (real mode) nên chạy Windows XP hay khởi động lại máy Nên chạy Borland Pascal Khi Windows tạo môi trƣờng DOS giả lập chạy chế độ đa nhiệm tiện lợi Gói phần mềm download miễn phí từ Internet (từ khóa: Free Pascal) hỏi chép từ Tổ môn CNTT Trang II SỬ DỤNG PASCAL 7.0 Khởi Động Turbo Pascal Nếu máy tính cài đặt Turbo Pascal đĩa, ta khởi động chúng nhƣ sau (Nếu máy tính chƣa có, phải cài đặt Turbo Pascal sau thực thi đƣợc) - Từ MS-DOS: Đảm bảo thƣ mục hành vị trí cài đặt (hoặc dùng lệnh PATH) Turbo Pascal Ta đánh vào TURBO Enter - Từ Windows: Ta nên giả lập MS-DOS Mode cho tập tin TURBO.EXE Shortcut nó, khơng ta thực thi TURBO PASCAL chƣơng trình khỏi Windows, trở MS-DOS Sau thoát Turbo Pascal ta phải đánh lệnh EXIT để khởi động lại Windows Cách giả lập nhƣ sau: · Nhắp chuột phải lên tập tin TURBO.EXE Shortcut nó, chọn Properties · Chọn thẻ Program đánh check nhƣ hình sau Click vào chọn nhƣ hình dƣới Chọn OK hộp thoại, sau khởi động Turbo Pascal, hình soạn thảo sau khởi động TURBO PASCAL nhƣ dƣới xuất Trang Cài đặt sử dụng Borland Pascal 7.0: Gói cài đặt Borland Pascal thƣờng đƣợc đặt thƣ mục BP70 Mở thƣ mục chạy file cài đặt INSTALL.EXE Làm theo hƣớng dẫn q trình cài đặt Thơng thƣờng sau cài đặt xong, chƣơng trình đƣợc đặt C:\BP Hãy vào C:\BP\BIN để cập nhật lại file Turbo.tpl (Chép đè file tên thƣ mục \BP70\Huongdan\ lên file này) Thay chạy TURBO PASCAL (File thực thi: BP\BIN\Turbo.exe) tạo Shorcut chạy BORLAND PASCAL (File thực thi: BP\BIN\BP.exe) Các thao tác sử dụng Borland Pascal hoàn tồn giống với thao tác Turbo Pascal nói dƣới Các Thao Tác Thường Sử Dụng Trên Turbo Pascal Khi ta muốn tạo mở tập tin có đĩa ta dùng phím F3 Sau đƣa vào tên vị trí tập tin Nếu tập tin tồn Turbo Pascal mở nội dung lên cho ta xem, tên tập tin chƣa có Turbo Pascal tạo tập tin (với tên mà ta định) Khi muốn lưu lại tập tin ta dùng phím F2 Trƣớc khỏi chƣơng trình, ta nên lƣu tập tin lại, chƣa lƣu chƣơng trình hỏi ta có lƣu tập tin lại hay không Nếu ta chọn Yes (ấn phím Y) chƣơng trình lưu lại, chọn No (ấn phím N)chƣơng trình khơng lưu Một số phím thông dụng TURBO PASCAL 7.0 Biểu tượng      Home End Pg Up Pg Down Del Back Insert F1 F2 F3 F4 F5 F6 F7 F8 F9 Tổ hợp Tên phím Enter Up Down Left Right Home End Page Up Page Down Delete BackSpace Insert F1 F2 F3 F4 F5 F6 F7 F8 F9 Alt + F9 Diễn giải Đƣa trỏ xuống dòng Đƣa trỏ lên dòng Đƣa trỏ xuống dòng Đƣa trỏ qua trái ký tƣ Đƣa trỏ qua phải ký tự Đƣa trỏ đầu dòng Đƣa trỏ cuối dòng Lên trang hình Xuống trang hình Xố ký tự vị trí trỏ Xố ký tự trƣớc trỏ Thay đổi chế độ viết xen hay viết chồng Gọi chƣơng trình giúp đở Lƣu tập tin lại Tạo mở tập tin Thực thi chƣơng trình đến dòng chứa trỏ Phóng lớn cửa sổ Chuyển đổi cửa sổ Chạy dòng lệnh (hàm xem nhƣ lệnh) Chạy dòng lệnh đơn Kiểm tra lỗi chƣơng trình Biên dịch chƣơng trình Trang Tổ hợp Tổ hợp Tổ hợp Tổ hợp Tổ hợp Tổ hợp Tổ hợp Tổ hợp Ctrl + F9 Ctrl + N Ctrl + Y Ctrl + K + B Ctrl + K + K Ctrl + K + C Ctrl + K + V Ctrl + K + Y Chạy chƣơng trình Thêm dòng trƣớc trỏ Xố dòng trỏ Đánh dấu đầu khối Đánh dấu cuối khối Sao chép khối Di chuyển khối Xoá khối Trong Borland Pascal thao tác khối đơn giản dễ nhƣ sau: + Đánh dấu khối: SHIFT + (phím mũi tên) + Copy khối vào clipboard: CTRL+ Ins (phím Insert) + Dán khối (đã copy vào clipboard) vào vị trí mới: SHIFT+ Ins Tổ hợp Ctrl + K + W Tổ hợp Ctrl + K + R Tổ hợp Tổ hợp Tổ hợp Ctrl + K + H Ctrl + F4 Alt + X Ghi khối lên đĩa thành tập tin (nội dung tập tin khối chọn) Xen nội dung tập tin (từ đĩa) vào sau vị trí trỏ Tắt/Mở đánh dấu khối Kiểm tra giá trị biến chạy chƣơng trình Thốt khỏi chƣơng trình III CÁC THÀNH PHẦN CƠ BẢN CỦA NGÔN NGỮ PASCAL Bộ Chữ Viết – Từ Khoá – Tên a Bộ chữ viết Bộ chữ ngôn ngữ Pascal gồm: · 26 chữ la tinh lớn: A, B, C… Z · 26 chữ la tinh nhỏ: a, b, c, … z · Dấu gạch dƣới _ (đánh vào cách kết hợp phím Shift với dấu trừ) · Bộ chữ số thập phân: 0, 1, 2, 3, 4, 5, 6, 7, 8, · Các ký hiệu toán học: +, -, *, /, =, , (, ) · Các ký hiệu đặc biệt: , : ; [ ] ? % @ \ | ! # $ { } · Dấu khoảng cách (khoảng trắng – Space) b Từ khoá Các từ khoá từ dành riêng (reserved words) Pascal mà ngƣời lập trình sử dụng chúng chƣơng trình để thiết kế chƣơng trình Khơng đƣợc dùng từ khoá để đặt cho tên riêng nhƣ tên biến, tên kiểu, tên hàm… Một số từ khoá Pascal gồm: Absolute And Array Begin Case Const External File For Forward Function Goto Mod Nil Not Object Of Or Trang Shr String Then To Type Unit Constructor Desstructot Div Do Downto Else End If Implementation In Inline Interface Interrupt Label Packed Procedure Program Record Repeat Set Shl Until Uses Var Virtual While With Xor c Tên Tên hay gọi danh biểu (identifier) dùng để đặt cho tên chƣơng trình, hằng, kiểu, biến, chƣơng trình con…tên đƣợc chia thành loại - Tên chuẩn đƣợc PASCAL đặt trƣớc, chẳng hạn hàm số SIN, COS, LN,… số PI, kiểu INTEGER, BYTE, REAL… Tên ngƣời dùng tự đặt Dùng chữ cái, chữ số dấu gạch dƣới để đặt tên, nhƣng phải tuân theo qui tắc: · Bắt đầu chữ “_” sau chữ chữ số · Lƣu ý:  Khơng có khoảng trống tên  Khơng đƣợc trùng với từ khố  Độ dài tối đa tên 127 ký tự, nhiên cần đặt cho tên gọn có ý nghĩa  Pascal không bắt lỗi việc đặt tên trùng với tên chuẩn, nhƣng ý nghĩa tên chuẩn khơng giá trị  Pascal khơng phân biệt chữ hoa chữ thƣờng (case insensitive) từ khóa, tên chuẩn hay tên Ví dụ “BEGIN” hay “Begin” hay “BeGin” nhƣ Tuy nhiên sinh viên nên tập thói quen viết cách thống tên toàn chƣơng trình Điều giúp bạn tránh nhầm lẫn gây tốn chuyển sang lập trình ngơn ngữ có phân biệt chữ hoa chữ thƣờng (case sensitive) nhƣ ngôn ngữ C Hằng – Kiểu – Biến a Hằng (Constant) Hằng đại lƣợng khơng đổi q trình thực chƣơng trình Có hai loại chuẩn ngƣời dùng định nghĩa - Hằng chuẩn Pascal định sẵn, ví dụ số PI, số màu RED=4,… Ngƣời sử dụng không cần định nghĩa lại thấy không cần thiết Các đƣợc Pascal định nghĩa sẵn Unit Cần tham khảo hƣớng dẫn (help) Unit để biết Unit có đƣợc định nghĩa - Hằng ngƣời dùng định nghĩa thông qua việc khai báo Cú pháp: CONST = ; [ = ;] Ví dụ: Const A = 50; Ch = „K‟; Trang D = true; b Kiểu Một kiểu liệu tập hợp giá trị mà biến thuộc kiểu nhận đƣợc tập hợp phép toán áp dụng giá trị Có hai loại kiểu kiểu chuẩn kiểu ngƣời dùng định nghĩa - Kiểu chuẩn kiểu Pascal định nghĩa sẵn: REAL, INTEGER, CHAR… Kiểu ngƣời lập trình định nghĩa thông qua việc khai báo kiểu Cú pháp: TYPE Ví dụ: TYPE = ; [ = ;] NguyenDuong = MaxInt; MaTran = [1 10,1 10] of Integer; c Biến Biến ô nhớ nhớ máy tính, giá trị biến thay đổi q trình thực chƣơng trình, biến đƣợc giải phóng (thu hồi nhớ) chƣơng trình kết thúc Chƣơng trình quản lý biến thông qua tên biến biến tƣơng ứng với kiểu liệu định Biến trƣớc sử dụng phải đƣợc khai báo Cú pháp: VAR Ví dụ: VAR []: ; [[]: ;] a, b, c: Integer; X, Y: Real; I, J: NguyenDuong; {Đã định nghĩa trƣớc} Biểu Thức – Dấu Chấm Phẩy – Lời Giải Thích a Biểu thức Là phần câu lệnh bao gồm hằng, biến, hàm đƣợc liên kết với phép toán dấu ngoặc đơn ( ) Ví dụ: (-b + sqrt(delta))/(2*a) Thứ tự thực phép toán biểu thức sau: o Các thành phần cặp ngoặc đƣợc thực trƣớc tới thành phần cặp ngoặc phía ngồi o Các phép tốn nhân (*) chia (/) (có mức ƣu tiên) đƣợc thực trƣớc so với phép tốn cộng (+) trừ (-) (có mức ƣu tiên) Ví dụ nhƣ (x*y –z) phép nhân đƣợc thực trƣớc phép trừ Trang 10 Chương 7: KIỂU CHUỖI KÝ TỰ I KHAI BÁO Khai báo kiểu String (chuỗi) có hai cách khai báo gián tiếp (khai báo kiểu khai báo biến) khai báo trực tiếp Độ dài tối đa biến kiểu String 255 ký tự, nhiên ta giảm độ dài tối đa chuỗi khai báo biến để tiết kiệm ô nhớ Việc khai báo thực Khai báo gián tiếp Type KIEU = String[20]; Var st: KIEU; Khai báo trực tiếp Var st: String[20]; maxst: String; {Độ dài tối đa 20} {Độ dài tối đa 20} {Độ dài tối đa 255} II THAO TÁC TRÊN CHUỖI Các Phép Toán Và Hàm Trên Kiểu Chuỗi a Phép gán Phép gán tiến hành bình thường phép gán kiểu vô hướng khác Tuy nhiên cần lưu ý String nằm cặp dấu ‘ ’ (nháy đơn) Ví dụ: Hoten := ‘Nguyễn Văn Thành’; b Phép cộng Là phép ghép chuỗi thứ với chuỗi thứ hai Ví dụ: Hoten := ‘Nguyễn Văn ’ + ‘Thành’; c So sánh chuỗi Khi so sánh hai chuỗi ký tự ký tự so sánh cặp trái qua phải theo bảng mã ASCII Các khả xảy sau: - Hai chuỗi hồn tồn giống (‘ABC’=’ABC’) - Tính từ trái qua phải, chuỗi có ký tự khác nhỏ nhỏ (‘ABCDEF’