C©u 14 : VÞ trÝ con trá tÖp sau lêi gäi thñ tôc Reset lµ.. a.[r]
(1)đề kiểm tra định kì 2, năm học 2008-2009
Mơn Tin học 11, thờì gian 45 phút (Không đợc sử dụng tài liệu)
I, Mục đích, yêu cầu:
Kiểm tra đánh giá kết học tập học kì 2
II, Mục tiêu:
-
Kiểm tra kỹ khai báo biến, hàm, thủ tục, khai báo kiểu liệu cho hàm, thủ tục
-
Kiểu liệu tệp, khai báo biến tập, thao tác với tệp
Qua việc trả lời câu hỏi trắc nghiệm phần A
.
-
Xây dựng đợc cấu trúc chơng trình xử lý công việc cụ thể biết gọi chơng trình
con vận dụng vào viết hồn chỉnh chơng trình chính.
III, §Ị kiĨm tra
A Phần Trắc nghiệm (6đ)
Cõu 1: Trong cỏc khai báo sau khai bao đúng?
a Procedure CatDan(sh:String; vt:byte); c Procedure CatDan(sh:String, vt:byte); b Procedure CatDan(sh:String; vt:byte) d Procedure CatDan(var sh:String; vt:byte);
C©u 2: BiÕn cơc bé lµ biÕn?
a Khai báo SD CT c Không cần khai báo biến cục b Khai báo SD CT d Cả sai
C©u 3: Cã h»ng x©u: S=‘Luong Tai đoạn chơng trình: i:=length(S); While S[i]<> i:=i-1; Write(Copy(S,i,length(S)-i+1)); cho kết là:
a Luong b Tai c Không đa d Toàn dấu cách
Câu 4: Khai báo khai báo sau:
a Var f:Text; b Type f=Text; c Var f=Text; d Var f:Text of integer;
C©u 5: Đoạn chơng trình sau viết hình? For i:=1 to 10 if sqrt(i) mod 2=0 then Write(i,’ ‘);
a 10 b c d 10
C©u 6: Trong khai báo sau khai báo sai?
a Var x,y: Byte; b Var x;y: Byte; c Var x*y:Byte; d Var x:Byte; y:Integer;
Câu 7: Trong câu lệnh sau câu lệnh đúng?
a While x>5 and x<10 Do x:=x-1; c While (x>5) and (x<10) Do x:=x-1; b While (x>5) and (x<10); Do x:=x-1 d While (x>5) and (x<10) Do x:=x-1
C©u 8: Trong ngôn ngữ lập trình Pascal đoạn chơng trình sau thực công việc gì? i:=1; While i<>0 Do Write(i, );
a Lặp vô hạn việc viết hình số c Không viết hình thông tin b Viết hình sô d Đa hình dấu cách
Câu 9: Có xâu S=Luong Tai; Hàm Copy(S,Pos( ,S)+1,length(S)-Pos( ,S)); cho kết quả?
a Luong b dấu cách c T d Tai
Câu 10: Trong ngôn ngữ lập trình Pascal khai báo sau sai? a Var S:String[250]; c Var S:String[256];
b Var S:String; d Var S:String[100];
Câu 11: Trong xâu phần tử mang số là?
a Khụng cú ch số b c Do ngời lập trình đặt d
Câu 12: Trong ngơn ngữ lập trình Pascal thủ tục chèn xâu S1 vào xâu S2 vị trí vt đợc viết? a InSert(S1,vt,S2); c InSert(vt,S1,S2);
b InSert(S1,S2,vt); d InSert(S1,S2,vt)
Câu 13: Cách thức truy cập tệp văn
a Ngẫu nhiên b TuÇn tù c Trùc tiÕp d Võa tuÇn tù vừa trực tiếp
Câu 14: Vị trí trỏ tƯp sau lêi gäi thđ tơc Reset lµ
a Giữa tệp b Cuối tệp c Đầu tệp d Ngẫu nhiên tệp
Câu 15: Để gán tên tệp ‘ketqua.dat’ cho biÕn tƯp f ta sư dơng lƯnh?
a f:=’ketqua.dat’; b f=’ketqua.dat’; c Assign(f,’ketqua.dat’); d Assign(‘ketqua.dat’,f);
Câu 16: Trớc đọc liệu từ tệp ta phải sử dụng lệnh sau đây?
(2)a ReWrite(<biÕn tÖp>); c Reset(<biÕn tÖp>); b Readln(<biÕn tÖp>); d Reset(<tên tệp>);
Câu 17: Đoạn chơng trình For i:=1 to 10 do if i mod 2=0 then Write(sqr(i),’ ‘); viết hình? a 10 b 16 36 64 100 c 10 d
Câu 18: Trong chơng trình chuẩn sau chơng trình thủ tục chuẩn?
a Sin(x); b length(S); c Copy(S,vt,n); d Delete(s,5,3);
Câu 19: Trong ngơn ngữ lập trình Pascal mặt cú pháp câu lệnh sau đúng? a Type Ma=Array[1 10,1 5] of integer c Var Ma:Array[1 10] of integer; b Var Ma:Array[1 10] of Char; d Var Ma=Array[1 10] of integer;
Câu 20: Giả sử có biến xâu x y (đã chứa giá trị) câu lệnh sau không hợp lệ? a x:=Copy(y,5,3); b x:=y; c x:=Delete(y,5,3); d Delete(y,5,3);
Câu 21: Phát biểu sau mảng phù hợp?
a Độ dài tối đa 255 c DÃy hữu hạn phần tử kiểu b Là tập hợp số nguyên d Mảng chứa kí tự
Câu 22: Trong khai báo sau khai báo biến tệp đúng?
a Var fi,fo:Text; c Var fi,fo: File of File; b Var fi,fo:String; d Var fi,fo: Char;
Câu 23: Phát biểu sau sai?
a Trong thủ tục bắt buộc phải có câu lệnh gán <tên thủ tục>:=<biểu thức>; hàm không b Trong hàm bắt buộc phải có câu lệnh gán <Tên hàm>:=<biểu thức>; thủ tục kh«ng
c Cả CTC phải có câu lệnh gán d Cả CTC không cần có câu lệnh gán
Câu 24: f:Text; x:Byte; Câu lệnh sau đúng?
a Writeln(x,f); b Writeln(f,x); c Writeln(x,’van ban’); d Writeln(‘van ban’,x); B phÇn tù luËn(4®)