Tập tính xã hội của ong

Ban đầu, Pascal là một ngôn ngữ được hướng để dùng trong giảng dạy về lập trình có cấu trúc, và nhiều thế hệ sinh viên đã "vào đời" thông qua việc học Pascal như ngôn ngữ vỡ lòn[r]

(1)

Pascal (ngơn ngữ lập trình)

Bách khoa tồn thư mở Wikipedia Bước tới: menu, tìm kiếm

Pascal ngơn ngữ lập trình cho máy tính thuộc dạng mệnh lệnh, Niklaus Wirth phát triển vào năm 1970 ngơn ngữ đặc biệt thích hợp cho kiểu lập trình có cấu trúc

Pascal dựa ngơn ngữ lập trình Algol đặt tên theo nhà toán học triết học

Blaise Pascal Wirth đồng thời xây dựng Modula-2 Oberon, ngôn ngữ tương đồng với Pascal Oberon hỗ trợ kiểu lập trình hướng đối tượng

Ban đầu, Pascal ngôn ngữ hướng để dùng giảng dạy lập trình có cấu trúc, nhiều hệ sinh viên "vào đời" thông qua việc học Pascal ngơn ngữ vỡ lịng chương trình học đại cương Nhiều biến thể Pascal ngày sử dụng phổ biến, giảng dạy lẫn công nghiệp phát triển phần mềm

Phần lớn hệ điều hành Macintosh viết Pascal Hệ chữTeX phổ biến viết ngôn ngữ tên Web ngôn ngữ mà Donald Knuth vay mượn nhiều yếu tố từ Pascal

Mục lục

[ẩn]

 Các version Turbo Pascal  Ngôn ngữ

 Chương trình "Chào giới"  Thực tế sử dụng

 Chuẩn hóa

 Các trình biên dịch phổ biến  Những phê phán trước  Các câu lệnh

o 8.1 SYSTEM o 8.2 Uses CRT o 8.3 Unit GRAPH o 8.4 Unit DOS  Đọc thêm

 10 Xem thêm  11 Liên kết

(2)

 Version 2.0: So với Pascal chuẩn, Turbo Pascal Version 2.0 có mở rộng

các biến động, biến địa tuyệt đối, Các phép toán bit byte, phép toán logic số nguyên, Kết nối chương trình với biến chung,

 Version 3.0: hệ thống phát triển gồm đặc điểm version 2.0 có

nhiều mở rộng quan trọng như: Bổ sung nhiề thủ tục hàm chuẩn Bổ sung vài dạng đặc biệt cho phép tính tốn số thực với độ xác lớn, So với version 2.0 version 3.0 có tốc độ dịch gấp đơi

 Version 4.0: có đặc điểm có thêm số liệu mới, thực biểu thức

logic nhanh hơn, có nhiều thủ tục hàm chuẩn xử lí đồ họa đồ thị màu sắc hình khối cửa sổ,

 Version 5.0 5.5: Năm 1989, hãng Borland đưa thị trường phiên Turbo

Pascal Version 5.0 để giới thiệu thủ tục hàm tiện nghi Tiếp chưa đầy nửa năm họ đưa version 5.5 có thêm cấu trúc hồn tồn mới, lập trình đối tượng

 Version 6.0: Đặc điểm bậc version giới thiệu thành phần Turbo

vision, thư viện chương trình cụ thể, định hình có cửa sổ tiện ích để đối chiếu với

 Version 7.0: Cuối năm 1992, hãng Borland lại đưa version 7.0 để chạy

nhiều hệ điều hành kể Windows

[sửa] Ngơn ngữ

Mọi chương trình Pascal khóaProgram, với danh sách tùy chọn

các phần mơ tả tập tin ngồi sau khối dịng lệnh nằm từ khóa Begin End Dấu chấm phẩy dùng để tách dòng lệnh khác nhau, dấu chấm

để báo hiệu kết thúc chương trình (hay đơn vị) Trong mã nguồn Pascal, không phân biệt chữ viết in

1 program ChaoThegioi(output);

2

