BÀI TẬP (TIẾT 18-18)

BT2:Các chương trình Pascal sau đây có hợp lệ không?. Tuy nhiên, để ch ơng trình dịch Turbo Pascal hiểu 2010 là dữ liệu kiểu xâu, chúng ta phải viết dãy số này trong cặp dấu nháy đơn ’

TIẾT:

BÀI TẬP

THỜI LƯỢNG: 2 TIẾT

A) a

B) Tam giac

C) 8a

D) Tamgiac

E) beginprogram

F) end

G) b1

H) abc

BT1:Trong số các tên sau đây tên nào là hợp lệ(B4/13)

a) Ch ¬ng tr×nh 1

begin end.

b ) Ch ¬ng tr×nh 2

begin program CT_thu;

writeln('Chao cac ban');

end

BT2:Các chương trình Pascal sau đây có hợp lệ không? Tại sao (B6/Tr13)

BT 3: Dãy chữ số 2010 có thể

thuộc những kiểu dữ liệu nào?(B2/

Tr26)

Dãy chữ số 2010 có thể thuộc kiểu dữ liệu: số nguyên, số thực hoặc kiểu

xâu kí tự Tuy nhiên, để ch ơng trình dịch Turbo Pascal hiểu 2010 là dữ

liệu kiểu xâu, chúng ta phải viết dãy

số này trong cặp dấu nháy đơn (’).

var a: real; b: integer; begin

writeln(‘2010');

writeln(2010);

a:=2010;

b:=2010;

end.

BT4:H·y ph©n biÖt ý nghÜa cña c¸c c©u lÖnh Pascal sau ®©y:(b3/tr26)

Writeln('5+20=','20+5');

Writeln('5+20=',20+5);

LÖnh Writeln('5+20=','20+5'); in ra mµn

h×nh hai x©u ký tù '5+20' vµ '20+5' liÒn

nhau: 5+20 = 20+5

lÖnh Writeln('5+20=',20+5); in ra mµn

h×nh x©u ký tù '5+20' vµ tæng cña 20+5 nh sau: 5+20=25.

Hai lÖnh sau cã t ¬ng ® ¬ng

víi nhau kh«ng? T¹i sao?

Hai lÖnh Writeln('100'); vµ

Writeln(100); kh«ng t ¬ng ® ¬ng

víi nhau v× mét lÖnh in ra mµn h×nh x©u ký tù biÓu diÔn sè 100 cßn lÖnh kia in ra mµn h×nh sè

100.

BT5(B4/tr26):ViÕt c¸c biÓu thøc to¸n

d íi ®©y b»ng c¸c kÝ hiÖu trong Pascal:

• a/b+c/d

• a*x*x+b*x+c

• 1/x-a/5*(b+2)

• (a*a+b)*(1+c)*(1+c)*(1+c)

BT6(b5/tr26):ChuyÓn c¸c biÓu thøc ®

îc viÕt trong Pascal sau ®©y thµnh

c¸c biÓu thøc to¸n:

2

( a b ) x

y

  2b

a  c

2

2

(2 )

a

b c 

1

2 2.3 3.4 4.5

BT7(b1/tr33):Gi¶ sö A ® îc khai b¸o lµ

biÕn víi kiÓu d÷ liÖu sè thùc, X lµ

biÕn víi kiÓu d÷ liÖu x©u C¸c phÐp

g¸n sau ®©y cã hîp lÖ kh«ng?

a) A:= 4;

b) X:= 3242;

c) X:= '3242';

d) A:= 'Ha Noi'.

BT8(b4/tr33): Trong Pascal, khai

báo nào sau đây là đúng?

a) var tb: real;

b) var 4hs: integer;

c) const x: real;

d) var R = 30;

BT9(b5/tr33):Hãy liệt kê các lỗi nếu có trong ch

ơng trình d ới đây và sửa lại cho đúng:

var a,b:= integer;

const c:= 3;

begin

a:= 200

b:= a/c;

write(b);

readln

end

Các lỗi trong ch ơng trình: (1) Thừa dấu

bằng ở dòng 1 (chỉ cần dấu hai chấm); (2) Thừa dấu hai chấm ở dòng 2 (với hằng chỉ cần dấu bằng); (3) Thiếu dấu chấm phẩy ở dòng 4; (4) Khai báo kiểu

dữ liệu của biến b không phù hợp: Khi

chia hai số nguyên, kết quả luôn luôn là

số thực, cho dù có chia hết hay không

Do đó cần phải khai báo biến b là biến

có kiểu dữ liệu số thực

BT10(b6/tr33)Hãy cho biết kiểu dữ liệu của các biến cần khai báo dùng để viết ch ơng

trình để giải các bài toán d ới đây:

a) Tính diện tích S của hình tam giác với độ dài một cạnh a và chiều cao t ơng ứng h (a

và h là các số tự nhiên đ ợc nhập vào từ bàn

phím)

b) Tính kết quả c của phép chia lấy phần

nguyên và kết quả d của phép chia lấy phần

d của hai số nguyên a và b.

a) C¸c biÕn a vµ h lµ

kiÓu sè nguyªn; biÕn

S: kiÓu sè thùc.

b) C¶ bèn biÕn a, b, c vµ

d lµ c¸c kiÓu sè nguyªn.