Đề thi vấn đáp Tin học 11

Sở GD & ĐT Hà Nội
Trường THPT Thượng Cát


Đề kiểm tra học kỳ 2
Môn: Tin học 11
Thời gian: 45 phút



Câu 1 ( 2 đ ): Giải thích ý nghĩa của câu lệnh sau đây

Var x:integer;
Var a: array[1..100] of real;
Câu 2 ( 2 đ ): Chuyển các câu lệnh sau đây sang dạng pascal

Nhập biến n nguyên từ bàn phím
Khai báo biến a kiểu Logic
Câu 3 ( 2 đ ): Giải thích ý nghĩa của các câu lệnh sau đây

S2:=copy(s1,3,length(s1)-4)
If a mod 2 =0 then write(‘ a la so chan’)
Else write ( ‘ a la so le’);
Câu 4 ( 2 đ ): Cho biết kết quả và giải thích ỹ nghĩa của các lệnh dưới đây

a. S=’ you are the most beautiful in my class’; Delete(s,5,3)=?
b. S=’ I need you’; length(s)=?

Câu 5 ( 2 đ ): Cho biết kết quả của đoạn chương trình dưới đây và giải thích

Var i, s:integer
Begin
i := 4; s:= 5;
if ( i > 6 ) then s:= s + ( 5 - i ) * 3
else
if ( i > 3 ) then s:= 6 * i+s
else s:= s+2;
write(‘Tong s la:’,s);
End.


Giáo viên ra đề thi



Nguyễn Anh Tùng


Sở GD & ĐT Hà Nội
Trường THPT Thượng Cát


Bài kiểm tra học kỳ 2
Môn: Tin học 11
Thời gian: 45 phút



Câu 1 ( 2 đ ): Giải thích ý nghĩa của câu lệnh sau đây

Var x:real;
Var b: array[1..100] of integer;
Câu 2 ( 2 đ ): Chuyển các câu lệnh sau đây sang dạng pascal

Xuất dữ liệu ra màn hình
Lưu tệp
Câu 3 ( 2 đ ): Giải thích ý nghĩa của các câu lệnh sau đây

S2:=Delete(s1,3,length(s1)-2);
If a<0 then write(‘ a la so am’)
Else write ( ‘ a la so duong’);
Câu 4 ( 2 đ ): Cho biết kết quả và giải thích ỹ nghĩa của các lệnh dưới đây

S=’ you are the most beautiful in my class’; Copy(s,9,3)=?
S=’ I hate you so much’; length(s)=?

Câu 5 ( 2 đ ): Cho biết kết quả của đoạn chương trình dưới đây và giải thích

Var i, s:integer
Begin
i := 7; s:= 4;
if ( i > 5 ) then s:= s + ( 6 - i ) * 2
else
if ( i > 3 ) then s:= s+5 * i
else s:= s+2;
write(‘Tong s la:’,s);
End.

Giáo viên ra đề thi



Nguyễn Anh Tùng



Sở GD & ĐT Hà Nội
Trường THPT Thượng Cát


Bài kiểm tra học kỳ 2
Môn: Tin học 11
Thời gian: 45 phút



Câu 1 ( 2 đ ): Giải thích ý nghĩa của câu lệnh sau đây

Fuction UCLN(x,y:integer):integer;
Var Hoten:String[20];
Câu 2 ( 2 đ ): Chuyển các câu lệnh sau đây sang dạng pascal

Khai báo biến n kiểu nguyên
Chạy 1 chương trình Pascal
Câu 3 ( 2 đ ): Giải thích ý nghĩa của các câu lệnh sau đây

Insert(s1,s1,4)
Readln(n);
Câu 4 ( 2 đ ): Cho biết kết quả và giải thích ỹ nghĩa của các lệnh dưới đây

a. S=’he is the most intelligent in my class’; Delete(s,7,3)=?
b. S=’ I love you ’; length(s)=?

Câu 5 ( 2 đ ): Cho biết kết quả của đoạn chương trình dưới đây và giải thích

Var i, s:integer
Begin
i := 4; s:= 5;
if ( i > 9 ) then s:= s + ( 5 - i ) * 3
else
if ( i > 6 ) then s:= 6 * i+s
else s:= s*2+i;
write(‘Tong s la:’,s);
End.


Giáo viên ra đề thi


Nguyễn Anh Tùng




Sở GD & ĐT Hà Nội
Trường THPT Thượng Cát


Bài kiểm tra học kỳ 2