3

4

5 begin

6

7 writeln('Chao The gioi!');

8

9 end

10

Pascal, nguyên thể đơn ngôn ngữ lập trình thủ tục với loạt từ khóa chuẩn

if, while, for, thành phần khác

Pascal ngơn ngữ lập trình có cấu trúc, nghĩa chuỗi điều khiển cấu trúc thành câu lệnh chuẩn, hạn chế tối đa lệnh go to chuyển hướng lung tung

trong cấu trúc chương trình

(3)

2

3

4

5 if a > b then

6

7 writeln('Thỏa man~ điều kiện')

8

9 else

10

11 writeln('Không thỏa man~ điều kiện');

12

13

14

15 for i := to 10 writeln('Lặp: ', i:1);

16

17

18

19 repeat a := a + until a = 10;

20

Pascal cấu trúc chương trình thành thủ tục hàm

1 program mine(output);

2

3

4

5 procedure print(var i: integer);

6

7

8

9 function next(i: integer): integer;

10

11 begin

12

13 next := i +

14

15 end;

16

17

18

19 begin

20

21 writeln('Tổng là: ', i);

22

23 i := next(i)

24

25 end;

26

27

28

(4)

30

31 i := 1;

32

33 while i <= 10 print(i)

34

35 end

36

Các thủ tục hàm lồng vào theo nhiều cấp, từ program khối cấu trúc

ngoài

Mỗi khối có khai báo nhãn goto, hằng, kiểu, biến, với thủ tục hàm

riêng, tất phải tuân theo trình tự

Pascal có kiểu đơn integer (số nguyên), character (ký tự), boolean (logic),

v.v enumerations (liệt kê), kiểu đưa vào Pascal sau program myprog;

2

3

4

5 var

6

7 a: integer;

8

9 b: char;

10

11 c: boolean;

12

13 d: (mot, hai, ba, bon, nam);

14

Có thể tạo "kiểu con" từ kiểu

1 var

2

3 x: 10;

4

5 y: 'a' 'z';

6

7 z: hai bon;

8

Các kiểu tạo từ kiểu khác cách khai báo kiểu

1 program myotherprog;

2

3

(5)

5 type

6

7 x = integer;

8

9 y = x;

10

11

12

Hơn nữa, kiểu phức xây dựng từ kiểu đơn:

1 type

2

3 a = array [1 10] of integer;

4

5 b = record

6

7 a: integer;

8

9 b: char

10

11 end;

12

13 c = file of a;

14

Các chuỗi ký tự dãy kết hợp bắt đầu số nguyên Pascal hỗ trợ dùng trỏ:

1 type

2

3 a = ^b;

4

5 b = record

6

7 a: integer;

8

9 b: char;

10

11 c: a

12

13 end;

14

15 var

16

17 pb : a

(6)

Ở biến pb trỏ đến kiểu liệu b, record Để tạo record gán

các giá trị 10 A vào trường a b record, dùng câu lệnh sau: new(pb);

2

3 pb^.a := 10;

4

5 pb^.b := 'A';

6

7 pb^.c := nil;

8

9

10

Danh sách liên kết tạo cách cho trường kiểu trỏ (c) vào

trong record

[sửa] Chương trình "Chào giới"

1 program ChaoThegioi;

2

3

4

5 begin

6

7 WriteLn('Chao mung cac ban!');

8

9 readln;

10

11 end

12

[sửa] Thực tế sử dụng

Trình biên dịch Pascal thiết kế Zurich cho dịng máy tính CDC 6000, viết xây dựng Đại học Illinois đạo Donald B Gillies cho loại máy tính PDP-11 từ lúc sinh mã máy trực tiếp

Để nhanh chóng phổ biến rộng rãi ngơn ngữ này, công cụ chuyển mã viết Zurich bao gồm trình biên dịch sang "mã máy ảo" (hay dễ hiểu hơn, mã trung gian mã máy mã nguồn), giả lập cho loại mã Bộ cơng cụ sau trở thành hệ thống giả (P-system) Mặc dù hệ thống phát triển nhằm tạo trình biên dịch sinh mã máy hệ thống, kết đáng kể

