Đề kiểm tra học kì 2 môn tin hoc1

Cõu 2: Để gỏn tệp vidu.txt cho biến tệp f ta sử dụng cõu lệnh A.. NO OG LLIW TRAEH YM Câu 5: Dữ liệu kiểu xâu có độ dài tối đa là: Cõu 6: Trong PASCAL để khai bỏo biến tệp văn bản ta phả

Trang 1

Họ và tờn:……….Lớp: 11A1 Đề kiểm tra học kỳ 2 - Mụn Tin học

Cõu 1 : Cho f là một biến tệp văn bản Khai bỏo nào sau đõy là đỳng ?

Cõu 2: Để gỏn tệp vidu.txt cho biến tệp f ta sử dụng cõu lệnh

A assign(‘f , D:\vidu.txt’); B assign(f , vidu txt); C assign(‘vidu.txt’,f ); D assign(f , ‘vidu txt’); Cõu 3: Cho st:=’abcde’ Kết quả khi gọi thủ tục Delete(st,2,3) là:

Cõu 4: Cho biết kết quả xõu C sau khi thực hiện đoạn chương trỡnh sau:

St:='My heart will go on'; C := 'M';

FOR I:= 2 TO length(ST) DO

IF ST[i-1] <> ' ' THEN C := C + ST[i] ELSE C:= C + UPCASE(ST[i]);

A MY HEART WILL GO ON B My Heart Will Go On C my heart will go on D NO OG LLIW TRAEH YM Câu 5: Dữ liệu kiểu xâu có độ dài tối đa là:

Cõu 6: Trong PASCAL để khai bỏo biến tệp văn bản ta phải sử dụng cỳ phỏp gỡ?

A VAR <tờn tệp> : TEXT; B VAR <tờn biến tệp> : TEXT; C VAR <tờn tệp> : STRING; D VAR <tờn biến tệp> : CHAR; Cõu 7: Dữ liệu kiểu tệp văn bản (TEXT) được lưu trữ ở đõu?

A Được lưu trữ trờn bộ nhớ ngoài B Được lưu trữ trờn RAM C Được lưu trữ trờn ROM D Chỉ được lưu trữ trờn đĩa cứng Cõu 8: Cho S1:='Fill'; S2:='FILEname' phỏt biểu so sỏnh S1 và S2 là:

Cõu 9: Cho biết kết quả xõu Sen sau khi thực hiện đoạn chương trỡnh sau:

St:='Read And Answer '; Sen := ' ';

FOR I:= LENGTH(ST) DOWNTO 1 DO Sen := Sen + UPCASE(ST[i]);

A REWSNA DNA DAER B rewsnA dnA daeR C Read And Answer D READ AND ANSWER

Cõu 10: Cho biết kết quả thủ tục sau: St := 'PREPARATION';

DELETE(St, LENGTH(St) DIV 2 - 1 , 4 );

Cõu 11: Cỏch thức truy cập tệp văn bản là cỏch thức truy cập nào?

A Truy cập ngẫu nhiờn B Vừa truy cập tuần tự vừa truy cập trực tiếp C Truy cập trực tiếp D Truy cập tuần tự.

Trang 2

Cõu 12: Thủ tục nào chốn xõu S1 vào S2 tại vị trớ i

Cõu 13: Cho biết kết quả YY của thủ tục sau: XX :='SILENCE'; YY := 'preparation';

INSERT(XX,YY, LENGTH(YY) DIV 2 + 1 );

A prepaSILENCEration B SILpreparation ENCE C prepSILENCEaration D SILEpreparationNCE Cõu 14: Hàm COPY(St,I,n) cho kết quả là gỡ?

Câu 15: Để khai báo biến kiểu xâu trực tiếp ta sử dụng cú pháp nào?

A Var<Tên biến>:<Tên kiểu>; B Var<Tên biến>:string[n]; C Var<Tên biến>=string[n]; D.Var<Tên biến>=string; Câu 16: Kết quả của việc thực hiện hàm Copy(‘abcdef’,3,2) là:

Câu 17: Cho st:=’abcde’ Kết quả khi gọi thủ tục Delete(st,2,3) là:

Câu 18: Cho st=’Chúc các bạn may mắn’,kết quả hàm length(st) là:

Câu 19: Kết quả việc thực hiện hàm Pos(‘ab’,’deabcab’) là:

Câu 20: Cho st1:=’abcd’; st2:=’ABC’; khi đó st1+st2 cho kết quả nào?

Câu 21: Cho st1=’abc’; st2=’deft’; Kết quả gọi Insert(st2,st1,3) là:

Cõu 22: Khai bỏo Biến HANG là bản ghi của một mặt hàng gồm cú tờn hàng, đơn giỏ , số lượng Khai bỏo như sau:

A TYPE HANG = RECORD

Ten= STRING[25]; Gia, SL= Byte END;

B VAR HANG : RECORD

C TYPE HANG = RECORD

Ten: STRING[25]; Gia, SL: Byte; END;

D VAR HANG : RECORD

Ten = STRING[25];Gia, SL = Byte; END;

Trang 3

Câu 23: Trong pascal đoạn chơng trình sau thực hiện công việc gi?

S:= Mùa thu Hà Nội ;’ ’

For i:=1 to length(S) do

S[i]:=Upcase(S[i]);

A Đổi xâu S thành chữ thờng B Gán cho S xâu Mùa thu Ha Nội C Đổi xâu S thành chữ in hoa D Đếm kí tự trong xâu S’ ’

Câu 24: Trong kiêu dữ liệu bản ghi, mỗi bản ghi thờng đợc dùng để?

A Mô tả hay lu trữ thông tin về nhiều đối tợng cần quản lí C Mô tả hay lu trữ thông tin về một thuộc tính quản lí

B Mô tả hay lu trũ thông tin về một đối tợng cần quản lí D Mô tả hay lu trữ thông tin về nhiều thuộc tính cần quản lí

Cõu 25: Thủ tục nào xoỏ n kớ tự trong xõu St bắt đầu tại vị trớ i

Cõu 26: Cho cỏc thủ tục sau: {1} WRITE(F,A,B,C); {2} REWRITE(F); {3} CLOSE(F); {4} ASSIGN(F, ’DATA.OUT’);

Chọn thứ tự cỏc thủ tục để GHI tệp:

Cõu 27: Hóy cho biết giỏ trị của biến M kết thỳc đoạn chương trỡnh như sau, với khai bỏo VAR F: Text; J , M: BYTE; nội dung của tệp

DATA.INP chỉ 1 dũng: 2 5 7 3 6 9 12

ASSIGN(F,'DATA.INP'); RESET(F); M := 0;

WHILE NOT EOF(F) DO

BEGIN

READ(F, J);

IF J MOD 2 = 0 THEN M := M + J;

END;

CLOSE(F);

Cõu 28: Khai bỏo biến ST: STRING; độ dài cực đại của ST là:

Cõu 29: Cho ST1:= 'INFORMATICS'; ST2 := COPY( ST1, 1, 7 ) + 'TION' ; ST2 sẽ làỡ:

Cõu 30: Hàm POS(S1,S2) cho kết quả là gỡ?

A Xoỏ S1 trong S2 B Vị trớ đầu tiờn của S2 trong S1 C Vị trớ đầu tiờn của S1 trong S2 D Sao chộp S2 từ S1 Cõu 31: Hóy cho biết nội dung của tệp DATA.INP kết thỳc đoạn chương trỡnh như sau, với khai bỏo VAR F: Text; J : BYTE;

ASSIGN(F,'DATA.INP'); REWRITE(F);

FOR J:=1 TO 20 DO

IF J MOD 3 = 0 THEN WRITE(F, J:3);

CLOSE(F);

A 2 4 6 8 10 12 14 16 18 20 B 1 2 3 4 5 6 C 369121518 D 3 6 9 12 15 18

Cõu 32: Khai bỏo Kiểu bản ghi PP cho chương trỡnh như thế nào:

Trang 4

A VAR PP : RECORD

Fullname : STRING[30];

Height, Weight : Byte; END;

