wayground logo

Free Printable Worksheets

Font size

S
M
L
XL
Worksheets

Tin11_15p_HK2

Total questions: 20

Worksheet time: 10mins

Name
Class
Date
1.

Cho biểu thức trong toán học như sau:  a2+2ab+ba^2+2ab+\sqrt{b} 

Chuyển sang cách viết trong Pascal, cách viết nào đúng: 

a)

a*a + 2*a*b + sqrt(b)

b)

a*a +2*a*b+sqr(b)

c)

sqr(a) + 2*a*b + sqr(b)

d)

sqrt(a) + 2*a*b+ sqr(b)

2.

Biểu thức (sqr(3) div 5 ) có kết quả là mấy?

a)

1

b)

2

c)

3

d)

4

3.

Lệnh nào dừng hình để xem kết quả

a)

Write

b)

Writeln

c)

Read

d)

Readln

4.

Giả sử x được khai báo như sau:

Var x: Byte;

Vậy phép gán nào sau đây đúng?

a)

x:=0;

b)

x:= 1/2;

c)

x:= 355

d)

x:= -123;

5.

Đoạn chương trình nào thu được giá trị của biến S=20 ?

a)

S:=10;

S:= S*S;

Write (S);

b)

S:=10;

S:= S+S;

Write (S);

c)

S:=20;

S:= S*S;

Write (S);

d)

S:=20;

S:= S+S;

Write (S);

6.

Hãy cho biết S sẽ nhận giá trị nào khi kết thúc đoạn chương trình sau:

S:=0;

For i:=1 to 10 do If (i mod 2 = 0) then S:= S+i;

Write (S);

a)

30

b)

11

c)

20

d)

25

7.

T sẽ nhận giá trị nào sau khi kết thúc đoạn chương trình sau:

T:= 0;

For i:=1 to 10 do

If ( i mod 2 = 0 ) then T:= T* i ;

Write (T);

a)

3840

b)

10

c)

0

d)

945

8.

Cho S1: ' Virus Corona anh huong toan cau'

Sau khi thực hiện thao tác: Delete (S, 1, 6) thì xâu kết quả là gì?

a)

'Corona anh huong toan cau'

b)

' Corona anh huong toan cau'

c)

'orona anh huong toan cau'

d)

'Virus anh huong toan cau'

9.

Cho S1:=' ' {chứa 1 dấu cách} và S2: = 'Hoc tap online'

Sau khi thực hiện hàm Pos (S1, S2)

thì trả về kết quả là gì:

a)

0

b)

1

c)

3

d)

4

10.

Cho S1:= 'truc' và S2: = 'Hoc truc tuyen'

Sau khi thực hiện hàm Pos (S2, S1)

thì trả về kết quả là gì:

a)

0

b)

5

c)

4

d)

1

11.

S1:= 'dai dich' ; S2:= ' Corona'

Thực hiện thao tác như nào để được xâu kết quả là:

'dai dich Corona'

(chọn 2 đáp án đúng, sau đó nhấn SUMIT)

a)

Insert (S1,S2, 1)

b)

Insert (S2, S1, 8)

c)

Insert (S2, S1, 9)

d)

Insert (S1,S2, 0)

12.

Cho đoạn ct sau:

Write ('Nhap xau a:); Readln(a);

Write ('Nhap xau b:); Readln(b);

If length (a) > length(b) then Write (b)

Else Write (a);

-----

Giả sử nhập xâu a là: 'Truong hoc'

xâu b là: 'dong cua'

thì kết quả đưa ra màn hình là:

a)

Truong hoc dong cua

b)

Truong hoc

c)

dong cua

d)

Truong hoc dong

13.

Cho xâu S:='tam dich Vu Han'

Có những cách xử lý xâu như thế nào để được xâu Kết quả là 'Vu Han' ?

(Chọn 2 đáp án đúng, sau đó nhấn SUMIT)

a)

Copy (S, 1, 9);

b)

Delete (S, 1, 9);

c)

Delete (S. 10,6);

d)

Copy(S, 10, 6);

14.

Cho S:=' Ky nghi Tet keo dai';

Kết quả sau khi thực hiện hàm Upcase(S); là gì?

a)

KY

b)

KY NGHI TET KEO DAI

c)

Câu lệnh sai

d)

Kỳ Nghi Tet Keo Dai

15.

Cho xâu S:=' Valentine 14/2'

Giá trị của phép tham chiếu S[12]=?

a)

1

b)

'1'

c)

'4'

d)

4

16.

Cho S:= 'Qua Valentine thoi Corona'

Sau khi thực hiện thủ tục Copy (S, 5, 10) thì xâu kết quả là gì?

a)

'Valentine'

b)

'Valentine '

c)

' Valentine'

d)

' Valentine '

17.

Cho đoạn chương trình:

Write ('Nhap so luong phan tu: '); Readln (N);

For i:= 1 to N do

Begin

Write ('Nhap phan tu thu:', i, ' la: '); Readln (A[i]);

End;

Đoạn chương trình trên thực hiện thao tác gì?

a)

Tạo bảng

b)

Tạo mảng

c)

Tạo xâu

d)

Câu lệnh For - do

18.

Cách khai báo nào về kiểu xâu là sai?

a)

Var a: string;

b)

Var a: string [30];

c)

Var a: string [300];

d)

Var a: string [3];

19.

Câu lệnh nào thực hiện in xâu S theo thứ tự ngược lại (ví dụ: abcd thì in ra màn hình là dcba)

a)

For i:= 1 to length(S) do write(S[i]);

b)

For i:= 1 to length(S) do writeln(S);

c)

For i:= length(S) downto 1 do write(S);

d)

For i:= length(S) downto 1 do write(S[i]);

20.

Cho đoạn chương trình sau:

S:= 'Tuan sau di hoc roi ' ;

x:= length(S);

Giá trị của x là:

a)

15

b)

19

c)

20

d)

21