(7)

IP Pascal trình biên dịch ngơn ngữ lập trình Pascal cho hệ điều hành Micropolis DOS sau chuyển sang CP/M để chạy dòng máy Z80

Đầu thập niên 1980, UCSD Pascal có phiên dành cho máy Apple II Apple III để có phiên tương ứng thay trình thông dịch BASIC kèm với loại máy thời gian trước

Trong năm 1980, Anders Hejlsberg viết trình biên dịch Blue Label Pascal dành cho dịng máy tính Nascom-2 Sau ơng chuyển sang làm việc cho hãng Borland viết lại hoàn tồn trình biên dịch để trở thành Turbo Pascal cho máy tính IBM-PC Trình biên dịch bán với giá có $49.95, rẻ nhiều so với giá Hejlsberg trước rao bán sản phẩm Blue Label Pascal

Trình biên dịch giá rẻ Borland gây ảnh hưởng lớn đến cộng đồng lập trình viên Pascal, họ tập trung hết vào lập trình cho máy IBM-PC năm cuối thập niên 1980 Rất nhiều người sử dụng sản phẩm thay cho BASIC

Super Pascal biến thể Pascal, bổ sung nhãn khơng có số, trả lại biểu thức hay mệnh đề tên kiểu liệu

Trong phiên 5.5, Borland bổ sung phần lập trình hướng đối tượng vào Turbo Pascal

Tuy nhiên sau Borland định cần phải có nhiều tính hướng đối tượng tinh vi phức tạp hơn, bắt đầu sản phẩm Delphi, sử dụng sơ đồ thiết kế

Object Pascal Apple đưa làm sở (Sơ đồ Apple chưa phải chuẩn.) Borland gọi Object Pascal phiên Delphi đổi tên thành Delphi phiên sau Các bổ sung so với phần mở rộng lập trình hướng đối tượng trước mơ hình đối tượng, hàm dựng hàm hủy ảo, thuộc tính mang tính tham chiếu Có vài trình biên dịch khác hỗ trợ tính Xem thêm: Delphi (ngơn ngữ lập trình)

Turbo Pascal sản phẩm tương tự, khái niệm đơn vị (unit) hay mơ-đun (module) hình thành nên ngơn ngữ lập trình cấu trúc Turbo Pascal lấy khái niệm từ chuẩn Extended Pascal hay từ người kế vị Modula-2 Mặc dù không cung cấp khái niệm mô-đun lồng hay kí hiệu rõ ràng hàm nhập hàm xuất

[sửa] Chuẩn hóa

Ngơn ngữ chuẩn hóa vào năm 1983 chuẩn ISO/IEC 7185, vài chuẩn quốc gia cụ thể đưa bao gồm chuẩn ANSI/IEEE770X3.97-1983 Mỹ Năm 1990 chuẩn Pascal mở rộng đưa với tên gọi ISO/IEC 10206

(8)

Wirth", bổ sung đáng kể "Các tham số mảng phù hợp" coi mức tiêu chuẩn, mức Pascal khơng có mảng phù hợp

Trên máy tính lớn mà Pascal xuất phát (mainframe minicomputer), tiêu chuẩn thường tuân theo Tuy PC ngược lại Trên máy tính IBM-PC, chuẩn Turbo Pascal Delphi của Borland có lượng người dùng nhiều Do vậy, biết liệu phiên riêng biệt tương ứng với ngôn ngữ Pascal ban đầu, hay ngôn ngữ riêng Borland quan trọng

[sửa] Các trình biên dịch phổ biến

Có vài trình biên dịch Pascal đưa cho sử dụng cơng khai:

 Trình biên dịch P4, sở cho nhiều trình biên dịch

Pascal-được-viết-bằng-Pascal sau đó, bao gồm UCSD p-System

 Free Pascal viết Pascal (sao cho biên dịch nó),