B TYPE PP = RECORD

C TYPE PP = RECORD

Fullname : STRING[30]; Height, Weight : Byte;

D TYPE PP = RECORD

Fullname = STRING[30]; Height, Weight = Byte; END;

Trang 5

Câu 33: Khai báo Biến mảng Class để quản lý 50 học sinh cho chương trình như thế nào:

Câu 34: Gán trường Weight của phần tử thứ 10 trong mảng Class là 70 , ta dùng lệnh:

Câu 35: Lớp có N học sinh (N <=50) Để đếm những học sinh có chiều cao từ 165 trở lên ta dùng đoạn lệnh: COUNT := 0; FOR I:=1 TO N DO

<*> Tìm lệnh thay thế vào <*>

A IF CLASS[I].HEIGHT>= 165 THEN COUNT := COUNT + CLASS[I].HEIGHT ;

B IF HEIGHT.CLASS[I] >= 165 THEN COUNT := COUNT + 1 ;

C IF HEIGHT.CLASS[I] >= 165 THEN COUNT := COUNT + HEIGHT.CLASS[I] ;

D IF CLASS[I].HEIGHT>= 165 THEN COUNT := COUNT + 1 ;

Câu 36: Lệnh gán nào sau đây không đúng :

Câu 37: Cho các thủ tục sau: {1} CLOSE(F); {2} ASSIGN(F, ’DATA.INP’); {3} READ(F,A,B,C); {4} RESET(F); Chọn thứ tự các thủ tục để

ĐỌC tệp:

Câu 38: Tệp DATA.TXT có nội dung như thế nào sau khi thực hiện chương trình sau:

VAR F: TEXT;

BEGIN

ASSIGN(F,’DATA.TXT’); REWRITE(F);

WRITE(F, '123+456+789'); CLOSE(F);

END.

A 1368 B 123+456+789 C 123 456 789 D 123456789

Câu 39: Cho biết kết quả xâu St sau khi thực hiện đoạn chương trình sau:

St:='PRACTICAL GRAMMAR'; DELETE(St, POS('AM'),4);

Câu 40: Thứ tự khai báo các đối tượng trong chương trình, dùng thứ tự theo từ khoá như sau:

Hãy đánh dấu X vào đáp án đúng dưới bảng sau:

A

B

C

D

A

B

C

D

-Họ và tên:……….Lớp: 11A1 Đề kiểm tra học kỳ 2 - Môn Tin học

Câu 1: Cách thức truy cập tệp văn bản là cách thức truy cập nào?

Trang 6

A Truy cập ngẫu nhiên.

B Vừa truy cập tuần tự vừa truy cập trực tiếp C Truy cập trực tiếp D Truy cập tuần tự.

Trang 7

Cõu 2: Thủ tục nào chốn xõu S1 vào S2 tại vị trớ i

Cõu 3: Cho biết kết quả YY của thủ tục sau: XX :='SILENCE'; YY := 'preparation';

INSERT(XX,YY, LENGTH(YY) DIV 2 + 1 );

A prepaSILENCEration B SILpreparation ENCE C prepSILENCEaration D SILEpreparationNCE Cõu 4: Hàm COPY(St,I,n) cho kết quả là gỡ?

Câu 5 : Để khai báo biến kiểu xâu trực tiếp ta sử dụng cú pháp nào?

A Var<Tên biến>:<Tên kiểu>; B Var<Tên biến>:string[n]; C Var<Tên biến>=string[n]; D.Var<Tên biến>=string; Câu 6: Kết quả của việc thực hiện hàm Copy(‘abcdef’,3,2) là:

Câu 7: Cho st:=’abcde’ Kết quả khi gọi thủ tục Delete(st,2,3) là:

Câu 8: Cho st=’Chúc các bạn may mắn’,kết quả hàm length(st) là:

Câu 9: Kết quả việc thực hiện hàm Pos(‘ab’,’deabcab’) là:

Câu 10: Cho st1:=’abcd’; st2:=’ABC’; khi đó st1+st2 cho kết quả nào?

Cõu 11 : Cho f là một biến tệp văn bản Khai bỏo nào sau đõy là đỳng ?

