De kt1t 11

Câu 1:
Hãy chỉ ra biểu diễn không phải là biểu diễn hằng trong Pascal?

A
‘TRUE’

B
FALSE

C
2.01E-12

D
‘A

ĐA
D

Câu 2:
Trong những biểu diễn dưới đây, biểu diễn nào là từ khóa trong Pascal?

A
END

B
Integer

C
Sqrt

D
Real

ĐA
A

Câu 3:
Cách đặt tên nào là đúng theo quy tắc Pascal?

A
11B7

B
11 B1

C
_11B1

D
11_B1

ĐA
D

Câu 4:
Hãy chỉ ra tên do người lập trình đặt trong các tên sau:

A
PTB2

B
Program

C
Byte

D
Sqrt

ĐA
A

Câu 5:
Hãy chọn biểu diễn hằng trong những biểu diễn dưới đây:

A
Begin

B
End

C
12.4E-5

D
‘65c’

ĐA
D

Câu 6:
Khai báo nào sau đây là đúng cú pháp trong Pascal?

A
Var a: real;

B
Var b=5;

C
Const c: byte;

D
Uses CRT.

ĐA
A

Câu 7:
Hãy chọn biểu diễn tên trong những biểu diễn dưới đây :

A
‘*****’

B
-5+9-0

C
+256.512

D
FA33C9

ĐA
D

Câu 8:
Biến N được khai báo là kiểu (byte), câu lệnh gán nào sau đây đúng?

A
N:=100;

B
N:=300;

C
N:=3.14;

D
N:=False;

ĐA
A

Câu 9:
Phát biểu nào dưới đây là đúng?

A
Chương trình là dãy các lệnh được tổ chức theo các quy tắc được xác định bởi một ngôn ngữ lập trình cụ thể;

B
Trong chế độ thông dịch mỗi câu lệnh của chương trình nguồn được dịch thành một câu lệnh của chương trình đích;

C
Mọi bài toán đều có chương trình để giải trên máy tính;

D
Nếu chương trình nguồn có lỗi cú pháp thì chương trình đích cũng có lỗi cú pháp

ĐA
A

Câu 10:
Phát biểu nào dưới đây là đúng:

A
Khi cần thay đổi ý nghĩa của một từ khóa nào đó người lập trình cần khai báo theo ý nghĩa mới

B
Tên do người lập trình đặt không được trùng với từ khóa nhưng có thể trùng với tên chuẩn;

C
Trong chương trình tên gọi cũng là một đối tượng không thay đổi nên cũng có thể xem là hằng.

D
Mọi đối tượng có giá trị không thay đổi trong chương trình đều gọi là biến.

ĐA
B


Câu 1: Biểu diễn các biểu thức sau dưới dạng pascal:
a)

b)


Câu 2: Viết chương trình tìm nghiệm của phương trình bậc hai ax2 + bx + c = 0
ĐÁP ÁN

Câu 1:
(1+x*x)/sqrt(1-x*x)
abs(5+x)*(1-y)/(1+y)
(x+1)/(x-y)
Câu 2:
PROGRAM Giai_PTB1;
VAR a,b,x:real;
BEGIN
Write(‘nhap a,b’); readln(a,b);
IF a<>0 THEN
Begin
X:=-b/a;
writeln(‘phuong trinh co nghiem la:’,x:8:2);
End
ELSE IF b=0 THEN
writeln(‘phuong trinh vo so nghiem’)
Else writeln(‘phuong trinh vo nghiem’)
Readln
END.