được phát triển với mục tiêu cung cấp trình biên dịch mạnh mẽ thuận tiện, có khả biên dịch ứng dụng cũ lẫn phát triển ứng dụng Được phân phối miễn phí giấy phép GNU Có khả trộn lẫn mã Turbo Pascal mã Delphi, hỗ trợ nhiều tảng lẫn nhiều hệ điều hành

 Turbo Pascal trình biên dịch Pascal thống trị cho PC vào thập niên 1980 đầu thập niên 1990 Nó phổ biến mở rộng mạnh mẽ đặc biệt thời gian biên dịch ngắn Trong thời điểm tại, phiên cũ Turbo Pascal (tới 5.5) tải xuống miễn phí trang web Borland (tuy nhiên cần phải đăng ký)

 Chrome hệ Object Pascal cho tảng NET tảng Mono,

được RemObjects Software cung cấp

 GNU Pascal Compiler (GPC) trình biên dịch Pascal Bộ biên dịch GNU

(GCC) Trình biên dịch viết C, thư viện chạy hầu hết viết Pascal Được phân phối miễn phí giấy phép GNU, chạy nhiều tảng hệ điều hành khác Nó cịn hỗ trợ chuẩn ngơn ngữ ANSI/ISO tương thích với ngơn ngữ Borland/Turbo Pascal Việc hỗ trợ cho Borland Delphi vài biến thể khác hạn chế

 Delphi sản phẩm RAD (Rapid Application Development-phát triển ứng dụng

tức thời) Borland Nó sử dụng Delphi, tiền thân từ Pascal, để tạo chương trình ứng dụng cho Windows Phiên hỗ trợ việc biên dịch cho Microsoft NET

 Kylix nhánh sản phẩm khác kế thừa từ Pascal Borland, tiền thân từ

Delphi, hỗ trợ hệ điều hành Linux thư viện đối tượng bổ sung Trình biên dịch mơi trường phát triển (IDE) cung cấp cho việc sử dụng phi lợi nhuận Trình biên dịch (không bao gồm thư viện hay IDE) cho trở thành phần mềm Mã nguồn mở thời gian tới

 Dr Pascal trình thơng dịch chạy Standard Pascal Bổ sung đáng kể

(9)

chạy MS-DOS, cửa sổ DOS Windows, dòng máy Macintosh cũ

 Virtual Pascal Vitaly Miryanov sáng tạo trình biên dịch dành cho

OS/2 tương thích với cú pháp Borland Pascal Sau fPrint phát triển thành sản phẩm thương mại, hỗ trợ thêm Win32, đến năm 2000 trở thành phần mềm miễn phí Ngày biên dịch cho Win32, OS/2 Linux, gần hồn tồn tương thích với Borland Pascal Delphi

 IP Pascal ban đầu ngôn ngữ Pascal dành cho Z80/CP/M, chuyển sang

và viết lại cho Intel 80386/PC IP Pascal có thư viện khả chuyển (portability library) Ví dụ, chương trình hiển thị văn viết Pascal chuẩn từ thập niên 1970 biên dịch lại để làm việc cửa sổ chí có việc tạo dựng đồ họa IP Pascal hỗ trợ chuẩn ISO 7185 nâng cấp ngơn ngữ cách logic Ví dụ, Pascal chuẩn hỗ trợ xâu ký tự "căn lề phải" sau cịn hỗ trợ xâu ký tự động Mảng tĩnh Pascal chuẩn nâng thành mảng động hồn tồn tương thích ngược với mảng tĩnh, v.v

 Pocket Studio tập nhỏ trình biên dịch Pascal RAD hướng tới

Palm/MC68xxx với số mở rộng hỗ trợ giao tiếp với API (Application Programming Interface-giao tiếp lập trình ứng dụng) hệ điều hành Palm OS

 Lazarus môi trường phát triển tức thời trực quan đa tảng Lazarus sử dụng

trình biên dịch Free Pascal