Cõu 12: Để gỏn tệp vidu.txt cho biến tệp f ta sử dụng cõu lệnh

A assign(‘f , D:\vidu.txt’); B assign(f , vidu txt); C assign(‘vidu.txt’,f ); D assign(f , ‘vidu txt’); Cõu 13: Cho st:=’abcde’ Kết quả khi gọi thủ tục Delete(st,2,3) là:

Cõu 14: Cho biết kết quả xõu C sau khi thực hiện đoạn chương trỡnh sau:

St:='My heart will go on'; C := 'M';

FOR I:= 2 TO length(ST) DO

IF ST[i-1] <> ' ' THEN C := C + ST[i] ELSE C:= C + UPCASE(ST[i]);

A MY HEART WILL GO ON B My Heart Will Go On C my heart will go on D NO OG LLIW TRAEH YM Câu 15 : Dữ liệu kiểu xâu có độ dài tối đa là:

Cõu 16: Hàm POS(S1,S2) cho kết quả là gỡ?

A Xoỏ S1 trong S2 B Vị trớ đầu tiờn của S2 trong S1 C Vị trớ đầu tiờn của S1 trong S2 D Sao chộp S2 từ S1 Cõu 17: Hóy cho biết nội dung của tệp DATA.INP kết thỳc đoạn chương trỡnh như sau, với khai bỏo VAR F: Text; J : BYTE;

ASSIGN(F,'DATA.INP'); REWRITE(F);

FOR J:=1 TO 20 DO

IF J MOD 3 = 0 THEN WRITE(F, J:3);

CLOSE(F);

A 2 4 6 8 10 12 14 16 18 20 B 1 2 3 4 5 6 C 369121518 D 3 6 9 12 15 18

Cõu 18: Khai bỏo Kiểu bản ghi PP cho chương trỡnh như thế nào:

Trang 8

A VAR PP : RECORD

B TYPE PP = RECORD

C TYPE PP = RECORD

Fullname : STRING[30]; Height, Weight : Byte;

D TYPE PP = RECORD

Fullname = STRING[30]; Height, Weight = Byte; END;

Trang 9

Câu 19: Khai báo Biến mảng Class để quản lý 50 học sinh cho chương trình như thế nào:

Câu 20: Gán trường Weight của phần tử thứ 10 trong mảng Class là 70 , ta dùng lệnh:

A PP[10].WEIGHT := 70; B CLASS.PP.WEIGHT := 70; C CLASS[10].WEIGHT := 70; D CLASS.WEIGHT[10] := 70;

Câu 21: Lớp có N học sinh (N <=50) Để đếm những học sinh có chiều cao từ 165 trở lên ta dùng đoạn lệnh: COUNT := 0; FOR I:=1 TO N DO <*>.

Tìm lệnh thay thế vào <*>

A IF CLASS[I].HEIGHT>= 165 THEN COUNT := COUNT + CLASS[I].HEIGHT ;

B IF HEIGHT.CLASS[I] >= 165 THEN COUNT := COUNT + 1 ;

C IF HEIGHT.CLASS[I] >= 165 THEN COUNT := COUNT + HEIGHT.CLASS[I] ;

D IF CLASS[I].HEIGHT>= 165 THEN COUNT := COUNT + 1 ;

Câu 22: Lệnh gán nào sau đây không đúng :

Câu 23: Cho các thủ tục sau: {1} CLOSE(F); {2} ASSIGN(F, ’DATA.INP’); {3} READ(F,A,B,C); {4} RESET(F); Chọn thứ tự các thủ tục để ĐỌC

tệp:

Câu 24: Tệp DATA.TXT có nội dung như thế nào sau khi thực hiện chương trình sau:

VAR F: TEXT;

BEGIN

ASSIGN(F,’DATA.TXT’); REWRITE(F);

WRITE(F, '123+456+789'); CLOSE(F);

END.

A 1368 B 123+456+789 C 123 456 789 D 123456789

Câu 25: Cho biết kết quả xâu St sau khi thực hiện đoạn chương trình sau:

St:='PRACTICAL GRAMMAR'; DELETE(St, POS('AM'),4);

Câu 26: Thứ tự khai báo các đối tượng trong chương trình, dùng thứ tự theo từ khoá như sau:

Câu 27: Trong PASCAL để khai báo biến tệp văn bản ta phải sử dụng cú pháp gì?

A VAR <tên tệp> : TEXT; B VAR <tên biến tệp> : TEXT; C VAR <tên tệp> : STRING; D VAR <tên biến tệp> : CHAR; Câu 28: Dữ liệu kiểu tệp văn bản (TEXT) được lưu trữ ở đâu?

A Được lưu trữ trên bộ nhớ ngoài B Được lưu trữ trên RAM C Được lưu trữ trên ROM D Chỉ được lưu trữ trên đĩa cứng Câu 29: Cho S1:='Fill'; S2:='FILEname' phát biểu so sánh S1 và S2 là:

Câu 30: Cho biết kết quả xâu Sen sau khi thực hiện đoạn chương trình sau:

St:='Read And Answer '; Sen := ' ';

FOR I:= LENGTH(ST) DOWNTO 1 DO Sen := Sen + UPCASE(ST[i]);

Câu 31: Cho biết kết quả thủ tục sau: St := 'PREPARATION';

DELETE(St, LENGTH(St) DIV 2 - 1 , 4 );

Câu 33: Khai báo Biến HANG là bản ghi của một mặt hàng gồm có tên hàng, đơn giá , số lượng Khai báo như sau:

Trang 10

A TYPE HANG = RECORD

Ten= STRING[25]; Gia, SL= Byte END;

B VAR HANG : RECORD

C TYPE HANG = RECORD

Ten: STRING[25]; Gia, SL: Byte; END;

D VAR HANG : RECORD

Ten = STRING[25];Gia, SL = Byte; END;

Trang 11

Câu 34: Trong pascal đoạn chơng trình sau thực hiện công việc gi?

S:= Mùa thu Hà Nội ;’ ’

For i:=1 to length(S) do

S[i]:=Upcase(S[i]);

A Đổi xâu S thành chữ thờng B Gán cho S xâu Mùa thu Ha Nội C Đổi xâu S thành chữ in hoa D Đếm kí tự trong xâu S’ ’

Câu 35: Trong kiêu dữ liệu bản ghi, mỗi bản ghi thờng đợc dùng để?

C Mô tả hay lu trữ thông tin về nhiều đối tợng cần quản lí C Mô tả hay lu trữ thông tin về một thuộc tính quản lí

D Mô tả hay lu trũ thông tin về một đối tợng cần quản lí D Mô tả hay lu trữ thông tin về nhiều thuộc tính cần quản lí

Cõu 36: Thủ tục nào xoỏ n kớ tự trong xõu St bắt đầu tại vị trớ i

Cõu 37: Cho cỏc thủ tục sau: {1} WRITE(F,A,B,C); {2} REWRITE(F); {3} CLOSE(F); {4} ASSIGN(F, ’DATA.OUT’);

Chọn thứ tự cỏc thủ tục để GHI tệp:

Cõu 38: Hóy cho biết giỏ trị của biến M kết thỳc đoạn chương trỡnh như sau, với khai bỏo VAR F: Text; J , M: BYTE; nội dung của tệp DATA.INP

chỉ 1 dũng: 2 5 7 3 6 9 12

ASSIGN(F,'DATA.INP'); RESET(F); M := 0;

WHILE NOT EOF(F) DO

BEGIN

READ(F, J);

IF J MOD 2 = 0 THEN M := M + J;

END;

CLOSE(F);

Cõu 39: Khai bỏo biến ST: STRING; độ dài cực đại của ST là:

Cõu 40: Cho ST1:= 'INFORMATICS'; ST2 := COPY( ST1, 1, 7 ) + 'TION' ; ST2 sẽ làỡ:

Hóy đỏnh dấu X vào đỏp ỏn đỳng dưới bảng sau:

A

B

C

D

A

B

C

D

Định dạng
Số trang	11
Dung lượng	164 KB