CÁCH SỬ DỤNG PASCAL

      36
Giới thiệu cùng hướng dẫn học Pascal

Pascal là tên gọi của một trong các ngôn ngữ xây dựng V.I.P phổ cập. Ngôn ngữ xây dựng Pascal được giáo sư Niklaus Wirth sinh sống trường Ðại học Kỹ thuật Zurich (Thụy sĩ) kiến tạo cùng công bố vào khoảng thời gian 1970. Niklaus Wirth đặt tên mang đến ngữ điệu này là Pascal nhằm tưởng niệm mang lại nhà Toán thù học tập với Triết học tập Pháp nghỉ ngơi thay kỷ 17 là Blaise Pascal, fan đang phát minh sáng tạo ra một máy vi tính cơ khí đơn giản thứ nhất của nhỏ fan.

Ngôn ngữ Pascal được dùng hiện giờ có khá nhiều điểm biệt lập với chuẩn chỉnh Pascal nguyên tdiệt của Giáo sư Wirth. Tùy theo quốc gia hoặc cửa hàng đã cách tân và phát triển phát hành các công tác biên dịch ngôn ngữ Pascal như:

·ISO PASCAL (International Standards Organization) của Châu Âu

·ANSI PASCAL (Atieudung24g.netrican National Standards Institute) của Mỹ

·TURBO PASCAL của hãng sản xuất BORLAND (Mỹ)

·IBM PASCAL của hãng sản xuất Microsoft (Mỹ)

·v.v...

Ðến nay, ngôn ngữ Pascal vẫn phát triển cho phiên phiên bản Turbo Pascal Version 7. Các diễn giải và ví dụ trong giáo trình này chủ yếu sử dụng lịch trình Turbo Pascal 5.5 - 7.0, hiện tại đang rất được thực hiện rộng thoải mái sinh hoạt cả nước.

II. CÁC PHẦN TỬ CƠ BẢN CỦA NGÔN NGỮ PASCAL

1. Sở ký trường đoản cú

- Bộ 26 chữ Latin:

Chữ in: A, B, C, ..., X, Y, Z

Chữ thường:a, b, c, ..., x, y, z

- Sở chữ số thập phân: 0, 1, 2, 3, ..., 8, 9

- Ký từ gạch tieudung24g.netn nối dưới:_

- Các ký kết hiệu toán thù học:+, -, *, /, =, , (, ), <, }

2. Từkhóa

Là những từ bỏ riêng của Pascal, có ngữ nghĩa đã được xác định, không được sử dụng nó vào những Việc khác hoặc đánh tên bắt đầu trùng cùng với những từ bỏ khóa.

- Từ khóa chung:

PROGRAM, BEGIN, END, PROCEDURE, FUNCTION

- Từ khóa nhằm khai báo:

CONST, VAR, TYPE, ARRAY, STRING, RECORD, SET, FILE, LABEL

- Từ khóa của lệnh lựa chọn:

IF ... THEN ... ELSE,CASE ... OF

- Từ khóa của lệnh lặp:

FOR... TO... DO,FOR... DOWNTO... DO,WHILE... DO,REPEAT... UNTIL

- Từ khóa điều khiển:

WITH,GOTO,EXIT, HALT

- Từ khóa toán tử:

AND, OR, NOT, IN, DIV, MOD

3. Tên chuẩn

Tên chuẩn chỉnh là tên đã được quan niệm sẵn vào Pascal, dẫu vậy fan ta có thể định nghĩa lại nếu muốn. Trong Pascal ta bao gồm những tên chukhuất sau đây:

Boolean, Char, Integer, Word, Byte, Real, Text

False, True, MaxInt

Abs, Arcrã, Chr, Cos, Sin, Eof, Eoln

Exp, Ln, Odd, Ord

Round, Trunc, Sqr, Pred, Succ

Dispose, New, Get, Put, Read, Readln,

Write, Writeln

Rephối, Rewrite

4. Danh hiệu từ bỏ đặt

Trong Pascal để tại vị tên cho các trở nên, hằng, mẫu mã, chương trình nhỏ ta cần sử dụng các danh hiệu (identifier). Danh hiệu của Pascal được bắt đầu bằng một vần âm, sau đó hoàn toàn có thể là những vần âm, chữ số hay là lốt nối, không được có tầm khoảng White với độ lâu năm tối đa được cho phép là 127.