Bạn tìm thấy danh sách lớn Pascaland Trang web viết tiếng Pháp, danh sách gồm địa mạng (URL) tới trình biên dịch, khơng ảnh hưởng nhiều Bạn ghé thăm Pascal Central, trang web thơng tin hỗ trợ cho Pascal dành cho máy Mac, với nhiều sưu tập báo, cộng với liên kết tới nhiều trình biên dịch hướng dẫn khác

[sửa] Những phê phán trước đây

Mặc dù phổ biến (những năm 1980 1990 phổ biến thời điểm viết thực hiện), phiên Pascal trước bị phê phán rộng rãi khơng phù hợp cho việc sử dụng thực tế, việc dạy học Brian Kernighan, người truyền bá

(10)

Dựa kinh nghiệm với Pascal, Niklaus Wirth phát triển thêm hai ngôn ngữ lập trình nữa, Modula-2 Oberon Hai ngơn ngữ có nhiều cải tiến khơng thể theo kịp thành công thương mại Pascal

[sửa] Các câu lệnh

[sửa] SYSTEM

 write(): in hình liền sau kí tự cuối.  writeln(): in xuống hàng.

 read(): đọc biến.

 readln: dừng chương trình

[sửa] Uses CRT



o clrscr : xố tồn hình o textcolor() : in chữ màu

o textbackground() : tô màu cho hình o sound() : tạo âm

o delay() : làm trễ o nosound : tắt âm

o windows(x1,y1,x2,y2) : thay đổi cửa sổ hình o highvideo : tăng độ sáng hình

o lowvideo : giảm độ sáng hình

o normvideo : hình trở lại chế độ sáng bình thường o gotoxy(x,y) : đưa trỏ đến vị trí x,y hình o deline : xố dịng chứa trỏ

o clreol : xố ký tự từ vị trí trỏ đến cuối mà khơng di chuyển vị trí

con trỏ

o insline : chèn thêm dịng vào vị trí trỏ hành o exit : thoát khỏi chương trình

o textmode(co40) : tạo kiểu chữ lớn o randomize : khởi tạo chế độ ngẫu nhiên

o move(var 1,var 2,n) : chép nhớ khối n byte từ biến Var

sang biến Var

o halt : Ngưng thực chương trình trở hệ điều hành o Abs(n) : Giá trị tuyệt đối

o Arctan(x) : cho kết hàm Arctan(x) o Cos(x) : cho kết cos(x)

o Exp(x) : hàm số mũ số tự nhiên ex

(11)

o ln(x) : Hàm logarit số tự nhiên

o sin(x) : cho kết sin(x), với x tính Radian o Sqr(x) : bình phương số x

o Sqrt(x) : cho kết bậc hai x

o pred(x) : cho kết số nguyên đứng trước số nguyên x o Suuc(x) : cho kết số nguyên đứng sau số nguyên x o odd(x) : cho kết true x số lẻ, ngược lại false o chr(x) : trả kí tự có vị trí x bảng mã ASCII o Ord(x) : trả số thứ tự kí tự x

o round(n) : Làm tròn số thực n

o Random(n) : cho số ngẫu nhiên phạm vi n o upcase(n) : đổi kí tự chữ thường sang chữ hoa o assign(f,) : tạo file.

o rewrite(f) : khởi tạo

o append(f) : chèn thêm liệu cho file o close(f) : tắt file

o erase(f) : xóa

o rename() : đổi tên cho file

o length(s) : cho kết chiều dài xâu o copy(s,a,b) : copy xâu

o insert(,s,a) : chèn thêm cho xâu. o delete(s,a,b) : xoá xâu

[sửa] Unit GRAPH



o initgraph(a,b,) : khởi tạo chế độ đồ hoạ. o closegraph; : tắt chế độ đồ hoạ

o setcolor(x) : chọn màu

o outtext() : in hình góc bên trái

o outtextxy(x,y,); : in hình toạ độ hình. o rectangle(x1,y1,x2,y2): vẽ hình chữ nhật

o line(x1,y1,x2,y2) : vẽ đoạn thẳng

o moveto(x,y) : lấy điểm xuất phát để vẽ đoạn thẳng o lineto(x,y) : lấy điểm kết thúc để vẽ doạn thảng o circle(x,y,n) : vẽ đường tròn

