đề ktra lần 2

Phần trắc nghiệm: Câu 1: Một kiểu bản ghi được khai báo như sau: Câu lệnh nào dưới đây là không phù hợp: Câu 2: Cho S:='abcdef'; Câu lệnh nào dưới đây để xoá các kí tự trong xâu S sao c

Type danhsach = record

Tensach: string[30];

Tacgia: byte;

Giatien: real;

End;

Var x,y,z: sach;

S:= 'mua thu Ha Noi';

Delete(s, 8,7);

Insert('Ha Noi ', s, 1);

S:='Nguyen Hoang Vuong';

X:='';

I:= length(s);

While S[i] <>' ' do

BỘ GIÁO DỤC VÀ ĐÀO TẠO

MÔN TIN HỌC

Thời gian làm bài: 15 phút;

(10 câu trắc nghiệm)

Mã đề thi:112

Họ, tên thí sinh:

Số báo danh:

I Phần trắc nghiệm:

Câu 1: Một kiểu bản ghi được khai báo như sau:

Câu lệnh nào dưới đây là không phù hợp:

Câu 2: Cho S:='abcdef';

Câu lệnh nào dưới đây để xoá các kí tự trong xâu S sao cho S còn nội dung 'abc':

A Delete(s,3,4); B Delete(S, 4,3); C Delete(S, 2, 4); D Delete(S, 4,2);

Câu 3: Trong ngôn ngữ LT Pascal, để tìm vị trí xuất hiện đầu tiên của xâu 'hoa' trong xâu S, câu lệnh nào dưới đây là ĐÚNG.

A i:=Pos(s,'hoa'); B i:= Pos ('hoa', s); C i:= pos('hoa', hoa'); D pos ("hoa", s);

Câu 4: Trong pascal, sau khi thực hiện xong đoạn chương trình sau giá trị của biến S là?

Câu 5: Trong Pascal, thủ tục chèn xâu S2 vào xâu S1 tại vị trí vt được viết:

A Insert(s2, s1, vt); B Insert (S1, s2, vt); C Insert (S1, vt, S2); D Insert(S2, vt, S1);

Câu 6: Trong pascal, gắn tên tệp VB cho biến tệp ta dùng cú pháp:

A Asign <tên biến tệp>, <tên tệp>; B Var <tên biến tệp>: sring;

C Var <tên biến tệp>: Text; D Assign(<tên biến tệp>, <tên tệp>);

Câu 7: Trong pascal, S là 1 biến xâu, để truy xuất đến phần tử cuối của xâu S ta viết:

Câu 8: Trong lập trình Pascal, cho đoạn chương trình:

thực hiện xong đoạn chương trình trên biến X có giá trị là gì?

Trang 1/2 - Mã đề thi 112

Begin X: = X+S[i];

I:= i-1;

Câu 9:Trong Pascal, để nhập n phần tử cho mảng A, câu lệnh nào dưới đây là đúng?

Write('A[',I, ']= '); readln[a];

End;

Begin Write('A[',I, ']= '); readln(a[i]);

Write('A[',I, ']= '); readln(a[i]);

End;

Câu 10: Cho chương trình:

Khi thực hiện xong chương trình trên giá trị của biến x, y là:

A s=123, y=345 B s='123 345', y=0 C s='123 3', y=45 D s='123 3', y='345'

II Phần trả lời:

Trang 2/2 - Mã đề thi 112

Close(f1);

Reset(f1);

Readln(f1,s,y);

Close(f1);

End

Var f1: text; s:string[5];

y: byte;

Begin

Assign (f1,'vidu.txt');

Rewrite (f1);

Writeln(f1,'123 345');