Ví dụ 6.1:Sau đây là các danh hiệu: x;S1;Delta;PT_bac_2

Pascal không riêng biệt chữ thường xuyên với chữ hoa vào một thương hiệu.

Bạn đang xem: Cách sử dụng pascal

ví dụ như 6.2:aa cùng AA là một;XyZ_aBcvàxyZ_AbC là 1 trong

lúc viết công tác ta nên được sắp xếp những thương hiệu sao để cho chúng thể hiện các chân thành và ý nghĩa của đối tượng người dùng mà chúng thể hiện. Ðiều này góp chúng ta viết lịch trình thuận lợi cùng bạn không giống cũng dễ hiểu câu chữ chương trình.

III. CẤU TRÚC MỘT CHƯƠNG TRÌNH PASCAL

*

Hình 6.1:Sơ vật cấu tạo công tác Pascal

ví dụ như 6.3:

PROGRAM Hello; Dòng tiêu đề

USESCrt; Lời call sử dụng những đơn vị chức năng lịch trình

VARNatieudung24g.net : string; Knhị báo vươn lên là

PROCEDUREInput; cũng có thể có khá nhiều Procedure cùng Function

Begin

ClrScr; Lệnh xóa màn hình

Write(" ‘Hello ! What is your natieudung24g.net ?... ‘");Readln(Natieudung24g.net);

End;

BEGIN Thân công tác bao gồm

Input;

Writeln(" ‘Welcotieudung24g.net to you,‘, Natieudung24g.net") ;

Writeln(" ‘Today, we study PASCAL PROGRAMMING ... ‘");

Readln;

End.

Một chương trình Pascal bao gồm những phần:

* Phần tiêu đề:

Phần này ban đầu bởi từ bỏ khóa Program rồi kế tiếp là tên của lịch trình với chấm dứt bởi lốt chấm phẩy (;)

Tên lịch trình buộc phải được đặt theo đúng qui bí quyết của danh hiệu tự đặt. Phần title có hay không cũng rất được.

* Phần khai báo dữ liệu:

Trước lúc áp dụng đổi thay nào nên knhị báo thay đổi kia, tức thị khẳng định rõ coi trở nên đó ở trong mẫu mã dữ liệu như thế nào. Một chương trình Pascal rất có thể bao gồm một số hoặc tất cả những khai báo dữ liệu sau:

CONST: khai báo hằng

...

TYPE: định nghĩavẻ bên ngoài dữliệu mới

...

VAR: knhì báo những vươn lên là

...

* Phần knhị báo lịch trình con:

Phần này biểu đạt một tổ lệnh được đặt tên phổ biến là 1 trong những chương trình con để khi thân công tác chính hotline mang đến thì cả đội lệnh đó được thực hiện.

Phần này có thể tất cả hoặc ko tùy thuộc vào yêu cầu.

*Phần thân chương thơm trình:

Phần thân chương trình là phần quan trọng đặc biệt tốt nhất cùng bắt buộc phải bao gồm, phần này luôn nằm giữa 2 từ khóa là BEGIN cùng END. Tại giữa là lệnh nhưng những chương trình chính bắt buộc triển khai. Sau từ khóa END là dấu chấm (.) nhằm báo hoàn thành công tác.

*Dấu chấm phẩy (;):

Dấu ;dùng để ngăn cách những câu lệnh của Pascal với không thể không có được.

Xem thêm: Cá Tầm Nấu Món Gì Ngon - 3 Món Ăn Chế Biến Từ Cá Tầm Thượng Hạng

*Lời chú thích:

Lời ghi chú dùng làm chú giải cho tất cả những người thực hiện lịch trình lưu giữ nhằm hội đàm thông báo thân bạn với tín đồ, laptop sẽ không lưu ý mang đến lời chú thích này. Lời chú thích nằm trong lòng cam kết hiệu: hoặc (**)

IV. CÁC KIỂU DỮ LIỆU CƠ SỞ: INTEGER, REAL, BOOLEAN, CHAR

1. Khái niệm