o ellipse(x,y,o1,o2,a,b): vẽ hình elip o floodfill(a,b,n) : tơ màu cho hình o getfillpattern(x) : tạo biến để tơ o setfillpattern(x,a) : chọn màu để tơ o cleardevice; : xố tồn hình o settextstyle(n,a,b) : chọn kiểu chữ o bar(a,b,c,d) : vẽ

(12)

o setbkcolor(n) : tô màu o putpixel(x,y,n) : vẽ điểm

o setfillstyle(a,b) : tạo cho hình o setlinestyle(a,b,c) : chọn kiểu đoạn thẳng o getmem(p,1) : chuyển biến để nhớ liệu

o getimage(x1,y1,x2,y2,p): nhớ hình vẽ vùng cửa sổ xác định o putimage(x,y,p,n) : in hình hình vừa nhớ

[sửa] Unit DOS

 getdate(y,m,d,t): lấy liệu ngày nhớ  gettime(h,m,s,hund): lấy liệu nhớ  findnext(x): tìm kiếm tiếp

 Findfirst($20,dirinfo): tìm kiếm

[sửa] Đọc thêm

 Kathleen Jensen and Niklaus Wirth: PASCAL - User Manual and Report.

Springer-Verlag, 1974, 1985, 1991, ISBN 0-387-97649-3 and ISBN 0-540-97649-3[1]

 Niklaus Wirth: The Programming Language Pascal. Acta Informatica, 1, (Jun

1971) 35-63

 N Wirth, M Broy, ed, and E Denert, ed: Pascal and its Successors in Software

Pioneers: Contributions to Software Engineering. Springer-Verlag, 2002, ISBN 3-540-43081-4

also in N Wirth, and A I Wasserman, ed: Programming Language Design. IEEE Computer Society Press, 1980

 N Wirth: Recollections about the Development of Pascal. ACM SIGPLAN

Notices, Volume 28, No 3, March 1993

 ISO/IEC 10206: Extended Pascal.[2]

 ISO/IEC 7185: Programming Languages - PASCAL.[3]

 Brian W Kernighan, Why Pascal is Not My Favorite Programming Language  Bill Catambay, The Pascal Programming Language

 How To Code: Pascal

[sửa] Xem thêm

Wikibooks có thơng tin Anh ngữ về:

Programming:Pascal

 ALGOL

(13)

 Ada: hậu duệ Pascal Bộ Quốc phòng Mỹ, thiết kế để trở nên đa mạnh

mẽ

 Delphi

 Modula: hậu duệ Pascal Wirth

 Oberon: hậu duệ Module hướng đối tượng Wirth  Object Pascal

 Pascal C: so sánh Pascal C  IP Pascal

[sửa] Liên kết ngoài

 The Holy Land Of Pascal/Objects Pascal ==> Pascal — Trang web Pascal lớn

nhất & hay Việt Nam

 Pascal Central — trang web Pascal tiếng (của nước ngoài)

 Real Programmers Don't Use Pascal — câu chuyện vui "lập trình

viên đích thực" khơng sử dụng Pascal

 Standard Pascal — Tài nguyên lịch sử Pascal chuẩn

 Pascal and its Successors — Một báo Niklaus Wirth phát triển

Pascal, Modula-2 Oberon

 Free Pascal Complier — Trang web trình biên dịch Free Pascal Các ngơn ngữ lập trình chính (xem thêm) (bổ sung)

XML

Dùng để giảng dạy:Alice | C | C++ |

Eiffel | DHTML | Fortran | Haskell | Java

Scheme | Visual Basic | Visual FoxPro |

Có giá trị lịch sử:ABC | ALGOL | APL |

BASIC | Clipper | COBOL | Hope |

MUMPS | Pascal | PL/I | PowerBuilder |

Simula

Lấy từ “http://vi.wikipedia.org/wiki/Pascal_(ng%C3%B4n_ng%E1%BB%AF_l %E1%BA%ADp_tr%C3%ACnh)”