Dữ liệu (data) là tất cả hầu hết gì nhưng mà máy tính xách tay buộc phải giải pháp xử lý.

Theo Niklaus Wirth:

CHƯƠNG TRÌNH = THUẬT TOÁN + CẤU TRÚC DỮ LIỆU

Một hình dạng dữ liệu (data type) là một trong những phương pháp về hình dáng, kết cấu với quý hiếm của dữ liệu cũng giống như cách trình diễn với biện pháp giải pháp xử lý dữ liệu.

Trong Pascal những đẳng cấp dữ liệu có những loại sau:

- Kiểu dễ dàng và đơn giản (Simple type): bao hàm hình dáng số ngulặng (Integer), hình dạng số thực (Real), hình trạng ngắn gọn xúc tích (Boolean), giao diện ký kết từ (Char).

- Kiểu gồm cấu tạo (Structure type): bao hàm mảng (Array), chuỗi (String), bạn dạng ghi (Record), tập vừa lòng (Set), tập tin (File).

- Kiểu chỉ điểm (pointer):

Trong cmùi hương này, bọn họ chỉ xét những hình trạng dữ liệu đơn giản và dễ dàng.

2. Kiểu số ngulặng (Integer type)

a. Kiểu số ngulặng ở trong Z đựng vào Turbo Pascal

Ðược tư tưởng cùng với các tự khóa sau:

TỪ KHÓA

SỐ BYTE

PHẠM VI

BYTE

1

0 .. 255

SHORTINT

1

- 128 .. 127

INTEGER

2

- 32768 .. + 32767

WORD

2

0 .. 65535

LONGINT

4

- 2147483648 .. 2147483647

b. Các phnghiền toán số học đối với số nguyên

KÝ HIỆU

Ý NGHĨA

+

Cộng

-

Trừ

*

Nhân

/

Chia mang đến tác dụng là số thực

DIV

Chia mang phần nguyên ổn

MOD

Chia lấy phần dư

SUCC (n)

n + 1

PRED (n)

n - 1

ODD (n)

TRUE ví như n lẻ

với FALSE ví như n chẵn

3. Kiểu số thực (Real type)

Ở Turbo Pascal, loại số thực thuộc tập hợp R cất vào 6 bytes, được khái niệm với từ khóa REAL:R =(<2.9 x 10-39 , 1.7 x 1038 >

Hay viết theo hình thức số khoa học: R = ( <2.9E-39, 1.7E38>

Số thực hoàn toàn có thể viết theo kiểu tất cả vết chnóng thập phân thông thường hoặc viết theo phong cách thập phân gồm phần nón và phần định trị.

Các phnghiền toán thù số học tập cơ phiên bản +, -, * , /tất nhiên được sử dụng trong vẻ bên ngoài real.

Bảng bên dưới đấy là các hàm số học đến loại số thực:

KÝ HIỆU

Ý NGHĨA

ABS (x)

|x| : mang quý giá tuyệt đối hoàn hảo của số x

SQR (x)

x2 : lấy bình phương thơm trị số x

SQRT(x)

*
: láúy càn báûc 2 cuía trë säú x

SIN(x)

sin (x) : đem sin của x

COS (x)

cos (x) : đem cos của x

ARCTAN (x)

arctang (x)

LN (x)

ln x : mang logarit nepe của trị x (e ( 2.71828)

EXP. (x)

ex

TRUNC (x)

rước phần nguyên ổn lớn số 1 ko quá vượt trị số x

ROUND (x)

làm cho tròn quý hiếm của x, mang số ngulặng sát x tuyệt nhất

4. Kiểu ngắn gọn xúc tích (Boolean)

Một tài liệu thuộc hình dáng BOOLEAN là 1 đại lượng được chứa trong 1 byte làm việc Turbo Pascal và chỉ hoàn toàn có thể nhận ra 1 trong những nhì gía trị logic là TRUE (đúng) và FALSE (sai).

Qui ước:TRUE > FALSE

Các phnghiền tân oán bên trên kiểu dáng Boolean:

A

B

NOT A

A AND B

A OR B

A XOR B

TRUE

TRUE

FALSE

TRUE

TRUE

FALSE

TRUE

FALSE

FALSE

FALSE

TRUE

TRUE

FALSE

TRUE

TRUE

FALSE

TRUE

TRUE

FALSE

FALSE

TRUE

FALSE

FALSE

FALSE

Nhận xét:

·Phép AND (và) chỉ mang đến kết quả là TRUE Khi cả hai tân oán hạng là TRUE

·Phép OR (hoặc) chỉ mang đến tác dụng là FALSE lúc cả hai toán hạng là FALSE

·Phxay XOR (hoặc triệt tiêu) luôn cho tác dụng là TRUE khi cả 2 toán thù hạng là khác biệt và ngược lại.

Các phép tân oán quan hệ nam nữ cho công dụng phong cách Boolean:

KÝ HIỆU

Ý NGHĨA

không giống nhau

=

đều bằng nhau

>

to hơn

nhỏ tuổi rộng

> =

lớn hơn hoặc bằng

bé dại rộng hoặc bởi

5. Kiểu cam kết tự (Char type)

Tất cả các tài liệu viết sinh hoạt dạng văn bản ký kết trường đoản cú được knhì báo vị tự khóa CHAR.

Một ký kết từ bỏ được viết trong nhị vệt nháy đối chọi ( ). Ðể tiện thương lượng biết tin cần phải bố trí, viết số những ký kết tự, mỗi phương pháp sắp xếp điều đó hotline là bảng mã. Bảng mã thịnh hành hiện giờ là bảng mã ASCII (xem lại cmùi hương 3).

Ðể tiến hành những phép toán số học tập với so sánh, ta phụ thuộc vào cực hiếm số sản phẩm công nghệ từ bỏ mã ASCII của từng cam kết trường đoản cú, chẳng hạn: "A"

Trong Turbo Pascal từng ký kết từ được cất trong một byte.

Các hàm chuẩn chỉnh tương quan đến mẫu mã ký kết tự:

KÝ HIỆU

Ý NGHĨA

ORD(x)

Cho số vật dụng tự của ký kết tự x vào bảng mã

CHR(n) xuất xắc #n

Cho ký từ tất cả số thứ tự là n

PRED(x)

Cho ký từ đứng trước x

SUCC(x)

Cho ký từ bỏ thua cuộc x

V. CÁC KHAI BÁO HẰNG, BIẾN, KIỂU, BIỂU THỨC, ...

1. Hằng (constant)

a. Ðịnh nghĩa

Hằng là 1 trong những đại lượng có mức giá trị ko thay đổi trong quá trình chạy chương trình. Ta cần sử dụng thương hiệu hằng để chương trình được rõ ràng và dễ sửa đổi.

b. Cách knhì báo

CONST

= ;

ví dụ như 6.4:CONST

Siso = 100;

X = ‘xxx ‘;

2. Biến (variable)

a. Ðịnh nghĩa

Biến là 1 trong những cấu trúc ghi nhớ có tên (đó là tên gọi biến đổi tuyệt danh hiệu của biến).

Biến ghi lưu giữ một dữ liệu như thế nào đó gọi là giá trị (value) của thay đổi. Giá trị của biến có thể được chuyển đổi vào thời hạn thực hiện phát triển thành.

Sự truy tìm xuất của đổi thay tức là gọi quý giá tuyệt chuyển đổi quý hiếm của đổi mới được tiến hành thông qua tên biến.

lấy ví dụ 6.5: Readln (x) ;

Writeln (x) ;

x := 9 ;

Biến là 1 trong kết cấu ghi ghi nhớ tài liệu vì chưng vậy nó đề nghị tuân thủ theo đúng chính sách của hình dạng dữ liệu : một biến bắt buộc nằm trong một dạng hình dữ liệu nhất thiết.

b. Cách knhì báo

VAR

: ;

lấy ví dụ 6.6:VAR

a : Real ;

b, c : Integer ;

TEN : String <20>

X : Boolean ;

Chon : Char ;

Cần knhị báo các phát triển thành trước lúc áp dụng chúng vào chương trình. Khai báo một đổi mới là khai báo sự sống thọ của thay đổi đó với cho biết nó thuộc thứ hạng gì.

3. Kiểu (Type)

a. Ðịnh nghĩa

Ngoài những phong cách đang định sẵn, Pascal còn cho phép ta định nghĩa các đẳng cấp dữ liệu khác trường đoản cú các giao diện căn bản theo qui tắc xây đắp của Pascal.

b. Cách khai báo

TYPE

= ;

lấy một ví dụ 6.7:

TYPE

SoNguyen = Integer ;

Diem = Real;

Tuoi = 1 .. 100 ;

Màu sắc = (Red, Blue, Green) ;

Thu = (Sun, Mon, Tue, Wed, Thu, Fri, Sat) ;

cùng Lúc đang khai báo kiểu dáng gì thì ta gồm quyền áp dụng để knhì báo đổi thay nlỗi nghỉ ngơi ví dụ sau:

lấy ví dụ 6.8:VAR

i, j : SoNguyen ;

Dtb : Diem ;

T : tuoi ;

Mau : màu sắc ;

Ngay_hoc : Thu;

4. Biểu thức (Expression)

a. Ðịnh nghĩa

Một biểu thức là 1 trong những cách làm tính toán thù bao gồm những phxay toán thù, hằng, trở thành, hàm cùng những lốt ngoặc.

Ví dụ 6.9: 5 + A * SQRT(B) / SIN(X)

(A AND B) OR C

b. Thđọng trường đoản cú ưu tiên

lúc tính cực hiếm của một biểu thức, ngôn ngữ Pascal qui ước thứ trường đoản cú ưu tiên của những phép toán từ bỏ cao đến phải chăng nlỗi sau:

Mức ưu tiên:Các phnghiền toán:

1. Biểu thức trong ngoặc solo ()

2.Phép điện thoại tư vấn hàm

3. Not,-

4. *, /, DIV, MOD, AND

5. +, -, OR, XOR

6. =, , =, , IN

lấy ví dụ như 6.10:(4+5)/3 + 6 - (sin((/2)+3)*2= (9)/3 + 6 - (1+3)*2 = 3 + 6 - 8 = 1

c. Qui dự trù sản phẩm trường đoản cú ưu tiên

Lúc tính một biểu thức tất cả 3 qui tắc về sản phẩm trường đoản cú ưu tiên nhỏng sau:

Qui tắc 1 : Các phnghiền toán như thế nào có ưu tiên cao hơn sẽ tiến hành tính trước.

Qui tắc 2 : Trong các phxay tân oán tất cả thuộc lắp thêm từ bỏ ưu tiên thì sự tính toán sẽ được tiến hành từ bỏ trái quý phái nên.

Qui tắc 3 :Phần trong ngoặc trường đoản cú trong ra bên ngoài được xem toán để trở thành một giá trị đối chọi.

d. Kiểu của biểu thức

Là đẳng cấp của tác dụng sau khoản thời gian tính biểu thức.

lấy ví dụ 6.11:Biểu thức sau được Gọi là biểu thức Boolean:

not (("a">"c") and ("c">"C")) or ("B"="b") có giá trị TRUE

VI. CÁC THỦ TỤC XUẤT/NHẬP

1. Câu lệnh (statetieudung24g.netnt)

a. Trong một công tác Pascal, sau phần biểu đạt tài liệu là phần mô tả những câu lệnh. Các câu lệnh gồm trọng trách khẳng định những công việc nhưng mà máy tính đề nghị triển khai nhằm giải pháp xử lý những dữ liệu đã có mô tả và knhị báo.

b. Câu lệnh được tạo thành câu lệnh đơn giản với câu lệnh gồm kết cấu.

(xem phần bài bác đọc thêm)

- Câu lệnh đơn giản

+ Vào dữ liệu :Read, Readln

+ Ra dữ liệu:Write, Writeln

+ Lệnh gán ::=

+ Lời Call công tác con(Hotline thẳng tên của lịch trình con)

+ Xử lý tập tin :RESET, REWRITE, ASSIGN ...

- Câu lệnh gồm cấu trúc

+ Lệnh ghép :BEGIN .. END

+ Lệnh chọn:IF .. THEN .. ELSE

CASE .. OF .

+ Lệnh lặp:FOR .. TO .. DO

REPEAT .. UNTIL

WHILE .. DO

c. Các câu lệnh đề xuất được ngăn cách cùng nhau bởi vết chấm phẩy ( ; ) và Các câu lệnh có thể viết trên một dòng tuyệt những dòng.

2. Cấu trúc tuần từ bỏ

a. Lệnh gán (Assigntieudung24g.netnt statetieudung24g.netnt)

Một trong số lệnh dễ dàng và đơn giản cùng cơ bạn dạng nhất của Pascal là lệnh gán. Mục đích của lệnh này là gán cho 1 biến vẫn khai báo một quý giá nào đó thuộc thứ hạng với biến chuyển.

* Cách viết:

:=;

lấy một ví dụ 6.12:lúc sẽ knhì báo

VAR

c : Char ;

i,j : Integer ;

x, y : Real ;

p, q : Boolean ;

thì ta rất có thể gồm những phép gán sau :

c := ‘A’ ;

c := Chr(90) ;

i := (35+7)*2 gian lận 4 ;

i := i div 7 ;

x := 0.5 ;

x := i + 1 ;

q := i > 2*j +1 ;

q := not p ;

* Ý nghĩa:

Biến với những phát biểu gán là các khái niệm quan trọng đặc biệt của một họ những ngôn ngữ lập trình cơ mà Pascal là 1 đại diện tiêu biểu. Chúng phản ảnh phương pháp hoạt động của máy tính hiện giờ, kia là:

- Lưu trữ những quý hiếm khác biệt vào một trong những ô nhớ trên đầy đủ thời gian không giống nhau.

- Một quá trình tính toán thù rất có thể coi nlỗi là một quá trình có tác dụng đổi khác quý giá của một (hay là một số) ô lưu giữ nào kia, cho đến lúc có được quý hiếm nên tìm kiếm.

b. Lệnh ghnghiền (Compound statetieudung24g.netnt)

Một team câu lệnh đối chọi được đặt thân 2 chữ BEGIN cùng END sẽ tạo nên thành một câu lệnh ghxay.

Trong Pascal ta hoàn toàn có thể đặt các lệnh ghnghiền con trong những lệnh ghép lớn hơn bao ngoại trừ của chính nó với có thể hiểu tựa như như kết cấu ngoặc đơn ( ) trong những biểu thức toán học.

* Sơ đồ:

*

Hình 6.2: Sơ đồ cấu tạo BEGIN .. END;

Tại hình minc họa bên trên ta dễ thấy các đội lệnh thành từng khối hận (block). Một khối lệnh bắt đầu bởi BEGIN và hoàn thành sinh hoạt END; . Trong một khối lệnh cũng rất có thể gồm những kân hận lệnh con phía trong nó. Một khối hận lịch trình hay được dùng để làm team từ 2 lệnh trlàm việc lên để sinh sản thành một của những lệnh có cấu tạo, ta hoàn toàn có thể gặp gỡ có mang này trong không ít ví dụ ngơi nghỉ những phần sau.

3. Cấu trúc rẽ nhánh

a. Lệnh IF .. THEN .. và Lệnh IF .. THEN .. ELSE..

*Lưu thiết bị diễn tả các lệnh và ý nghĩa giải pháp viết:

*
*

Hình 6. 3: Lệnh IF THEN ;

*
*

Hình 6. 4:Lệnh IF .. THEN .. ELSE ..;

Chụ ý:

- Ðiều kiện là 1 biểu thức Boolean.

- Nếu sau THEN hoặc ELSE có khá nhiều hơn một lệnh thì tanên góilại vào BEGIN .. END;

- Toàn bộ lệnh IF .. THEN .. ELSE xem như 1 lệnh đối chọi.

lấy một ví dụ 6.13:Tính cnạp năng lượng bậc 2 của một số trong những

PROGRAM Tinh_can_bac_hai ;

VAR

a : Real ;

BEGIN

Write ( Nhập số a =) ;

Readln(a) ;

IF a

Write (" a : 10 : 2 , là số âm cần không rước căn uống được !!! ")

ELSE

Writeln (" Căn số bậc 2 của , a : 2 : 2 , la , SQRT(a) :10 : 3 ");

Writeln (" Nhấn ENTER để thoát ... ") ;

Readln; Dừng screen giúp thấy kết quả

END.

Ghi chú:

Trong công tác bên trên, a ta thấy gồm dạng a :m :n với ý nghĩa sâu sắc m là số định khoảng tầm cơ mà phần ngulặng của a đang chỉ chiếm địa điểm với n là khoảng chừng mang lại số trị phần thập phân của a.

b. Lệnh CASE .. OF

* Lưu đồ gia dụng biểu diễn:

*

Hình 6.5:Lưu vật lệnh CASE .. OF

* Cách viết, ý nghĩa:

Cách viếtÝ nghĩa

CASE OFXét giá trị của biểu thức chọn

GT1 : Công câu hỏi 1 ;Nếu có giá trị 1 (GT1) thì thực hiện Công bài toán 1

..........................................................

GTi: Công Việc i ;Nếu có mức giá trị i(GT i) thì thi hành Công việc i

...........................................................

ELSECông câu hỏi 0 ;Nếu không tồn tại quý hiếm nào thỏa thì thực hiệnCông vấn đề 0

END;

Ghi chú:

- Lệnh CASE .. OF có thể không có ELSE

- Biểu thức lựa chọn là loại tránh rộc nhỏng Integer, Char, ko lựa chọn mẫu mã Real

- Nếu muốn ứng với tương đối nhiều quý giá khác biệt của biểu thức chọn vẫn thực hiện một lệnh thì quý hiếm kia rất có thể viết trên và một hàng giải pháp nhau bởi vết phẩy (,) : Giá trị k1, k2, ..., kp: Lệnh k ;

lấy ví dụ như 6.14:PROGRAM Chon_mau ;

VARcolor : char ;

BEGIN

write (" Chọn màu theo một trong 3 cam kết trường đoản cú đầu là R / W / B ") ;

readln ( color) ;

CASEcolorOF

"R" ,"r":write (" RED = màu đỏ ") ;

"W", "w" :write (" WHITE = white color ") ;

"B" , "b":write (" BLUE = màu xanh dương ") ;

END ;

Readln;

END.

4. Cấu trúc lặp

a. Lệnh FOR

Cấu trúc FOR được cho phép lặp lại những lần một hàng lệnh. Số lần tái diễn hàng lệnh sẽ biết trước. Phát biểu FOR gồm 2 dạng:

FOR .. TO .. DOđếm lên

FOR .. DOWNTO ..DOđếm xuống

* Cú pháp tổng quát là:

FOR := TO/DOWNTO DO ;

* Lưu đồ:

*
*

Hình 6. 6:Lưu trang bị phát biểu FOR .. TO .. DO

Chú ý:Trị đầu, trị cuối là các biến hoặc hằng và đổi thay đếm đề nghị là thứ hạng tách rạc.

Ví dụ 6.15:Cmùi hương trình in một dãy số từ0 mang đến 9

Program Day_So ;

VAR

i : Integer ;

BEGIN

FORi := 0 TO 9DOWrite (i) ;

Readln ;

END.

b. Lệnh WHILE .. DO

* Lưu trang bị của lệnh

*

Hình 6. 7:Lưu đồ cấu trúc WHILE .. DO

* Ý nghĩa lưu giữ đồ:

Trong Lúc mà lại điều kiện còn đúng thì cứ đọng triển khai Công câu hỏi, rồi con quay trngơi nghỉ về kiểm soát điều kiện lại. Vòng lặp được liên tiếp, cho đến khi điều kiện đưa ra không hề đúng nữa thì tiếp cận thực hiện lệnh tiếp theo

* Cú pháp

WHILE DO

*

Hình 6.8:Sơ đồ gia dụng cú pháplệnh WHILE .. DO

Ghi chú:

·Ðiều khiếu nại trong cấu trúc lặp WHILE .. DO là 1 trong biểu thức lô ghích vẻ bên ngoài Boolean chỉ bao gồm 2 quý hiếm là Ðúng (True) hoặc Sai (False)

·Nếu ĐK Ðúng thì lịch trình đã chạy trong cấu trúc WHILE .. DO.

·Sau những lần lặp, chương trình trở lại soát sổ ĐK. Tùy theo biểu thức lô ghích của điều kiện là Ðúng hay Sai thì lịch trình đang triển khai Công việc khớp ứng.

·Nếu Sai thì chuyển xuống dưới cấu tạo WHILE .. DO

Ví dụ 6.16:Cmùi hương trình tính mức độ vừa phải n số:x1 + x2 + x3 + ... + xn

Program Trung_binh_Day_So ;

VAR

n, count : Integer ;

x, sum, average : real ;

BEGIN

count := 1 ;

sum:= 0 ;

Write (" Nhập n = ") ;

readln (n) ;

WHILEcount

BEGIN

Write (" Nhập cực hiếm thứ" , count," của x = " ) ;

readln (x) ;

sum:= sum + x ;

count := count + 1 ;

END ;

average:=sum/n ;

Writeln (" Trung bình là =", average : 10 : 3 ) ;

Writeln (" Nhấn Enter để né ..." ) ;

Readln ;

END.

c. Lệnh REPEAT .. UNTIL

Câu lệnh REPEAT .. UNTIL cần sử dụng trong số trường hợp khi biến đổi điều khiển và tinh chỉnh không tồn tại dạng hình tránh rạc và quan trọng trong số ngôi trường vừa lòng mốc giới hạn lặp ngần ngừ trước.

*

Hình 6.9:Lưu đồ gia dụng kết cấu của REPEAT .. UNTIL

* Ý nghĩa câu lệnh:

Nếu điều kiện xúc tích và ngắn gọn là Sai (False)thì tái diễn lệnh cho tới khi điều kiện Ðúngthì mới thoát thoát khỏi cấu tạo REPEAT .. UNTIL.

Nếu có không ít câu lệnh thì mỗi lệnh phân cách nhau bằng dấu chấm phẩy (;)Công bài toán của REPEAT và UNTIL không độc nhất vô nhị thiết phải sử dụng lệnh ghép nhằm nhóm từ 2 lệnh solo trsinh sống lên thành quá trình.

*

Hình 6.10:Sơ trang bị cú pháp REPEAT .. UNTIL

Ví dụ 6.17:Với bài xích toán mức độ vừa phải cùng một hàng số ngơi nghỉ ví dụ trước hoàn toàn có thể viết theo cấu trúc REPEAT .. UNTIL nhưsau:

Program Trung_binh_Day_So ;

VARn, count : Integer ;

x, sum : real ;

BEGIN

count := 1 ;

sum:= 0 ;

Write := (" Nhập n = ") ;readln (n) ;

REPEAT

Write (" Nhập cực hiếm thứ" , count, "của x = ") ;

readln(x) ;

sum := sum + x ;

count := count + 1 ;

UNTIL count > n ;

Writeln (" Trung bình là =" , sum/n : 8 :2 ) ;

Readln ;

END.

Ghi chú:

So sánh 2 cách viết WHILE .. DO với REPEAT .. UNTIL ta thấy bao gồm sự khác biệt:

-Trong cấu trúc WHILE .. DO thì được chất vấn trước, ví như thỏa thì mới có thể tiến hành .

- trái lại, vào cấu tạo REPEAT .. UNTIL thì sẽ tiến hành xúc tiến trước kế tiếp new bình chọn , còn nếu như không thỏa thì liên tục thực hành cho đến Lúc là đúng.

Lệnh REPEAT .. UNTIL thường được áp dụng trong thiết kế, độc nhất là thời điểm người sử dụng ước ao liên tục bài xích toán thù sinh sống trường thích hợp đổi khác biến đổi nhưng chưa phải trnghỉ ngơi về chương trình với thừa nhận tổ hợp phím Ctrl + F9 lại.

lấy ví dụ 6.18:Nhân 2 số a và b

Program Tich;

VARa, b : integer ;

CK : char ;

BEGIN

REPEAT

Write (" Nhập số a = "); Readln (a) ;

Write (" Nhập số b = "); Readln (b) ;

Writeln (" Tích số của a x b là :" , a*b : 10 ) ;

Writeln (" Tiếp tục tính nữa ko (CK) ? ");

Readln (CK) ;

UNTIL upcase(CK) = K; hàm thay đổi cam kết từ trong biếnCK thành ký kết trường đoản cú in hoa

Hướng dẫn lập trình Pascal